projects
/
jscl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix bug in defun, reported by abeaumont
[jscl.git]
/
ecmalisp.lisp
diff --git
a/ecmalisp.lisp
b/ecmalisp.lisp
index
e4dba1b
..
a422c20
100644
(file)
--- a/
ecmalisp.lisp
+++ b/
ecmalisp.lisp
@@
-725,7
+725,7
@@
(push (concat "var " (binding-translation b)) *toplevel-compilations*)))
(defun %compile-defun (name)
(push (concat "var " (binding-translation b)) *toplevel-compilations*)))
(defun %compile-defun (name)
- (let ((b (lookup-function name *env*)))
+ (let ((b (lookup-function name *fenv*)))
(mark-binding-as-declared b)
(push (concat "var " (binding-translation b)) *toplevel-compilations*)))
(mark-binding-as-declared b)
(push (concat "var " (binding-translation b)) *toplevel-compilations*)))