[climacs-devel] Encountering a bug after C-x C-f

Sean Champ gimmal at gmail.com
Thu Jul 20 12:12:16 UTC 2006


I've built climacs, using a recent checkout of the codebaess for all of the 
components to climacs. The build has been made on SBCL 0.9.11. I'm using 
telent CLX.

There appears to occur a bug after I type the key sequence "C-x C-f" into the 
climacs window/pane. It appears to be a matter of a symbol being provided 
where a file-designator is expected. Along in the backtrace, the symbol 
occasioning the error is provided as the first and only argument to a 
list-format climacs command expression for CLIMACS-GUI::COM-FIND-FILE

I am not familiar with the codebase, am uncertain of how to proceed about 
trying to resolve the bug. 

Following is the text of a backtrace from a SLIME session that had come to 
experience  the bug. The backtrace is copied, up to the point of the 
execution of (climacs-gui::climacs), with the lines for all frames having 
been expanded.

--
Sean


The value #:UNSUPPLIED-ARGUMENT-MARKER3321
is not of type
  (OR (VECTOR CHARACTER) (VECTOR NIL) BASE-STRING PATHNAME FILE-STREAM).
   [Condition of type TYPE-ERROR]

Restarts:
  0: [RETURN-TO-ESA] ESA::RETURN-TO-ESA
  1: [RESET-ESA] ESA::RESET-ESA
  2: [ABORT-REQUEST] Abort handling SLIME request.
  3: [TERMINATE-THREAD] Terminate this thread (#<THREAD 
"repl-thread" {BDA3AC9}>)

