Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: bfe29c0)
Internal variable SI:*ALLOW-WITH-INTERRUPTS* not declared special.
authorJuan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Sun, 7 Feb 2010 00:39:11 +0000 (01:39 +0100)
committerJuan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Sun, 7 Feb 2010 00:39:11 +0000 (01:39 +0100)
src/CHANGELOG patch | blob | blame | history
src/c/symbols_list.h patch | blob | blame | history
src/c/symbols_list2.h patch | blob | blame | history

diff --git a/src/CHANGELOG b/src/CHANGELOG
index 52c716b..b5d021e 100755 (executable)
--- a/src/CHANGELOG
+++ b/src/CHANGELOG
@@ -1,4 +1,4 @@
-ECL 10.1.1:
+ECL 10.2.1:
 ===========
 
 * Bugs fixed:
@@ -26,6 +26,8 @@ ECL 10.1.1:
  - No longer style warnings about removal of a variable when this variable was
    previously declared as ignorable.
 
+ - Internal variable MP:*ALLOW-WITH-INTERRUPTS* was not declared special.
+
 * Visible changes:
 
  - Significant speedup in access to hash tables of up to 30% by writing
diff --git a/src/c/symbols_list.h b/src/c/symbols_list.h
index 2d21414..0f3566f 100755 (executable)
--- a/src/c/symbols_list.h
+++ b/src/c/symbols_list.h
@@ -1826,7 +1826,7 @@ cl_symbols[] = {
 {EXT_ "MAKE-WEAK-POINTER", EXT_ORDINARY, si_make_weak_pointer, 1, OBJNULL},
 {EXT_ "WEAK-POINTER-VALUE", EXT_ORDINARY, si_weak_pointer_value, 1, OBJNULL},
 
-{MP_ "*ALLOW-WITH-INTERRUPTS*", SI_ORDINARY, NULL, -1, Ct},
+{SYS_ "*ALLOW-WITH-INTERRUPTS*", SI_SPECIAL, NULL, -1, Ct},
 
 {EXT_ "WITH-UNIQUE-NAMES", EXT_ORDINARY, NULL, -1, OBJNULL},
 
diff --git a/src/c/symbols_list2.h b/src/c/symbols_list2.h
index df408f8..6395c16 100755 (executable)
--- a/src/c/symbols_list2.h
+++ b/src/c/symbols_list2.h
@@ -1826,7 +1826,7 @@ cl_symbols[] = {
 {EXT_ "MAKE-WEAK-POINTER","si_make_weak_pointer"},
 {EXT_ "WEAK-POINTER-VALUE","si_weak_pointer_value"},
 
-{MP_ "*ALLOW-WITH-INTERRUPTS*",NULL},
+{SYS_ "*ALLOW-WITH-INTERRUPTS*",NULL},
 
 {EXT_ "WITH-UNIQUE-NAMES",NULL},
 
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)