Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
cmucl
cmucl
Commits
80fe9390
Commit
80fe9390
authored
Feb 13, 1993
by
ram
Browse files
new structure hax.
parent
3ab41f4c
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/main.lisp
View file @
80fe9390
...
...
@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(
ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/main.lisp,v 1.78
1992/11/25 10:32:29 wlott
Exp $"
)
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/main.lisp,v 1.78
.1.1 1993/02/13 15:49:34 ram
Exp $"
)
;;;
;;; **********************************************************************
;;;
...
...
@@ -1024,6 +1024,9 @@
(
process-cold-load-form
form
path
t
))
((
error
cerror
break
signal
)
(
process-cold-load-form
form
path
nil
))
(
kernel:%compiler-defstruct
(
convert-and-maybe-compile
form
path
)
(
compile-top-level-lambdas
()
t
))
((
eval-when
)
(
unless
(
>=
(
length
form
)
2
)
(
compiler-error
"EVAL-WHEN form is too short: ~S."
form
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment