[Git][cmucl/cmucl][master] Fix #8: Constants and top-level code

[Raymond Toy]

Raymond Toy pushed to branch master at cmucl / cmucl


Commits:
0829e71b by Raymond Toy at 2015-08-26T20:48:39Z
Fix #8: Constants and top-level code 

Apply patch from Helmut, as is.

- - - - -


1 changed file:

- src/compiler/main.lisp


Changes:

=====================================
src/compiler/main.lisp
=====================================
--- a/src/compiler/main.lisp
+++ b/src/compiler/main.lisp
@@ -1229,7 +1229,8 @@
 	     (do-eval-when-stuff
 	      (cadr form) (cddr form)
 	      #'(lambda (forms)
-		  (process-progn forms path))
+		  (process-progn forms path)
+		  (compile-top-level-lambdas '() t))
 	      t))
 	    ((macrolet)
 	     (unless (>= (length form) 2)



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/0829e71bddbee846f6d962379b6634c96e391b37
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20150827/2a9b8304/attachment.html>