[cl-store-devel] Simple-type-error on SBCL 1.0.15

[Sean Ross]

Unfortunately I do not have a copy of SBCL 1.0.15 on my macbook so  
I'll try and help you help me figure this out.

Could you provide the details of the function name that cl-store is  
attempting to restore (or all the objects in stack frame 8)


sean.


On 30 Jun 2008, at 14:47, Alexandre Passos wrote:

> On trying to restore a structure instance with function pointers on
> sbcl 1.0.15 I get a simple-type-error from one of the function names.
> On sbcl 1.0.11 I get no problem.
>
> Any ideas?
>
> The error is
>
> unhandled SIMPLE-TYPE-ERROR in thread #<SB-THREAD:THREAD "initial
> thread" {ECCC9F9}>:
> invalid function name: (SB-C::&OPTIONAL-DISPATCH
>                         RAMEAU-PARDO:INCF-PARDO-CLASSIFY)
>
> 0: (SB-DEBUG::MAP-BACKTRACE #<CLOSURE (LAMBDA #) {EE17045}>) 
> [:EXTERNAL]
> 1: (BACKTRACE 128 #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDERR* {90A16D1}>)
> 2: (SB-DEBUG::DEBUGGER-DISABLED-HOOK
>   #<SIMPLE-TYPE-ERROR {EE15EB9}>
>   #<unavailable argument>)
> 3: (INVOKE-DEBUGGER #<SIMPLE-TYPE-ERROR {EE15EB9}>)
> 4: (INVOKE-DEBUGGER #<SIMPLE-TYPE-ERROR {EE15EB9}>)[:EXTERNAL]
> 5: (ERROR SIMPLE-TYPE-ERROR)[:EXTERNAL]
> 6: (SB-INT:LEGAL-FUN-NAME-OR-TYPE-ERROR
>   (SB-C::&OPTIONAL-DISPATCH RAMEAU-PARDO:INCF-PARDO-CLASSIFY))
> 7: (SB-KERNEL:FDEFINITION-OBJECT
>   (SB-C::&OPTIONAL-DISPATCH RAMEAU-PARDO:INCF-PARDO-CLASSIFY)
>   NIL)
> 8: (FDEFINITION (SB-C::&OPTIONAL-DISPATCH RAMEAU-PARDO:INCF-PARDO- 
> CLASSIFY))
> 9: ((SB-PCL::FAST-METHOD CL-STORE::INTERNAL-RESTORE-OBJECT
>    (CL-STORE:CL-STORE (EQL 'FUNCTION) T))
>   #<unused argument>
>   #<unused argument>
>   #<unused argument>
>   #<unused argument>
>   #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>)
> 10: (CL-STORE::HANDLE-NORMAL #<unavailable lambda list>)
> 11: (CL-STORE:RESTORE-OBJECT
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>
>    #<CL-STORE:CL-STORE {94DD979}>)
> 12: (CL-STORE::RESTORE-TYPE-OBJECT
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>)
> 13: ((SB-PCL::FAST-METHOD CL-STORE::INTERNAL-RESTORE-OBJECT
>     (CL-STORE:CL-STORE (EQL 'STRUCTURE-OBJECT) T))
>    #<unused argument>
>    #<unused argument>
>    #<unused argument>
>    #<unused argument>
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>)
> 14: (CL-STORE::HANDLE-NORMAL #<unavailable lambda list>)
> 15: (CL-STORE:RESTORE-OBJECT
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>
>    #<CL-STORE:CL-STORE {94DD979}>)
> 16: (CL-STORE::RESTORE-LIST #<unavailable lambda list>)
> 17: ((SB-PCL::FAST-METHOD CL-STORE::INTERNAL-RESTORE-OBJECT
>     (CL-STORE:CL-STORE (EQL 'CONS) T))
>    #<unused argument>
>    #<unused argument>
>    #<unused argument>
>    #<unused argument>
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>)
> 18: (CL-STORE::HANDLE-NORMAL #<unavailable lambda list>)
> 19: ((SB-PCL::FAST-METHOD CL-STORE:BACKEND-RESTORE
>     (CL-STORE:RESOLVING-BACKEND STREAM))
>    #<unused argument>
>    #<unused argument>
>    #<CL-STORE:CL-STORE {94DD979}>
>    #<SB-SYS:FD-STREAM for "file
> /home/givaldo/genos/repos/rameau/tools/algorithms.store" {ED43C99}>)
> 20: (CL-STORE::RESTORE-FROM-FILE
>    #<unavailable argument>
>    #<unavailable argument>)
> 21: ((SB-PCL::FAST-METHOD CL-STORE:BACKEND-RESTORE (CL-STORE:BACKEND
> STRING))
>    #<unused argument>
>    #<unused argument>
>    #<CL-STORE:CL-STORE {94DD979}>
>    "/home/givaldo/genos/repos/rameau/tools/algorithms.store")
> 22: ((SB-PCL::FAST-METHOD CL-STORE:RESTORE (T))
>    #<unused argument>
>    #<unused argument>
>    #<unavailable argument>
>    #<unavailable argument>)
> 23: (RAMEAU-SAVE:LOAD-ALGORITHMS)
> 24: (RAMEAU-MAIN:MAIN NIL)
> 25: ((LABELS SB-IMPL::RESTART-LISP))
>
>
>
> -- 
> - Alexandre
> _______________________________________________
> cl-store-devel mailing list
> cl-store-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/cl-store-devel