[Openmcl-devel] Error when edit a simple lisp file in Clozure CL's editor
Chun Tian (binghe)
binghe.lisp at gmail.com
Mon Mar 31 13:36:14 PDT 2008
Hi, Clozure CL developers
It's strange that following lisp source file cannot be edited by
"Clozure CL.app" (I'm using the newest version built from SVN)
=
=
=
=
=
=
========================================================================
;;;; -*- Mode: lisp; Syntax: ansi-common-lisp; Base: 10; Package: cl-
user; -*-
(in-package :cl-user)
=
=
=
=
=
=
========================================================================
I think the header part of my lisp file made something wrong. Hope it
can be fixed.
Backtrace like this:
*** Error in event process: value -7 is not of the expected type
CCL::UVECTOR.
(4429B8) : 0 (FUNCALL #'#<Anonymous Function #x300041BD3B6F>
#<TYPE-ERROR #x300041F0F24D>) 149
(#:G15679)
#:G15676: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFE2B0>
#:G15679: #<TYPE-ERROR #x300041F0F24D>
(4429E0) : 1 (SIGNAL #<TYPE-ERROR #x300041F0F24D> [...]) 989
(CONDITION &REST CCL::ARGS)
CONDITION: #<TYPE-ERROR #x300041F0F24D>
CCL::ARGS: NIL
CCL::%HANDLERS%: ((ERROR) (ERROR))
CCL::TAG: (CONDITION #<COMPILED-LEXICAL-CLOSURE #x493DCF>)
CCL::HANDLERS: CCL::*BACKTRACE-CONTEXTS*
CCL::FN: #<COMPILED-LEXICAL-CLOSURE #x493DCF>
(442A38) : 2 (%ERROR #<TYPE-ERROR #x300041F0F24D> NIL 558452) 93
(CONDITION CCL::ARGS CCL::ERROR-POINTER)
CONDITION: #<TYPE-ERROR #x300041F0F24D>
CCL::ARGS: NIL
CCL::ERROR-POINTER: 558452
(442A60) : 3 (FUNCALL #'#<Anonymous Function #x30004056249F>) 3821
NIL
CCL::XP: #<A Foreign Pointer #x7FFF5FBFDF80>
CCL::XCF: #<A Foreign Pointer #x442BA0>
CCL::FRAME-PTR: 558452
CCL::FN: #<Compiled-function HEMLOCK-INTERFACE:DELETE-REGION
#x3000416F1E6F>
CCL::OP0: 205
CCL::OP1: 214
CCL::OP2: 5
CCL::SKIP: 3
CCL::TYPENAME: CCL::UVECTOR
(442AC0) : 4 (FUNCALL-WITH-ERROR-REENTRY-DETECTION
#<COMPILED-LEXICAL-CLOSURE #x493C1F>) 205
(CCL::THUNK)
CCL::THUNK: #<COMPILED-LEXICAL-CLOSURE #x493C1F>
COUNT: 0
CCL::*ERROR-REENTRY-COUNT*: 1
(442B00) : 5 (FUNCALL #'#<CCL::%XERR-DISP> 17591849974508) 493
(#:G59050)
#:G59050: 17591849974508
#:G59056: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFD760>
CCL::XP: #<A Foreign Pointer #x7FFF5FBFDF80>
CCL::XCF: #<A Foreign Pointer #x442BA0>
#:G59057: #<COMPILED-LEXICAL-CLOSURE #x493C1F>
(442B38) : 6 (%PASCAL-FUNCTIONS% 2 17591849974508) 405
(CCL::INDEX CCL::ARGS-PTR-FIXNUM)
CCL::INDEX: 2
CCL::ARGS-PTR-FIXNUM: 17591849974508
CCL::LISP-FUNCTION: #<Compiled-function CCL::%XERR-DISP (Non-
Global) #x3000405636EF>
WITHOUT-INTERRUPTS: NIL
CCL::*CALLBACK-TRACE-P*: NIL
(442BA0) : 8 (DELETE-REGION
#<Hemlock Region "Unknown file option: "syntax"/
Unknown file option: "base"/#<error printing object>) 2255
(HEMLOCK-INTERFACE:REGION)
HEMLOCK-INTERFACE:REGION: #<Hemlock Region "Unknown file option:
"syntax"/Unknown file option: "base"/#<error printing object>
HEMLOCK-INTERNALS::START: #<Hemlock Mark "^Unknown file option:
"syntax"">
HEMLOCK-INTERNALS::END: #<Hemlock Mark "#<error printing object>
HEMLOCK-INTERNALS::FIRST-LINE: #<Hemlock Line "Unknown file option:
"syntax"">
HEMLOCK-INTERNALS::LAST-LINE: #<Hemlock Line "#<error printing
object>
HEMLOCK-INTERNALS::FIRST-CHARPOS: 0
HEMLOCK-INTERNALS::LAST-CHARPOS: 0
HEMLOCK-INTERNALS:BUFFER: #<Hemlock Buffer "Echo Area">
HEMLOCK-INTERNALS::NDEL: 58
#:G7152: T
CCL::*INTERRUPT-LEVEL*: -1
HEMLOCK-INTERNALS::FIRST-CHARS: "Unknown file option: \"syntax\""
HEMLOCK-INTERNALS::LAST-CHARS: -7
(442C68) : 9 (CLEAR-ECHO-AREA) 933
NIL
HEMLOCK-INTERNALS::B: #<Hemlock Buffer "Main">
#:G8687: 0
#:G8688: T
CCL::*INTERRUPT-LEVEL*: -1
(442D20) : 10 (LOUD-MESSAGE [...]) 101
(&REST HEMLOCK-INTERNALS::ARGS)
HEMLOCK-INTERNALS::ARGS: ("Missing \":\". Aborting file options.")
(442D38) : 11 (PROCESS-FILE-OPTIONS
#<Hemlock Buffer "test.lisp /Users/binghe/Lisp/src/">
[...]) 717
(HEMLOCK-INTERNALS:BUFFER &OPTIONAL PATHNAME)
HEMLOCK-INTERNALS:BUFFER: #<Hemlock Buffer "test.lisp /Users/
binghe/Lisp/src/">
PATHNAME: "/Users/binghe/Lisp/src/test.lisp"
STRING: ";;;; -*- Mode: lisp; Syntax: ansi-common-lisp; Base: 10;
Package: cl-user; -*-"
HEMLOCK::FOUND: 5
HEMLOCK::NO-MAJOR-MODE: NIL
TYPE: "lisp"
HEMLOCK::START: 8
HEMLOCK::END: 75
HEMLOCK::OPT-START: 74
HEMLOCK::COLON: NIL
HEMLOCK::SEMI: 73
(442DA8) : 12 (FUNCALL #'#<GUI::|-[HemlockEditorDocument
readFromURL:ofType:error:]|>
17591849974870) 2557
(#:G15675)
#:G15675: 17591849974870
#:G15689: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFE2B0>
#:G15676: #<A Foreign Pointer [stack-allocated] #x7FFF5FBFE2B0>
#:COMPILER-VAR: (NIL)
#:G15681: #<COMPILED-LEXICAL-CLOSURE #x493DCF>
#:G15690: (CONDITION #<COMPILED-LEXICAL-CLOSURE #x493DCF>)
CCL::%HANDLERS%: ((CONDITION #) (ERROR))
GUI::SELF: #<HEMLOCK-EDITOR-DOCUMENT <HemlockEditorDocument:
0x13c24730> (#x13C24730)>
GUI::_CMD: #<A Foreign Pointer #x7FFF83FD3820>
GUI::URL: #<NS-URL file://localhost/Users/binghe/Lisp/src/test.lisp
(#x13C20F70)>
TYPE: #<NS-MUTABLE-STRING "Lisp source code" (#x1998B0)>
GUI::PERROR: #<A Foreign Pointer #x7FFF5FBFE3D8>
GUI::PUSED-ENCODING: #<A Foreign Pointer [stack-allocated] (:*
(:UNSIGNED
64))
#x7FFF5FBFE1C0>
PATHNAME: "/Users/binghe/Lisp/src/test.lisp"
GUI::BUFFER-NAME: "test.lisp /Users/binghe/Lisp/src/"
GUI::BUFFER: #<Hemlock Buffer "test.lisp /Users/binghe/Lisp/src/">
GUI::SELECTED-ENCODING: 5
STRING: #<NS-MUTABLE-STRING ";;;; -*- Mode: lisp; Syntax: ansi-
common-lisp; Base: 10; Package: cl-user; -*-
(in-package :cl-user)
" (#x1BEF10)>
(442E58) : 13 (%PASCAL-FUNCTIONS% 110 17591849974870) 405
(CCL::INDEX CCL::ARGS-PTR-FIXNUM)
CCL::INDEX: 110
CCL::ARGS-PTR-FIXNUM: 17591849974870
CCL::LISP-FUNCTION: #<Compiled-function GUI::|-
[HemlockEditorDocument readFromURL:ofType:error:]| (Non-Global)
#x300041BD3C6F>
WITHOUT-INTERRUPTS: NIL
CCL::*CALLBACK-TRACE-P*: NIL
(442F18) : 15 (FUNCALL #'#<Anonymous Function #x30004138278F>
#<LISP-APPLICATION <LispApplication: 0x1bb390>
(#x1BB390)>
#S(CCL::OBJC-SELECTOR :NAME "run" :%SEL #<A
Foreign Pointer #x7FFF83FCBDC8>)) 205
(#:G1792 #:G1793)
#:G1792: #<LISP-APPLICATION <LispApplication: 0x1bb390> (#x1BB390)>
#:G1793: #S(CCL::OBJC-SELECTOR :NAME "run"
:%SEL #<A Foreign Pointer
#x7FFF83FCBDC8>)
(442F38) : 16 (FUNCALL #'#<CCL::SEND-UNAMBIGUOUS-MESSAGE>
#<LISP-APPLICATION <LispApplication: 0x1bb390>
(#x1BB390)>
[...]) 525
(CCL::RECEIVER &REST CCL::ARGS)
CCL::RECEIVER: #<LISP-APPLICATION <LispApplication: 0x1bb390>
(#x1BB390)>
CCL::ARGS: NIL
(442F80) : 17 (RUN-EVENT-LOOP) 397
NIL
GUI::APP: #<LISP-APPLICATION <LispApplication: 0x1bb390> (#x1BB390)>
#:G4132: (ERROR)
CCL::%HANDLERS%: ((ERROR))
GUI::*EVENT-PROCESS-REPORTED-CONDITIONS*: (#<TYPE-ERROR
#x300041F0F24D>)
2008-04-01 04:29:55.553 dx86cl64[23788:613] *** NSThread: ignoring
exception 'Lisp exception: value -7 is not of the expected type
CCL::UVECTOR.' that raised during thread perform of target 0x1e88f0
and selector 'openDocument:'
More information about the Openmcl-devel
mailing list