[slime-devel] Re: Problems with swank and Allegro CL
Damien Kick
dkick1 at motorola.com
Fri Jul 28 15:24:22 UTC 2006
Helmut Eller <heller <at> common-lisp.net> writes:
> A backtrace here would be useful.
-------------------------------------------
Bug Report Friday 28 Jul 2006 at 10:21:06 AM
lisp version: 7.0 [Windows] (Jul 21, 2006 17:02)
cg version: 1.54.2.17.2.12
platform: NT 5.1.2600 Service Pack 1
Error: Bad type of object (SYNONYM-STREAM) passed to parent. The object was
#<SYNONYM-STREAM @ #x20be0492>.
--------------------------------------------
Backtrace for process "Listener 1"
--------------------------------------------
ERROR
DATUM (REQUIRED) -->
"Bad type of object (~a) passed to parent. ~
The object was ~s."
ARGUMENTS (REST) --> (SYNONYM-STREAM #<SYNONYM-STREAM @ #x20be0492>)
local-0 (LOCAL) --> (SYNONYM-STREAM #<SYNONYM-STREAM @ #x20be0492>)
local-1 (LOCAL) -->
"Bad type of object (~a) passed to parent. ~
The object was ~s."
local-2 (LOCAL) -->
#<SIMPLE-ERROR @ #x20ed0ef2>
local-3 (LOCAL) --> 97
local-4 (LOCAL) --> NIL
local-5 (LOCAL) --> #<STANDARD-CLASS SYNONYM-STREAM>
local-6 (LOCAL) -->
#<Printer Error, obj=#x1f74b887: Can't coerce 77046520 to type SIMPLE-STRING.>
UNKNOWN (UNKNOWN) --> NIL
(METHOD PARENT (T))
OBJECT (REQUIRED) --> #<SYNONYM-STREAM @ #x20be0492>
local-0 (LOCAL) --> #<SYNONYM-STREAM @ #x20be0492>
(METHOD IDE-PROXY-TASK (READ-EVAL-DATA))
STRUCT-ARGUMENT (REQUIRED) -->
#S(IDE.BASE::READ-EVAL-DATA :START-POS 7214
:END-POS 7219
:STRING "nil
")
local-0 (LOCAL) --> #<Vector @ #x20ed17ba>
local-1 (LOCAL) --> 0
local-2 (LOCAL) --> NIL
local-3 (LOCAL) --> 30558901
local-4 (LOCAL) --> 30558901
local-5 (LOCAL) --> 135843258
local-6 (LOCAL) --> 0
local-7 (LOCAL) --> 4
local-8 (LOCAL) --> 137199902
local-9 (LOCAL) -->
#<Function (METHOD IDE.BASE:IDE-PROXY-TASK
(IDE.BASE::READ-EVAL-DATA))>
local-10 (LOCAL) --> 132222450
local-11 (LOCAL) --> 0
local-12 (LOCAL) --> :BAD-FRAME-VAR-VALUE
local-13 (LOCAL) --> 12434102
local-14 (LOCAL) --> "nil
"
local-15 (LOCAL) --> T
local-16 (LOCAL) --> #<MP:PROCESS Listener 1(4) @ #x20b601e2>
local-17 (LOCAL) --> NIL
local-18 (LOCAL) -->
#S(IDE.BASE::READ-EVAL-DATA :START-POS 7214
:END-POS 7219
:STRING "nil
")
local-19 (LOCAL) --> 12434102
local-20 (LOCAL) --> #\null
local-21 (LOCAL) --> 12434134
local-22 (LOCAL) --> #<Function CHECK-ANNOTATIONS-AND-WRITE>
local-23 (LOCAL) --> #<XP-SIMPLE-STREAM printing "" pos 0 @
#x20ed114a>
local-24 (LOCAL) --> "Listener 1"
local-25 (LOCAL) --> :BAD-FRAME-VAR-VALUE
local-26 (LOCAL) --> EXCL::*WITHOUT-INTERRUPTS*
local-27 (LOCAL) --> T
local-28 (LOCAL) --> :BAD-FRAME-VAR-VALUE
local-29 (LOCAL) --> 0
local-30 (LOCAL) --> #\I
local-31 (LOCAL) --> 27
(METHOD HANDLE-PROXY-TASKS (EVAL-PROCESS-WINDOW))
EVAL-WINDOW (REQUIRED) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-0 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-1 (LOCAL) --> #<MP:PROCESS-LOCK IDE Process Lock @ #x20b34e92>
local-2 (LOCAL) --> #<MP:PROCESS Listener 1(4) @ #x20b601e2>
local-3 (LOCAL) --> 0
local-4 (LOCAL) --> NIL
local-5 (LOCAL) --> NIL
local-6 (LOCAL) --> NIL
local-7 (LOCAL) --> "Lock"
local-8 (LOCAL) --> 137298716
local-9 (LOCAL) -->
#S(IDE.BASE::READ-EVAL-DATA :START-POS 7214
:END-POS 7219
:STRING "nil
")
local-10 (LOCAL) --> #<Vector @ #x20ed04b2>
local-11 (LOCAL) -->
#S(IDE.BASE::READ-EVAL-DATA :START-POS 7214
:END-POS 7219
:STRING "nil
")
local-12 (LOCAL) --> NIL
local-13 (LOCAL) --> #<MP:PROCESS-LOCK IDE Process Lock @ #x20b34e92>
local-14 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-15 (LOCAL) -->
#S(IDE.BASE::READ-EVAL-DATA :START-POS 7214
:END-POS 7219
:STRING "nil
")
local-16 (LOCAL) -->
#<STANDARD-GENERIC-FUNCTION (SETF IDE.BASE::EVAL-PROCESS-TASKS)>
(METHOD WINDOW-PROCEDURE (BASIC-PANE (EQL PROXY-TASK-MESSAGE) T T))
WINDOW (REQUIRED) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
MSG (REQUIRED) --> 33169
WPARAM (REQUIRED) --> 0
LPARAM (REQUIRED) --> 0
WINDOW-PROCEDURE-CALLBACK
G6941 (REQUIRED) --> :UNKNOWN
local-0 (LOCAL) --> 0
local-1 (LOCAL) --> T
local-2 (LOCAL) --> 525340
local-3 (LOCAL) --> 33169
local-4 (LOCAL) --> 0
local-5 (LOCAL) --> 0
local-6 (LOCAL) --> 12434410
local-7 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-8 (LOCAL) --> 132219671
local-9 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-10 (LOCAL) --> "CG-USER"
local-11 (LOCAL) --> #<XP-SIMPLE-STREAM printing "" pos 0 @
#x20ed114a>
DISPATCH-WINDOW-MESSAGE
local-0 (LOCAL) --> #<screen @ #x20af8ffa>
PROCESS-SINGLE-EVENT
NO-WAIT (OPTIONAL) --> NIL
local-0 (LOCAL) --> 137311480
local-1 (LOCAL) --> NIL
local-2 (LOCAL) --> :BAD-FRAME-VAR-VALUE
SIMPLE-EVENT-LOOP
WINDOW (REQUIRED) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
EXIT-TEST (REQUIRED) --> NIL
local-0 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-1 (LOCAL) --> NIL
EVENT-LOOP-2
WINDOW (REQUIRED) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
EXIT-TEST (REQUIRED) --> NIL
local-0 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-1 (LOCAL) --> NIL
EVENT-LOOP
WINDOW (KEYWORD) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
EXIT-TEST (KEYWORD) --> :UNSUPPLIED
local-0 (LOCAL) --> 0
local-1 (LOCAL) --> NIL
local-2 (LOCAL) -->
#<EVAL-PROCESS-WINDOW IDE.BASE:EVAL-PROCESS-WINDOW in Listener 1 @
#x20b604ca>
local-3 (LOCAL) --> NIL
local-4 (LOCAL) --> 12434678
local-5 (LOCAL) --> #<LISTENER-PANE :LISTENER-PANE in IDE GUI @
#x20b60402>
local-6 (LOCAL) --> #31\?
local-7 (LOCAL) --> #<Closure (:INTERNAL EVENT-LOOP 0) @ #x2f6f3b2>
local-8 (LOCAL) --> (#<restart EXIT-EVENT-LOOP @ #x20f033fa>)
local-9 (LOCAL) --> NIL
REP-ONE-COMMAND-EVENT-LOOP
NIL (EXTRA-ARG) --> NIL
NIL (EXTRA-ARG) --> NIL
local-0 (LOCAL) --> :BAD-FRAME-VAR-VALUE
local-1 (LOCAL) --> #<LISTENER-PANE :LISTENER-PANE in IDE GUI @
#x20b60402>
local-2 (LOCAL) --> #<LISTENER-WINDOW :LISTENER-WINDOW-1 in IDE GUI @
#x20b605a2>
local-3 (LOCAL) -->
(#<STANDARD-METHOD OUTPUT-STREAM-P (FUNDAMENTAL-STREAM)>
#<STANDARD-METHOD OUTPUT-STREAM-P (T)>)
IDE-TOP-LEVEL-READ-EVAL-PRINT-LOOP-2
local-0 (LOCAL) --> 12434926
local-1 (LOCAL) -->
#<Closure (:INTERNAL IDE.BASE::IDE-TOP-LEVEL-READ-EVAL-PRINT-LOOP-2
0)
@ #x2f6f792>
local-2 (LOCAL) --> (#<restart ABORT @ #x20ed2112>)
local-3 (LOCAL) --> NIL
IDE-TOP-LEVEL-READ-EVAL-PRINT-LOOP
ARGS (REST) --> 0
local-0 (LOCAL) --> 0
local-1 (LOCAL) --> 12434987
local-2 (LOCAL) --> TPL::*INSIDE-READ-EVAL-PRINT*
local-3 (LOCAL) -->
#<Closure (:INTERNAL IDE.BASE::IDE-TOP-LEVEL-READ-EVAL-PRINT-LOOP
0)
@ #x2f6f88a>
local-4 (LOCAL) --> NIL
local-5 (LOCAL) --> (#<restart IDE.BASE::EXIT-LISTENER @ #x20b84ba2>)
local-6 (LOCAL) --> NIL
UNKNOWN (UNKNOWN) --> NIL
TOP-LEVEL-READ-EVAL-PRINT-LOOP
local-0 (LOCAL) -->
(/ // /// * ** *** + ++ +++ - TPL:*PROMPT* TPL::.DIGESTED-PROMPT.
TPL::.PROMPT-WARNING-ISSUED. TPL:*COMMAND-CHAR* TPL:*HISTORY*
TPL:*EXIT-ON-EOF* TPL:*READ* TPL:*EVAL* TPL:*PRINT*
TPL:*PRINT-LEVEL* TPL:*PRINT-LENGTH* TPL:*RESET-HOOK*
TPL:*TIME-THRESHOLD* TPL::*HISTORY-LIST*
TPL::*THIS-COMMAND-NUMBER* TPL::*HISTORY-LENGTH*
TPL::*LAST-FILE-LOADED* TPL::*LAST-FILE-COMPILED*
TPL:*AUTO-ZOOM* TPL:*ZOOM-DISPLAY*
TPL:*ZOOM-PRINT-SPECIAL-BINDINGS* TPL:*ZOOM-PRINT-LENGTH*
TPL:*ZOOM-PRINT-LEVEL* TPL:*ZOOM-PRINT-CIRCLE*
TPL::*CURRENT-FRAME-POINTER-CHANGE-HOOK* TPL::*FOCUS-STACK*
TPL::*ARRESTED-PROCESSES* TPL::*ZOOM-OUTPUT-STYLE*
TPL:*ZOOM-SHOW-NEWER-FRAMES* TPL::*ZOOM-FUNCTION-STYLE*
TPL::*ZOOM-PRINT-RELATIVE* TPL::*UNHIDE-ALL-FRAMES*
TPL:*HELP-PAGE-LENGTH* TPL::*EOFS-SEEN* TPL::*SAVED-PACKAGE*
TPL::*SAVED-FOCUS* TPL::*POP-HOOK* TPL::.REP-ONE-COMMAND.
TPL::*MACRO-LAST-ARG* TPL::*CLOAD-LAST-ARGS*
TPL::*INSIDE-READ-EVAL-PRINT*)
local-1 (LOCAL) -->
(NIL NIL NIL NIL NIL NIL NIL NIL NIL NIL "~&~
~@[[Current process: ~a]~%~]~
~@[[Current process focus: ~a]~%~]~
~:[~
~:[~
~2*~
~;~
[~:*~d~:[~;c~]~:[~;i~]] ~
~]~
~;~
[~:*~a] ~3*~
~]~
~a(~d): " (NIL) NIL #\: 100 NIL NIL NIL NIL 5 10 NIL NIL NIL 0 0 NIL
NIL T 8 NIL 3 3 NIL NIL NIL NIL :MODERATE T NIL NIL NIL 24 0
#<The COMMON-LISP-USER package> NIL NIL
TPL::READ-EVAL-PRINT-ONE-COMMAND NIL NIL T)
local-2 (LOCAL) --> NIL
local-3 (LOCAL) --> (/ . /)
local-4 (LOCAL) --> /
local-5 (LOCAL) --> 202
local-6 (LOCAL) --> (TPL::*INSIDE-READ-EVAL-PRINT*)
local-7 (LOCAL) --> IDE.BASE::IDE-TOP-LEVEL-READ-EVAL-PRINT-LOOP
START-INTERACTIVE-TOP-LEVEL
*TERMINAL-IO* (REQUIRED) --> #<LISTENER-PANE :LISTENER-PANE in IDE GUI
@
#x20b60402>
FUNCTION (REQUIRED) --> TPL:TOP-LEVEL-READ-EVAL-PRINT-LOOP
ARGS (REQUIRED) --> NIL
INITIAL-BINDINGS (KEYWORD) --> :UNSUPPLIED
local-0 (LOCAL) --> TPL:TOP-LEVEL-READ-EVAL-PRINT-LOOP
local-1 (LOCAL) -->
((INSPECT::*INSPECTOR-HOOK* . INSPECT::*INSPECTOR-HOOK*)
(SCM::*ED-HOOK* . SCM::*ED-HOOK*)
(*PRINT-PPRINT-DISPATCH*
. #S(EXCL::PPRINT-DISPATCH-STRUCT :CONSES-WITH-CARS #<EQ hash-table with
72 entries
@
#x201228fa>
:STRUCTURES #<EQUAL hash-table with 0
entries
@
#x20122922>
:OTHERS (#S(EXCL::ENTRY
:TEST
#<Function FUNCTION-CALL-P>
:FN
#<Function ALTERNATIVE-FN-CALL>
:FULL-SPEC
((-5)
(SATISFIES
EXCL::FUNCTION-CALL-P)))
#S(EXCL::ENTRY
:TEST
#<Function CONSP>
:FN
#<Function
PPRINT-FILL-NO-ANNOTATION>
:FULL-SPEC
((-10) CONS))
#S(EXCL::ENTRY
:TEST
#<Function ALWAYS-TRUE>
:FN
#<Function
DEFAULT-USE-PRINT-OBJECT>
:FULL-SPEC
((-10) T)))))
(EXCL::*BREAK-ON-WARNINGS* . EXCL::*BREAK-ON-WARNINGS*)
(*BREAK-ON-SIGNALS* . *BREAK-ON-SIGNALS*)
(*RANDOM-STATE* MAKE-RANDOM-STATE NIL)
(EXCL::*CASE-MODE* IF
(EQ *CURRENT-CASE-MODE* :CASE-INSENSITIVE-UPPER) :STD :WW)
(*PACKAGE* FIND-PACKAGE :USER) (*PRINT-LINES*)
(*PRINT-MISER-WIDTH* . 40) (*PRINT-RIGHT-MARGIN*)
(*PRINT-READABLY*) (*PRINT-GENSYM* . T) (*PRINT-ARRAY* . T)
(*PRINT-CASE* QUOTE :UPCASE) (*PRINT-CIRCLE*) (*PRINT-LENGTH*)
(*PRINT-LEVEL*) (*PRINT-RADIX*) (*PRINT-BASE* . 10)
(*PRINT-PRETTY* SYS:GLOBAL-SYMBOL-VALUE '*PRINT-PRETTY*)
(*PRINT-ESCAPE* . T)
(EXCL::*DEBUG-ENCLOSE-PRINTER-ERRORS*
. EXCL::*DEBUG-ENCLOSE-PRINTER-ERRORS*)
(*ENCLOSE-PRINTER-ERRORS* . *ENCLOSE-PRINTER-ERRORS*)
(*PRINT-NICKNAME* . *PRINT-NICKNAME*) (*READ-BASE* . 10)
(*READ-DEFAULT-FLOAT-FORMAT* QUOTE SINGLE-FLOAT)
(EXCL::STD-LISP-READTABLE COPY-READTABLE EXCL::STD-LISP-READTABLE)
(*READTABLE* COPY-READTABLE NIL))
local-2 (LOCAL) --> NIL
local-3 (LOCAL) --> NIL
local-4 (LOCAL) --> #<MP:PROCESS Listener 1(4) @ #x20b601e2>
local-5 (LOCAL) --> #<LISTENER-PANE :LISTENER-PANE in IDE GUI @
#x20b60402>
local-6 (LOCAL) --> 126
local-7 (LOCAL) -->
(TPL::INITIAL-LISTENER #<MP:PROCESS Listener 1(4) @ #x20b601e2>
:NORMAL-EXTERIOR #<box 0 0 963 709> IDE.BASE::PROMPT-MARK
#S(CG.TEXT-EDIT-PANE.MARK:MARK :POSITION 7345) :MARGIN-OFFSET-TOP
0 :MARGIN-OFFSET-LEFT 0 :HAS-CARET-P T :STATE :NORMAL :EXTERIOR
#<Vector @ #x5f6d152> :DIALOG-UNITS-P NIL :OWNER
#<LISTENER-FRAME :LISTENER-FRAME in IDE GUI @ #x20b60422>
:DIALOG-HELP-FILE "Debug Window" :CHILD-NAME :LISTENER-PANE
:PARENT #<LISTENER-FRAME :LISTENER-FRAME in IDE GUI @ #x20b60422>
:INITIAL-LISTENER T :BURY-ON-TAB-DESELECTION T :LEFT 0 :TOP 23
:WIDTH 963 :HEIGHT 709)
local-8 (LOCAL) --> TPL::INITIAL-LISTENER
local-9 (LOCAL) --> #<STANDARD-GENERIC-FUNCTION
(SETF IDE.BASE::LISTENER-READY)>
local-10 (LOCAL) --> 202
local-11 (LOCAL) --> :BAD-FRAME-VAR-VALUE
local-12 (LOCAL) --> (:HEIGHT 709)
local-13 (LOCAL) --> 200
IDE-LISTENER-PROCESS-TOP
INITIAL-LISTENER (KEYWORD) --> T
local-0 (LOCAL) --> T
local-1 (LOCAL) --> #<LISTENER-PANE :LISTENER-PANE in IDE GUI @
#x20b60402>
local-2 (LOCAL) --> 0
local-3 (LOCAL) --> T
local-4 (LOCAL) --> T
local-5 (LOCAL) --> #<Vector @ #x20ed213a>
local-6 (LOCAL) --> #<MP:PROCESS Listener 1(4) @ #x20b601e2>
local-7 (LOCAL) --> NIL
local-8 (LOCAL) -->
#<STANDARD-GENERIC-FUNCTION (SETF SYS::PROCESS-PROPERTY-LIST)>
local-9 (LOCAL) --> #<STANDARD-GENERIC-FUNCTION
(SETF IDE.BASE::LISTENER-READY)>
UNKNOWN (UNKNOWN) --> NIL
----------------------------------------------
Some Special Variables in Process "Listener 1"
----------------------------------------------
* NIL
** NIL
*** NIL
*ADDITIONAL-LOGICAL-PATHNAME-NAME-CHARS* NIL (global)
*BREAK-ON-SIGNALS* NIL (global)
*CL-DEFAULT-SPECIAL-BINDINGS* ((INSPECT::*INSPECTOR-HOOK*
. INSPECT::*INSPECTOR-HOOK*)
(SCM::*ED-HOOK* . SCM::*ED-HOOK*)
(*PRINT-PPRINT-DISPATCH*
. #S(EXCL::PPRINT-DISPATCH-STRUCT
:CONSES-WITH-CARS
#
...))
...) (global)
*CLEAR-INPUT-ON-ERROR* T (global)
*CLTL1-IN-PACKAGE-COMPATIBILITY-P* NIL (global)
*COMPILE-ADVICE* NIL (global)
*COMPILE-FILE-PATHNAME* NIL (global)
*COMPILE-FILE-TRUENAME* NIL (global)
*COMPILE-PRINT* NIL (global)
*COMPILE-VERBOSE* T (global)
*COMPILER-NOT-AVAILABLE-WARNING* T (global)
*CURRENT-CASE-MODE* :CASE-INSENSITIVE-UPPER (global)
*DAYLIGHT-SAVING-TIME-OBSERVED* T (global)
*DEBUG-IO* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*DEBUGGER-HOOK* NIL (global)
*DEFAULT-EXTERNAL-FORMAT* :DEFAULT (global)
*DEFAULT-PATHNAME-DEFAULTS* #P"C:\\Program Files\\acl70-trial\\" (global)
*DRIBBLE-BUG-HOOKS* NIL (global)
*ELI-DAEMON-SOCKET-HOOK* #<Function (:INTERNAL
(:TOP-LEVEL-FORM "eli.cl" 2308)
0)
@ #x202d0f2a> (global)
*ENABLE-PACKAGE-LOCKED-ERRORS* T (global)
*ENCLOSE-PRINTER-ERRORS* T (global)
*ERROR-OUTPUT* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*FASL-CIRCLE-DEFAULT* T (global)
*FASL-DEFAULT-TYPE* "fasl" (global)
*FEATURES* (:CL-PPCRE :ASDF :ALLEGRO-CL-TRIAL
...) (global)
*GC-AFTER-HOOK* #<Closure DEFAULT-GC-AFTER-HOOK @
#x200123aa> (global)
*GENSYM-COUNTER* 826 (global)
*GLOBAL-GC-BEHAVIOR* :AUTO-AND-WARN (global)
*IGNORE-PACKAGE-NAME-CASE* NIL (global)
*INIT-FILE-NAMES* (".clinit.cl" "clinit.cl") (global)
*INITIAL-TERMINAL-IO* #<TERMINAL-SIMPLE-STREAM
[initial terminal io] fd 0/1 @
#x2011715a> (global)
*INTERN-ALLOWS-SYMBOL* T (global)
*LIBFASL* NIL (global)
*LOAD-DOCUMENTATION* T (global)
*LOAD-FOREIGN-TYPES* ("dll" "exe") (global)
*LOAD-LOCAL-NAMES-INFO* T (global)
*LOAD-PATHNAME* NIL (global)
*LOAD-PRINT* NIL (global)
*LOAD-SOURCE-FILE-INFO* T (global)
*LOAD-TRUENAME* NIL (global)
*LOAD-VERBOSE* T (global)
*LOAD-XREF-INFO* T (global)
*LOCALE* #<locale "English_United States" [(:E-CRLF
:1252-BASE)]
@ #x206efdda> (global)
*MACROEXPAND-HOOK* FUNCALL (global)
*MODULES* ("STREAMC" "ASDF" "efft-1252-base"
...) (global)
*OPEN-RENAME-FUNCTION* #<Function OPEN-RENAME-FUNCTION> (global)
*OPEN-RENAME-PREFIX* "" (global)
*OPEN-RENAME-SUFFIX* "bak" (global)
*PACKAGE* #<The COMMON-GRAPHICS-USER package>
*PATHNAME-CUSTOMARY-CASE* :LOWER (global)
*PPRINT-GRAVITY* T (global)
*PRINT-ARRAY* T (global)
*PRINT-BASE* 10
*PRINT-CASE* :UPCASE (global)
*PRINT-CIRCLE* NIL (global)
*PRINT-CIRCLE-GRAVITY* T (global)
*PRINT-ESCAPE* T (global)
*PRINT-GENSYM* T (global)
*PRINT-LENGTH* NIL (global)
*PRINT-LEVEL* NIL (global)
*PRINT-LINES* NIL (global)
*PRINT-MISER-WIDTH* 40 (global)
*PRINT-NICKNAME* NIL (global)
*PRINT-PPRINT-DISPATCH* #S(EXCL::PPRINT-DISPATCH-STRUCT :CONSES-WITH-CARS
#<EQ hash-table with 72 entries
@
#x201228fa>
...) (global)
*PRINT-PRETTY* T (global)
*PRINT-RADIX* NIL (global)
*PRINT-READABLY* NIL
*PRINT-RIGHT-MARGIN* NIL (global)
*PRINT-STARTUP-MESSAGE* ((:COMPILER-SWITCHES . T)
(:COMPILER-EXPLAIN . T)
(:COMPILER-OPTIMIZATIONS . T) ...) (global)
*PRINT-STRUCTURE* T (global)
*QUERY-IO* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*RANDOM-STATE* #S(RANDOM-STATE :MTI 166 ...) (global)
*READ-BASE* 10
*READ-DEFAULT-FLOAT-FORMAT* SINGLE-FLOAT (global)
*READ-EVAL* T (global)
*READ-INIT-FILES* (".clinit.cl" "clinit.cl") (global)
*READ-SUPPRESS* NIL
*READTABLE* #<readtable @ #x200e7c5a> (global)
*RECORD-SOURCE-FILE-INFO* T (global)
*RECORD-XREF-INFO* T (global)
*REDEFINITION-PATHNAME-COMPARISON-HOOK* NIL (global)
*REDEFINITION-WARNINGS* ('PROJECT ':OBSOLETE :SETF-METHOD
...) (global)
*RESTART-ACTIONS* NIL (global)
*RESTART-APP-FUNCTION* NIL (global)
*RESTART-INIT-FUNCTION* (LAMBDA NIL
(SET (INTERN # :CG.BASE) NIL)
...) (global)
*SAVE-FUNCTION-LAMBDA-EXPRESSION* NIL (global)
*SIGNALS* ((16 . SYS::SIGALRM-HANDLER)
(14 . SYS::SIGALRM-HANDLER)
(1000 . EXCL::SIG-HANDLER-STACK-OVERFLOW)
...) (global)
*SOURCE-PATHNAME* NIL (global)
*STANDARD-INPUT* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*STANDARD-OUTPUT* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*STD-CONTROL-OUT-TABLE* #<Vector @ #x200e2952> (global)
*STEP-PRINT-LENGTH* 5 (global)
*STEP-PRINT-LEVEL* 4 (global)
*STRICT-PROBE-FILE* NIL (global)
*SYSTEM-MESSAGES* NIL (global)
*TENURED-BYTES-LIMIT* 8388608 (global)
*TERMINAL-CONTROL-IN-TABLE* #<Vector @ #x200e29da> (global)
*TERMINAL-IO* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*TRACE-OUTPUT* #<LISTENER-PANE :LISTENER-PANE#1= in IDE GUI @
#x20b60402>#1#
*TRACE-PRINT-LENGTH* NIL (global)
*TRACE-PRINT-LEVEL* NIL (global)
------------------------------
Output from print-system-state
------------------------------
LISP-IMPLEMENTATION-TYPE: International Allegro CL Trial Edition
LISP-IMPLEMENTATION-VERSION: 7.0 [Windows] (Jul 21, 2006 17:02)
MACHINE-TYPE: x86
MACHINE-VERSION: x86
SOFTWARE-TYPE: Microsoft Windows 98/Me and 2000/XP/Server 2003
SOFTWARE-VERSION: Generic
SHORT-SITE-NAME: IL27-7496
PRESTOP: NIL
CL-VERSION-TYPE: :FINAL
CL-GENERATION-NUMBER: 1
*FEATURES*: :CL-PPCRE, :ASDF, :ALLEGRO-CL-TRIAL, :IDE,
:COMMON-GRAPHICS, :ACL-SOCKET, :HIPER-SOCKET, :PROFILER,
:MULTIPROCESSING, :FLAVORS, :LITTLE-ENDIAN, :GSGC,
:COMPILER, :USE-STRUCTS-IN-COMPILER, :CLOS,
:VERIFY-CAR-CDR, :DYNLOAD, :DLWIN, :X86, :MSWINDOWS,
:MICROSOFT, :MICROSOFT-32, :ENCAPSULATING-EFS,
:RELATIVE-PACKAGE-NAMES, :MODULE-VERSIONS, :IEEE,
:IEEE-FLOATING-POINT, :CONFORMING-IEEE, :ICS, :COMMON-LISP,
:ANSI-CL, :DRAFT-ANSI-CL-2, :X3J13, :ALLEGRO, :EXCL,
:FRANZ-INC, :ALLEGRO-VERSION>=, :ALLEGRO-VERSION=,
:OS-THREADS, :PROCESS7, :SYMBOL-VALUE-VECTOR,
:DYNLOAD-ACL-LIBRARY, :ALLEGRO-V7.0, :SSL-SUPPORT.
*MODULES*: "STREAMC", "ASDF", "efft-1252-base", "EF-1252",
"efft-latin1-base", "efft-void", "efft-utf8-base",
"IDE.INTRO", "IDE.NAVIGATOR", "IDE.FORM", "RES", "PE",
"IDE.PROJECT", "IDE.INSPECTOR", "IDE.APROPOS", "IDE.TRACE",
"IDE.CLASS-GRAPHER", "IDE.FIND-DEFINITIONS",
"IDE.FIND-IN-FILES", "IDE.EDITOR", "IDE.GRAPHER",
"IDE.CLASS-BROWSER", "IDE.CLIPBOARD", "IDE.KEYSHORT",
"IDE.PACKAGE-LIST", "IDE.PATCH-DIALOG",
"IDE.PROCESS-BROWSER", "IDE.WINDOW-LIST", "IDE.BASE", "IDE",
"CG.GRID-WIDGET.DRAG-AND-DROP", "CG.PROPERTY",
"CG.YES-NO-STRING", "CG.GRID-WIDGET",
"CG.OUTLINE.EDIT-IN-PLACE", "CG.SAMPLE-FILE-MENU",
"CG.PAREN-MATCHING", "CG.RICH-EDIT-PANE.CLIPBOARD",
"CG.RICH-EDIT-PANE.PRINTING", "CG.RICH-EDIT",
"CG.EDIT-IN-PLACE", "CG.STRING-DIALOG",
"CG.MULTI-LINE-LISP-TEXT", "CG.TEXT-EDIT-PANE.FILE-IO",
"CG.TEXT-EDIT-PANE.MARK", "CG.LISP-EDIT-PANE",
"CG.RICH-EDIT-PANE", "CG.CHOOSE-PRINTER",
"CG.DIRECTORY-DIALOG", "CG.MESSAGE-DIALOG",
"CG.TEMPLATE-STRING", "CG.MULTI-LINE-EDITABLE-TEXT",
"CG.LISP-TEXT", "CG.TEXT-EDIT-PANE", "CG.STATUS-BAR",
"CG.CHOICE-LIST", "CG.FIND-STRING-DIALOG",
"CG.MULTI-PICTURE-BUTTON.TOOLTIP",
"CG.MULTI-PICTURE-BUTTON.DRAG-AND-DROP",
"CG.DROPPING-OUTLINE", "CG.OUTLINE.DRAG-AND-DROP",
"CG.PICTURE-WIDGET.PALETTE", "CG.UP-DOWN-CONTROL",
"CG.STATIC-TEXT", "CG.EDITABLE-TEXT", "CG.LETTERED-MENU",
"CG.WEB-BROWSER.DDE", "DDE", "CG.YES-NO-LIST",
"CG.DRAWABLE.CLIPBOARD", "CG.MULTI-PICTURE-BUTTON",
"CG.OUTLINE", "CG.PICTURE-WIDGET", "CG.HEADER-CONTROL",
"CG.PROGRESS-INDICATOR", "CG.COMBO-BOX", "CG.LIST-VIEW",
"CG.SCROLL-BAR", "CG.TRACKBAR", "CG.TAB-CONTROL",
"CG.TEXT-WIDGET", "CG.BUTTON", "CG.CHECK-BOX",
"CG.RADIO-BUTTON", "CG.SHORTCUT-MENU", "CG.MENU.TOOLTIP",
"OLE-DEV", "OLECOMP", "OLE", "SHELLGUIDS", "FFCOMPAT",
"CG.WEB-BROWSER", "CG.PIXMAP.PRINTING", "CG.CURSOR-PIXMAP",
"CG.PROJECT-WINDOW", "CG.BITMAP-PANE.CLIPBOARD",
"CG.PIXMAP-WIDGET", "CG.DRAWABLE", "CG.GROUP-BOX",
"CG.TEXT-OR-COMBO", "CG.COMMON-CONTROL", "CG.ITEM-LIST",
"CG.SCROLL-BAR-MIXIN", "CG.TOGGLING-WIDGET", "CG.MENU",
"CG.CLIPBOARD.PIXMAP", "CG.CLIPBOARD-STACK", "CG.COMTAB",
"CG.DRAG-AND-DROP-IMAGE", "CG.HOTSPOT", "CG.ICON-PIXMAP",
"CG.TOOLTIP", "CG.TRAY", "CG.GESTURE-EMULATION",
"CG.PIXMAP.FILE-IO", "CG.GET-PIXMAP", "CG.PIXMAP.ROTATE",
"CG.FILL-TEXTURE", "CG.BITMAP-PANE", "CG.COLOR-DIALOG",
"CG.DIRECTORY-DIALOG-OS", "CG.FILE-DIALOG",
"CG.FONT-DIALOG", "CG.LISP-WIDGET", "CG.OS-WIDGET",
"CG.MCI", "CG.KEYBOARD-SHORTCUTS", "CG.CARET",
"CG.CLIPBOARD", "CG.CURVE", "CG.DRAG-AND-DROP",
"CG.GET-POSITION", "CG.GRAPHICS-CONTEXT", "CG.ICON",
"CG.PALETTE", "CG.SELECTED-OBJECT", "CG.TIMER",
"CG.TOOLBAR", "CG.WRAP-STRING", "CG.OS-WINDOW", "CG.PIXMAP",
"CG.PRINTING", "CG.SCALING-STREAM", "CG.BITMAP-STREAM",
"CG.UTILITY-DIALOG", "CG.DIALOG-ITEM", "CG.WIN", "CG.BASE",
"CG", "CG-DDE-UTILS", "EFMACS", "IORDEFS", "IODEFS",
"WINAPI-DEV", "WINAPI", "DEVELENV", "URI", "MCOMBIN",
"CONSTRUCTOR", "LOOP", "SOCKET", "SOCK", "DISASM", "DIS386",
"INSPECT", "PROF-S", "PROF", "TRACE", "WALKER", "XREF-S",
"XREF", "SCM", "EMACS", "ELI", "SOCK-S", "LZE", "LEP",
"PROC2COMMON", "PROCESS", "COMPFTYPE", "DEFFTYPE",
"FOREIGN", "FOREIGN-FUNCTIONS", "DEFSYSTEM", "DEFSYS",
"DEFSYS-S", "TPL-PROC", "DEBUG", "TPL-DEBUG", "SRECORD",
"REGEXP", "SAFESEQ", "SEQ2", "LIST2", "PROC2-S", "EXCL",
"FOREIGN-S", "COMPILER", "COMPILER-S", "PPRINT", "TOPLEVEL",
"COND", "FRAME", "IQFRAME", "ICS", "EF-UTF8", "EF-VOID",
"EF-LATIN1", "EF-E-CRCRLF", "EF-E-CRLF", "EF-CRCRLF",
"EF-CRLF".
*CURRENT-CASE-MODE*: :CASE-INSENSITIVE-UPPER
*PRINT-CASE*: :UPCASE
*DUMPLISP-GENERATION-TICK*: 1
*DEFAULT-PATHNAME-DEFAULTS*: #P"C:\\Program Files\\acl70-trial\\"
*REQUIRE-SEARCH-LIST*: :FIRST, #P"sys:;code;.fasl",
#P"sys:;private;.fasl", #P"sys:;clos;.fasl",
#P"sys:;sys;.fasl", #P"sys:;winapi;.fasl",
#P"sys:;ole;.fasl",
(:LIB-BUNDLE #P"sys:;code;.fasl"),
(:LIB-BUNDLE #P"sys:;private;.fasl"),
(:LIB-BUNDLE #P"sys:;clos;.fasl"),
(:LIB-BUNDLE #P"sys:;sys;.fasl"),
(:LIB-BUNDLE #P"sys:;winapi;.fasl"),
(:LIB-BUNDLE #P"sys:;ole;.fasl").
*AUTOLOAD-SEARCH-LIST*: :FIRST, #P"sys:;code;.fasl",
#P"sys:;private;.fasl", #P"sys:;clos;.fasl",
#P"sys:;sys;.fasl", #P"sys:;winapi;.fasl",
#P"sys:;ole;.fasl",
(:LIB-BUNDLE #P"sys:;code;.fasl"),
(:LIB-BUNDLE #P"sys:;private;.fasl"),
(:LIB-BUNDLE #P"sys:;clos;.fasl"),
(:LIB-BUNDLE #P"sys:;sys;.fasl"),
(:LIB-BUNDLE #P"sys:;winapi;.fasl"),
(:LIB-BUNDLE #P"sys:;ole;.fasl").
*LOAD-SEARCH-LIST*: #P"", #P(:TYPE "fasl"), #P(:TYPE "cl"),
#P(:TYPE "lisp").
*LOCALE*: #<locale "English_United States" [(:E-CRLF :1252-BASE)] @
#x206efdda>
Command line arguments:
"C:\\Program Files\\acl70-trial\\allegro-ansi.exe" "-I"
"C:\\Program Files\\acl70-trial\\allegro-ansi.dxl"
This Lisp expires in 23 days.
The processor affinity mask is 1
Licensee: Damien Kick, Motorola
The stored home location is C:\Program Files\acl70-trial\.
The scheduler has been started in this image.
Current optimization qualities: ((SAFETY 1) (SPACE 1) (SPEED 1)
(COMPILATION-SPEED 1) (DEBUG 2))
Current IDE patches:
ide-form-02: "Form skeleton code generation was broken in
open-files-in-gnu-emacs mode."
ide-project-05: "Default Run Project standard output to IDE listener (not
console)."
ide-inspector-02: "Inspecting a stack frame in the IDE Inspector showed no info."
ide-find-in-files-01: "Stop downcasing filenames in the Find In Files dialog."
ide-editor-03: "Don't downcase filenames in editor or leave auto-selected
buffer selected."
al009-01: "The IDE could set the global value of *standard-output* to an IDE
listener."
al008-01: "IDE listener hang after error evaluating selected code above the
prompt."
al007-01: "The :pop top-level command in the IDE GUI process would exit lisp."
al006-01: "Options dialog clipped its buttons when title-bar height is large."
al005-01: "IDE prompt position confused after typing a space before the prompt."
al004-01: "IDE editor breaks if you click on long line past column 1024."
al003-01: "Two right-button menus could appear in the IDE for a
multi-picture-button."
al002-01: "Find Definitions did not find CG/IDE source in the right directory."
al001-01: "An IDE listener evaluation trapped EOF errors in user code."
Current CG patches:
cg-grid-widget-01: "Resizing a grid-widget subsection with a sub-minimum-size
sibling."
cg-paren-matching-02: "The IDE editor colorized multiple escape symbol names as
comments."
cg-rich-edit-02: "Rich-edit-dialog .bil files from before 7.0 have a package
glitch."
cg-text-edit-pane-03: "Read-only on a standalone text-edit-pane returned the
initial value."
cg-status-bar-01: "A (non-common) status-bar arbitrarily converted newlines to
spaces."
cg-multi-picture-button-01: "Make multi-picture-buttons handle masked pixmaps."
cg-outline-01: "No way to invoke on-change when click on an outline's currrent
value."
cg-list-view-02: "List-view auto-size truncated header if longer than all item
strings."
cg-tab-control-02: "Adding a widget to the current tab of a hidden tab-control
left the widget exposed."
cg-shortcut-menu-01: "Misplaced shortcut menus on a second monitor that uses
negative coordinates."
cg-web-browser-02: "Make invoke-private-html-browser work better with Firefox."
cg-menu-02: "IDE Menu Editor could confuse unrelated menus."
cg-os-widget-01: "Screen device-context glitch on a process switch at a precise
moment."
cg-printing-01: "A new double-sided option for printing."
cg-dialog-item-06: "Explicitly changing the \"available\" property of a widget
on a hidden tab-control tab."
ak003-01: "An IDE exit error could occur after control-insert in the listener."
ak002-01: "Option to not show the console on error in a debuggable CG standalone."
ak001-01: "Child windows resized incorrectly when parent resizing turns on
scrollbar."
Current COMPILER patches:
ab014-01: "Fix fasl file creation when *print-radix* is t."
ab012-01: "Implement ignore declaration for functions."
ab011-01: "[x86 only] Speed up immediate floats at high speeds."
ab010-01: "Fix def-foreign-variable access compilation."
ab009-01: "Fix multiply/accumulate bug on power 32-bit acchitectures."
ab007-01: "Fix infinite macroexpansion of declare forms."
ab006-01: "Fix a type propagation bug with ftype proclamations."
ab005-01: "Fix package fasling on large indexed files."
ab004-01: "Fix compilation of (symbol-function nil)."
ab003-01: "Fix svref compilation with * element-type-declaration."
ab002-01: "Fix modrem type propagation."
ab001-01: "Extend fasl writer to allow for long constant lists."
Current LISP-WITH-BUNDLE-UPDATE patches:
aa012-01: "Shadow patch for code/ef-fat-le.fasl."
aa011-01: "Shadow patch for code/ef-jvm-utf8.fasl"
Current LISP patches:
aa024-01: "Have user-homedir prefer HOMEDRIVE/HOMEPATH over HOME."
aa023-01: "Add support for proper signalling of ssl errors."
aa022-01: "Fix cached argument count when method is removed."
aa021-02: "The contents of the previous version of this patch have been
relocated to code/excl.002."
aa020-01: "Support for streamp patch."
aa019-01: "Fix method combination initialization."
aa018-01: "Fix variable-information for specials when no env is given."
aa017-01: "Fix make-instances-obsolete to retain specialized slot methods."
aa013-01: "Fix dividing of a ratio by zero giving 0 rather than error."
aa010-01: "Fix infinite macroexpansion of declare and simple-case forms."
aa009-01: "Speedup native-to-string for efs :latin1-base and :octets."
aa008-01: "Fix function spec handler for labels, flets,:internal."
aa007-01: "Fix overzealous effective-slot-definition sharing."
aa006-01: "Fix rational comparisons with infinities and NaNs."
aa005-01: "Fix short and char arguments to foreign callbacks."
aa004-01: "wild-pathname-p no longer considers ? and * wild, when part of a
component."
aa003-01: "Fix the pretty-printing of degenerate handler-case forms."
[Not loaded: withdrawn patch]
aa003-02: "This patch has been replaced by full-fasl patch code/pprint.fasl"
[Not loaded: withdrawn patch]
aa002-01: "Fix non-pretty tab printing."
aa001-01: "Add `syntax' keyword argument to common-lisp:namestring."
Current BUNDLE-VERSION-STAMP patches:
aa012-01: "Shadow patch for code/ef-fat-le.fasl."
aa011-01: "Shadow patch for code/ef-jvm-utf8.fasl"
Current LISP-BUILDTIME-BUNDLE-VERSION-STAMP patches:
aa012-01: "Shadow patch for code/ef-fat-le.fasl."
aa011-01: "Shadow patch for code/ef-jvm-utf8.fasl"
Current SYSTEM patches:
olecomp-02: "v1: support for ole.001;
v2: support for ole.002."
ole-dev-02: "v1: support for ole.001;
v2: support for ole.002."
ole-02: "v1: extract lisp definitions from typelibs;
v2: update to v1 patch."
uri-01: "Make sure #u is defined properly."
loop-02: "v1: remove unused variable warning for package iteration;
v2: remove unused variable warnings for for-across iteration."
sock-02: "v1: Preliminary IPv6 support;
v2: make waiting for socket I/O more efficient."
trace-01: "v1: Fix trace.fasl to no longer be dependent on changes to remhash."
lep-01: "v1: support for i18n in xemacs."
proc2common-05: "v1: fix mp:process-kill bug;
v2: fix throwing to tag thread-kill bug;
v3: thread resources exhaused fix;
v4: improve thread accounting efficiency;
v5: prevent process-interrupt of a terminated process corruption."
compftype-01: "v1: Fix zero-extension bugs in Alpha 32-bit."
defftype-02: "v1: Fix zero-extension bugs in Alpha 32-bit;
v2: define :signed-nat & :unsigned-nat."
debug-01: "v1: fix profiler for unknown C functions."
proc2-s-02: "v1: fix mp:process-kill bug;
v2: thread resources exhaused fix."
proc2base-04: "v1: thread resources exhaused fix;
v2: improve thread accounting efficiency;
v3: clear clock queue on restart;
v4: fix clock queue corruption."
excl-02: "v1: support for improved blowfish support;
v2: base64-encode-stream, support for another patch."
init-02: "v1: internal change for mp patch;
v2: sync for upcoming Trial release."
init2-01: "v1: sync for upcoming Trial release."
pprint-02: "v1: Fix pprint-dispatch for handler-case.
v2: Fix pretty-printing in runtimes."
aclstartup-02: "v1: make SSL work from init files; remove ACL_STARTUP_HOOK;
v2: sync for upcoming Trial release."
misc-02: "v1: Fix misc.fasl to no longer be dependent on changes to gethash;
v2: support for aclstart.001/ssl.004"
streamd-02: "v1: large file support.
v2: fix :if-exists :append open option to be more robust."
syscall-01: "Add option to run-shell-command for windows to not share file
handles."
filesys-01: "v1: support for large file support."
reader-01: "Make sure #u is defined properly."
hash-05: "v1: Fix maphash to work with other hash fcns on dirty hashtable.
v2: Enhance cons hashing speed.
v3: Enhance cons hash-code generation speed.
v4: Enhance remhash performance.
v5: Fix size calculation in make-hash-table."
seq-01: "v1: Enhance remove-duplictes speed for simple calls."
startup-03: "v1: sync for upcoming Trial release;
v2: support for improved blowfish support;
v3: exports for mime/send-letter w/attachments"
Object file signatures: _ACLID_lisp_build_1500
IDE: 1.48.2.20.2.16
OLE: 3.2.6.2.26.8
CG: 1.54.2.17.2.12
WinAPI: 2.2.6.5.16.2
disass386: $Revision: 1.44.22.2 $
inspect: $Revision: 1.105.6.2 $
prof: $Revision: 2.118.6.4.2.1 $
trace: $Revision: 1.82.22.2.34.1 $
emacs: $Revision: 1.29 $
process: $Revision: 1.139 $
foreign: $Revision: 1.178.60.1 $
ffdyn: $Revision: 2.39.26.1 $
Presto fasl set:
----------------------------
Configuration Customizations
----------------------------
COLOR-FOR-CHARACTERS [default #S(RGB :RED 190 :GREEN 0 :BLUE 0)]
--> #S(RGB :RED 190 :GREEN 0 :BLUE 0)
COLOR-FOR-EXTERNAL-ALLEGRO-SYMBOLS [default #S(RGB
:RED
128
:GREEN
0
:BLUE
128)]
--> #S(RGB :RED 128 :GREEN 0 :BLUE 128)
COLOR-FOR-EXTERNAL-CG-SYMBOLS [default #S(RGB
:RED
200
:GREEN
100
:BLUE
0)]
--> #S(RGB :RED 200 :GREEN 100 :BLUE 0)
COLOR-FOR-EXTERNAL-CL-SYMBOLS [default #S(RGB
:RED
0
:GREEN
0
:BLUE
180)]
--> #S(RGB :RED 0 :GREEN 0 :BLUE 180)
COLOR-FOR-GLOBAL-VARIABLES [default #S(RGB :RED 240 :GREEN 0 :BLUE 0)]
--> #S(RGB :RED 240 :GREEN 0 :BLUE 0)
COLOR-FOR-STRINGS [default #S(RGB :RED 190 :GREEN 0 :BLUE 0)]
--> #S(RGB :RED 190 :GREEN 0 :BLUE 0)
FIXED-FONT [default NIL]
--> #.(MAKE-FONT-EX :MODERN "FixedSys" 13)
PROPORTIONAL-FONT [default NIL]
--> #.(MAKE-FONT-EX NIL "Tahoma / Default" 11)
PATCH-REMINDER-PREVIOUS-TIME [default NIL]
--> 3362507987
-------------------------------------------
More information about the slime-devel
mailing list