[clpython-devel] Re: CLPython on SBCL

[Willem Broekema]

On Tue, May 13, 2008 at 5:24 PM, Leonardo Varuzza <varuzza at gmail.com> wrote:

> Nope, thing get little bit worst:
>
> Errors detected in this test: 98 UNEXPECTED: 94
> Successes this test:601


You get further than I do (on SBCL 1.0.10): compilation now succeeds (update
in CVS), but SBCL crashes when attempting to create a Python function.
Apparently you don't have this problem? If this issue is fixed in SBCL in
the mean time, that would be great.

By the way, the module handling is rewritten so that CMUCL does not complain
about modification of literal objects anymore. But CMUCL ends with an
illegal instruction when creating a Python function; that is shown below
this SBCL backtrace.

Things are still fine on Allegro and LispWorks.

- Willem

[SBCL 1.0.10]
* (clpython::make-py-function :name "foo" :context-name "foo" :lambda
(lambda () 42))

debugger invoked on a TYPE-ERROR:
  The value #<invalid object #x466F1171> is not of type LIST.

Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

(NTHCDR #<error printing object>)
0] backtrace

0: (NTHCDR #<error printing object>)
1: (SB-PCL::SLOT-UNBOUND-INTERNAL #<error printing object>)
2: (SB-PCL::SET-ARG-INFO #<error printing object>)
3: ((SB-PCL::FAST-METHOD INITIALIZE-INSTANCE :AFTER
     ("#<...>" . "#<...>")) #<error printing object>)
4: ((LAMBDA
        (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL.
         "#<...>" . "#<...>")) #<error printing object>)
5: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS))
    #<unavailable argument>
    #<unavailable argument>
    #<CLPYTHON::FUNCALLABLE-PYTHON-CLASS CLPYTHON::PY-FUNCTION>)
6: (CLPYTHON::MAKE-PY-FUNCTION)
7: (SB-INT:SIMPLE-EVAL-IN-LEXENV
    (CLPYTHON::MAKE-PY-FUNCTION :NAME "foo" :CONTEXT-NAME "foo" :LAMBDA
                                (LAMBDA () 42))
    #<NULL-LEXENV>)
8: (INTERACTIVE-EVAL
    (CLPYTHON::MAKE-PY-FUNCTION :NAME "foo" :CONTEXT-NAME "foo" :LAMBDA
                                (LAMBDA () 42)))
9: (SB-IMPL::REPL-FUN NIL)
10: (SB-IMPL::REPL-FUN NIL)
11: ((LAMBDA ()))
12: ((LAMBDA ()))
13: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {11631A8D}>)
14: (SB-IMPL::TOPLEVEL-REPL NIL)
15: (SB-IMPL::TOPLEVEL-INIT)
16: ((LABELS SB-IMPL::RESTART-LISP))



[ CMU Common Lisp Stage 3 20071107T024924 (19D), running on Banaan ]
[ With core:
/Users/willem/dev/lisp/cmucl-2007-11-x86-darwin/lib/cmucl/lib/lisp.core ]
[ Dumped on: Wed, 2007-11-07 11:49:28+01:00 on lapputoppu.local ]

* (clpython::make-py-function :name "foo" :context-name "foo" :lambda
(lambda () 42))
; [GC threshold exceeded with 30,814,104 bytes in use.  Commencing GC.]
; [GC completed with 16,801,584 bytes retained and 14,012,520 bytes freed.]
; [GC will next occur when at least 28,801,584 bytes are in use.]
./cmucl.sh: line 2:  7029 Illegal instruction
~/dev/lisp/cmucl-2007-11-x86-darwin/bin/lisp
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/clpython-devel/attachments/20080513/2ccedcda/attachment.html>