Backtrace:
  0: (PATHNAME-NAME #:UNSUPPLIED-ARGUMENT-MARKER3321)
      Locals:
        SB-DEBUG::ARG-0 = 1
        SB-DEBUG::ARG-1 = #:UNSUPPLIED-ARGUMENT-MARKER3321
  1: (CLIMACS-GUI::DIRECTORY-PATHNAME-P #:UNSUPPLIED-ARGUMENT-MARKER3321)
      Locals:
        CLIMACS-BASE:NAME = :<NOT-AVAILABLE>
        CLIMACS-GUI::PATHSPEC = #:UNSUPPLIED-ARGUMENT-MARKER3321
        TYPE = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  2: (CLIMACS-GUI::FIND-FILE #:UNSUPPLIED-ARGUMENT-MARKER3321 NIL)
      Locals:
        CLIMACS-BUFFER:BUFFER = :<NOT-AVAILABLE>
        #:COUNT545 = :<NOT-AVAILABLE>
        CLIMACS-PANE:FILEPATH = #:UNSUPPLIED-ARGUMENT-MARKER3321
        #:G539 = :<NOT-AVAILABLE>
        #:KEEPER-570 = :<NOT-AVAILABLE>
        #:NEXT543 = :<NOT-AVAILABLE>
        CLIM:PANE = :<NOT-AVAILABLE>
        CLIMACS-GUI::READONLYP = NIL
        #:START544 = :<NOT-AVAILABLE>
        STREAM = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  3: (CLIMACS-GUI::COM-FIND-FILE #:UNSUPPLIED-ARGUMENT-MARKER3321)
      Locals:
        CLIMACS-PANE:FILEPATH = #:UNSUPPLIED-ARGUMENT-MARKER3321
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  4: ((SB-PCL::FAST-METHOD CLIM:EXECUTE-FRAME-COMMAND (CLIM:APPLICATION-FRAME 
T)) #<unused argument> #<unused argument> #<CLIMACS-GUI:CLIMACS {B68DEB1}> 
(CLIMACS-GUI::COM-FIND-FILE #:UNSUPPLIED-ARGUMENT-MARKER3321))
      Locals:
        CLIM:COMMAND = (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321)
        CLIM-INTERNALS::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  5: ((LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0. 
SB-PCL::.ARG1.)) #<unavailable argument> #<unavailable argument> 
#<CLIMACS-GUI:CLIMACS {B68DEB1}> (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321))
      Locals:
        SB-DEBUG::ARG-0 = :<NOT-AVAILABLE>
        SB-DEBUG::ARG-1 = :<NOT-AVAILABLE>
        SB-DEBUG::ARG-2 = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        SB-DEBUG::ARG-3 = (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321)
  6: ((FLET CALL-NEXT-METHOD))
      Locals:
        SB-PCL::.ARGS. = :<NOT-AVAILABLE>
        SB-PCL::.CM-ARGS. = :<NOT-AVAILABLE>
        SB-PCL::.FUNCTION. = :<NOT-AVAILABLE>
        SB-PCL::.NEXT-METHOD-CALL. = :<NOT-AVAILABLE>
        CLIM:COMMAND = :<NOT-AVAILABLE>
        CLIMACS-GUI::FRAME = :<NOT-AVAILABLE>
        #:G1040 = :<NOT-AVAILABLE>
        SB-C::OBJECT = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  7: ((SB-PCL::FAST-METHOD CLIM:EXECUTE-FRAME-COMMAND :AROUND 
(CLIMACS-GUI:CLIMACS T)) #<unused argument> 
#S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<CLOSURE (LAMBDA #) 
{B8CA0ED}> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) 
#<CLIMACS-GUI:CLIMACS {B68DEB1}> (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321))
      Locals:
        SB-PCL::.NEXT-METHOD-CALL. = #S(SB-PCL::FAST-METHOD-CALL :FUNCTION 
#<CLOSURE (LAMBDA (SB-PCL::.PV-CELL. SB-PCL::.NEXT-METHOD-CALL. 
SB-PCL::.ARG0. ...)) {B8CA0ED}> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO 
(2))
        CLIMACS-BUFFER:BUFFER = :<NOT-AVAILABLE>
        CLIM:COMMAND = (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321)
        #:COUNT1061 = :<NOT-AVAILABLE>
        CLIMACS-GUI:CURRENT-WINDOW = #<CLIMACS-GUI::EXTENDED-PANE "(Unnamed 
Pane)" {CFC1831}>
        CLIMACS-GUI::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:G1053 = #<CLIMACS-PANE:CLIMACS-BUFFER {B6A8901}>
        #:LOOP-LIST-1067 = :<NOT-AVAILABLE>
        #:NEXT1059 = :<NOT-AVAILABLE>
        #:START1060 = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
  8: (ESA::PROCESS-GESTURES-OR-COMMAND #<CLIMACS-GUI:CLIMACS {B68DEB1}> 
#<CLIM:STANDARD-COMMAND-TABLE CLIMACS-GUI::GLOBAL-CLIMACS-TABLE {F674769}>)
      Locals:
        CLIM:COMMAND = (CLIMACS-GUI::COM-FIND-FILE 
#:UNSUPPLIED-ARGUMENT-MARKER3321)
        CLIM:COMMAND#1 = :<NOT-AVAILABLE>
        CLIM:COMMAND-TABLE = #<CLIM:STANDARD-COMMAND-TABLE 
CLIMACS-GUI::GLOBAL-CLIMACS-TABLE {F674769}>
        ESA::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:G217 = :<NOT-AVAILABLE>
        #:G224 = :<NOT-AVAILABLE>
        ESA::GESTURES = (#<CLIM:KEY-PRESS-EVENT {CF07CD9}> 
#<CLIM:KEY-PRESS-EVENT {CF16121}>)
        ESA::ITEM = #<CLIM:MENU-ITEM keystroke (f CONTROL) {FADCB01}>
        ESA::NUMARG = :<NOT-AVAILABLE>
        ESA::NUMARGP = :<NOT-AVAILABLE>
        SB-C::OBJECT = :<NOT-AVAILABLE>
        ESA::OBJECT#1 = :<NOT-AVAILABLE>
        ESA::OBJECT#2 = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
        #:SB-DEBUG-CATCH-TAG
  9: (ESA:ESA-TOP-LEVEL #<CLIMACS-GUI:CLIMACS {B68DEB1}> :COMMAND-PARSER 
#<unused argument> :COMMAND-UNPARSER #<unused 
argument> :PARTIAL-COMMAND-PARSER #<unused argument> :PROMPT #<unused 
argument>)
      Locals:
        CLIM:COMMAND-TABLE = #<CLIM:STANDARD-COMMAND-TABLE 
CLIMACS-GUI::GLOBAL-CLIMACS-TABLE {F674769}>
        ESA::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:G378 = NIL
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 10: ((LAMBDA (#:FRAME-ARG70)) #<CLIMACS-GUI:CLIMACS {B68DEB1}>)
      Locals:
        #:FRAME-ARG70 = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 11: ((SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL (CLIM:APPLICATION-FRAME)) 
#<unused argument> #<unused argument> #<CLIMACS-GUI:CLIMACS {B68DEB1}> 
#<unused argument>)
      Locals:
        #:COUNT986 = :<NOT-AVAILABLE>
        CLIM-INTERNALS::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:G978 = :<NOT-AVAILABLE>
        #:G980 = :<NOT-AVAILABLE>
        #:NEXT984 = :<NOT-AVAILABLE>
        #:START985 = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 12: ((FLET CALL-NEXT-METHOD))
      Locals:
        SB-PCL::.ARGS. = :<NOT-AVAILABLE>
        SB-PCL::.CM-ARGS. = :<NOT-AVAILABLE>
        SB-PCL::.FUNCTION. = :<NOT-AVAILABLE>
        SB-PCL::.NEXT-METHOD-CALL. = :<NOT-AVAILABLE>
        SB-PCL::.REST-ARG. = :<NOT-AVAILABLE>
        CLIM-INTERNALS::FRAME = :<NOT-AVAILABLE>
        #:G1039 = :<NOT-AVAILABLE>
        SB-C::OBJECT = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 13: ((SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL :AROUND 
(CLIM:APPLICATION-FRAME)) #<unused argument> 
#S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD 
CLIM:RUN-FRAME-TOP-LEVEL #)> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO 
(1 . T)) #<CLIMACS-GUI:CLIMACS {B68DEB1}> NIL)
      Locals:
        SB-PCL::.NEXT-METHOD-CALL. = #S(SB-PCL::FAST-METHOD-CALL :FUNCTION 
#<FUNCTION (SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL 
(CLIM:APPLICATION-FRAME))> :PV-CELL NIL :NEXT-METHOD-CALL NIL :ARG-INFO (1 . 
T))
        SB-PCL::.REST-ARG. = NIL
        #:COUNT1051 = :<NOT-AVAILABLE>
        #:COUNT1067 = :<NOT-AVAILABLE>
        CLIM-INTERNALS::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:G1044 = :<NOT-AVAILABLE>
        #:NEXT1049 = :<NOT-AVAILABLE>
        #:NEXT1065 = :<NOT-AVAILABLE>
        #:OLD-STREAM1061 = NIL
        CLIM-INTERNALS::ORIGINAL-STATE = :DISOWNED
        CLIM-INTERNALS::QUERY-IO = #<CLIMACS-GUI::CLIMACS-MINIBUFFER-PANE 
CLIMACS-GUI::MINIBUFFER {CFE1BA1}>
        #:START1050 = :<NOT-AVAILABLE>
        #:START1066 = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 14: ((FLET CLIMACS::RUN))
      Locals:
        CLIMACS::FRAME = :<NOT-AVAILABLE>
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG
 15: (CLIMACS-GUI:CLIMACS :NEW-PROCESS NIL :PROCESS-NAME "Climacs" :WIDTH 
900 :HEIGHT 400)
      Locals:
        CLIMACS::FRAME = #<CLIMACS-GUI:CLIMACS {B68DEB1}>
        #:HEIGHT-DEFAULTING-TEMP = 400
        #:NEW-PROCESS-DEFAULTING-TEMP = NIL
        #:PROCESS-NAME-DEFAULTING-TEMP = "Climacs"
        #:WIDTH-DEFAULTING-TEMP = 900
      Catch-tags:
        #:SB-DEBUG-CATCH-TAG



More information about the climacs-devel mailing list