mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-14 21:32:49 -08:00
Code Issues Projects Releases Packages Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
jjgarcia 2004-04-21 13:47:27 +00:00
parent 7afef75f7f
commit 8b678591be
1 changed files with 0 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/cmp/cmpexit.lsp
View file

@ -25,7 +25,6 @@
(defun unwind-exit (loc &optional (jump-p nil)
&aux (bds-lcl nil) (bds-bind 0) (stack-pop nil))
(declare (fixnum bds-bind))
(when (consp *destination*)
(case (car *destination*)
(JUMP-TRUE