mirror of
https://gitlab.com/embeddable-common-lisp/ecl.git
synced 2026-01-01 15:20:36 -08:00
Mark lexical environment variables as volatile, so that they are not clobbered by calls to THROW, GOTO, etc
This commit is contained in:
parent
abe8be9b76
commit
b484692da8
3 changed files with 5 additions and 2 deletions
|
|
@ -64,6 +64,9 @@ ECL 1.0:
|
|||
|
||||
* Bugs fixed:
|
||||
|
||||
- Lexical environment variables were not marked as volatile and thus they
|
||||
were sometimes clobbered by the C compiler.
|
||||
|
||||
- COMPILE-FILE-PATHNAME accepts the same keyword arguments as COMPILE-FILE.
|
||||
|
||||
- COMPILER-LET is not standard and belongs in the EXT package. However, it had
|
||||
|
|
|
|||
|
|
@ -347,7 +347,7 @@
|
|||
; (wt-h "#define VU" *reservation-cmacro*)
|
||||
(wt-h "#define VLEX" *reservation-cmacro*)
|
||||
(when (plusp *max-lex*)
|
||||
(wt-h1 " cl_object lex") (wt-h1 *level*)
|
||||
(wt-h1 " volatile cl_object lex") (wt-h1 *level*)
|
||||
(wt-h1 "[") (wt-h1 *max-lex*) (wt-h1 "];"))
|
||||
(wt-h "#define CLSR" *reservation-cmacro*)
|
||||
(when (plusp *max-env*)
|
||||
|
|
|
|||
|
|
@ -24,7 +24,7 @@ Returns, as a string, the location of the machine on which ECL runs."
|
|||
(defun lisp-implementation-version ()
|
||||
"Args:()
|
||||
Returns the version of your ECL as a string."
|
||||
"@PACKAGE_VERSION@ (CVS 2007-12-20 17:07)")
|
||||
"@PACKAGE_VERSION@ (CVS 2007-12-21 17:58)")
|
||||
|
||||
(defun machine-type ()
|
||||
"Args: ()
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue