Changeset 11491
- Timestamp:
- 12/27/08 15:28:48 (14 years ago)
- Location:
- trunk/abcl/src/org/armedbear/lisp
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/Lisp.java
r11490 r11491 2530 2530 2531 2531 2532 // Extentions2533 static {2534 Symbol._INSPECTOR_HOOK_.initializeSpecial(NIL);2535 }2536 2537 2532 private static final void loadClass(String className) 2538 2533 { -
trunk/abcl/src/org/armedbear/lisp/Package.java
r11475 r11491 300 300 } 301 301 302 /** Initializes the symbol as a special variables and assigns it 303 a value, just like DEFVAR would. 304 */ 305 public synchronized Symbol addExternalSymbol(String symbolName, 306 LispObject specialValue) 307 { 308 final Symbol symbol = addExternalSymbol(symbolName); 309 symbol.initializeSpecial(specialValue); 310 311 return symbol; 312 } 313 302 314 public synchronized Symbol intern(String symbolName) 303 315 { -
trunk/abcl/src/org/armedbear/lisp/Symbol.java
r11490 r11491 3014 3014 // CDR6 3015 3015 public static final Symbol _INSPECTOR_HOOK_ = 3016 PACKAGE_EXT.addExternalSymbol("*INSPECTOR-HOOK*" );3016 PACKAGE_EXT.addExternalSymbol("*INSPECTOR-HOOK*", NIL); 3017 3017 3018 3018 }
Note: See TracChangeset
for help on using the changeset viewer.