cffi-devel March 2008

cffi-devel@common-lisp.net

6 participants
5 discussions

[cffi-devel] LispWorks 5.0/5.1 and LONG-LONG support
by Chun Tian (binghe) 07 Apr '08

07 Apr '08

Hi, dear CFFI Developers Since LispWorks 5.1 has been released yesterday, I can start to talk about it. * :long-long and :unsigned-long-long support LispWorks 5.0 64-bit can already support :long-long and :unsigned-long- long, but the FLI:FOREIGN-TYPED-AREF function cannot support them, and, LispWorks 5.1 64-bit has fixed this, now FLI:FOREIGN-TYPED-AREF can support 64-bit integers. * LispWorks *features* Though LispWorks cannot use a >=version like compile feature like those in Allegro, but since LW is very stable and its version grows very slowly (0.1/year ^_^), I think we can use #+(and lispworks-64bit (not lispworks5.0)) to mean "LispWorks 64-bit version >= 5.1" I attach a simple patch, which opens the 64-bit integer support on LW 5.0 & 5.1 (64-bit). Hope it can be reviewed and merged into CFFI trunk. I'll always need these changes to compile & load IOLIB project on 64-bit LispWorks. Regards, Chun Tian (binghe)

2 15

[cffi-devel] Defcallback calling into C
by Luke J Crook 26 Mar '08

26 Mar '08

Does DEFCALLBACK support calling back into C from the Lisp side? One of the features of OpenRM is that it will call a callback when certain data structures are freed internally by the C library (for example a node in the scene graph, or vertex and color data shared between primitives within nodes.) Complex structures require that the appropriate C function is called. I am using CFFI version 0.9.2 from the Cliki and see the same error from Lispworks and SBCL. Thanks, - Luke

2 1

[cffi-devel] pythononlisp and array operation error
by Prashanth 25 Mar '08

25 Mar '08

Hi On Tue, Mar 25, 2008 at 7:10 PM, Prashanth <munichlinux(a)gmail.com> wrote: > > On Tue, Mar 25, 2008 at 6:44 PM, Luís Oliveira <luismbo(a)gmail.com> wrote: > > > > What version of CFFI are you using? > > I am using the stable 0.9.2 > to be more specific about the error this is the trace OS: debian Lisp: Allegro 8.0 python on lisp: 0.2 64 bit machine when i try to load the library these are the errors: #<Printer Error, obj=#x1000000ae9: attempt to take the length of a non-sequence: #<unknown object of type number 10 @ #x61007e0020003a>> Restart actions (select using :continue): 0: Return to Top Level (an "abort" restart). 1: Abort entirely from this (lisp) process. [1] TOP-DEALS(9): :zoom :verbose t Evaluation stack: call to ERROR required arg: EXCL::DATUM = TYPE-ERROR &rest EXCL::ARGUMENTS = (:DATUM #<unknown object of type number 10 @ #x7fff5baab81a> :EXPECTED-TYPE ...) function suspended at relative address 805 ---------------------------- ->call to FORMAT required arg: STREAM = #<EXCL:TERMINAL-SIMPLE-STREAM [initial terminal io] fd 0/1 @ #x1000241602> required arg: EXCL::STRING-OR-FN = (EXCL::FORMATTER-TREE . "~&~a: ~a~%~@[ [condition type: ~a]~%~]") &rest EXCL::ARGS = ("Error" #<SIMPLE-ERROR @ #x100258a8a2> SIMPLE-ERROR) function suspended at relative address 610 ---------------------------- call to ERROR required arg: EXCL::DATUM = SIMPLE-ERROR &rest EXCL::ARGUMENTS = (:FORMAT-CONTROL "Invalid ~s argument: ~s" :FORMAT-ARGUMENTS ...) function suspended at relative address 805 ---------------------------- call to POSITION-IF-NOT required arg: EXCL::TEST = #<non-lisp object @ #x7fff5baacb0a> required arg: SEQUENCE = "~&~a: ~a~%~@[ [condition type: ~a]~%~]" &key EXCL::FROM-END = :UNSUPPLIED &key EXCL::START = 1 &key EXCL::KEY = :UNSUPPLIED &key EXCL::END = :UNSUPPLIED function suspended at relative address 526 ---------------------------- call to FORMAT required arg: STREAM = #<EXCL:TERMINAL-SIMPLE-STREAM [initial terminal io] fd 0/1 @ #x1000241602> required arg: EXCL::STRING-OR-FN = (EXCL::FORMATTER-TREE . "~&~a: ~a~%~@[ [condition type: ~a]~%~]") &rest EXCL::ARGS = ("Error" #<EXCL:SYNCHRONOUS-OPERATING-SYSTEM-SIGNAL @ #x100258a412> EXCL:SYNCHRONOUS-OPERATING-SYSTEM-SIGNAL) function suspended at relative address 610 ---------------------------- call to ERROR required arg: EXCL::DATUM = EXCL:SYNCHRONOUS-OPERATING-SYSTEM-SIGNAL &rest EXCL::ARGUMENTS = (:NAME "Segmentation violation" :NUMBER ...) function suspended at relative address 805 ---------------------------- call to CFFI-CALLBACKS::|PYTHONONLISP::DUMPSTD| function suspended at relative address 533 ---------------------------- call to PY::PYTHONLISP extra arg = "print \"If you can see this, Python is loaded and working\"" function suspended at relative address 634 ---------------------------- (ghost call to PY::INIT-PYTHON) ---------------------------- call to PY::PYTHONLISP extra arg = " import sys, os, getopt, sha from cStringIO import StringIO import datetime import copy sys.path.append('/usr/local/mailman/') from email.Utils import parseaddr from Mailman import MailList from Mailman import Utils from Mailman import Message from Mailman import Errors from Mailman import mm_cfg from Mailman import i18n from types import StringType from Mailman import Errors from Mailman import MemberAdaptor from Mailman.OldStyleMemberships import OldStyleMemberships print \"python\" " function suspended at relative address 120 ---------------------------- (ghost call to EXCL::%EVAL) ---------------------------- :err Attempt to throw to the non-existent tag EXCL::PRINTER-ERROR Restart actions (select using :continue): 0: Return to Top Level (an "abort" restart). 1: Abort entirely from this (lisp) process. [1] TOP-DEALS(6): :zoom t #<Printer Error, obj=#x1000000ae9: attempt to take the length of a non-sequence: #<unknown object of type number 10 @ #x61007e0020003a>> Restart actions (select using :continue): 0: Return to Debug Level 1 (an "abort" restart). 1: Return to Top Level (an "abort" restart). 2: Abort entirely from this (lisp) process. [2] TOP-DEALS(7): :zoom t #<Printer Error, obj=#x1000000ae9: attempt to take the length of a non-sequence: #<unknown object of type number 10 @ #x61007e0020003a>> Restart actions (select using :continue): 0: Return to Debug Level 2 (an "abort" restart). 1: Return to Debug Level 1 (an "abort" restart). 2: Return to Top Level (an "abort" restart). 3: Abort entirely from this (lisp) process. :zoom Evaluation stack: (ERROR CONTROL-ERROR :FORMAT-CONTROL ...) ->(SIGNAL #<TYPE-ERROR @ #x100258d7f2>) (ERROR TYPE-ERROR :DATUM ...) (FORMAT #<EXCL:TERMINAL-SIMPLE-STREAM [initial terminal io] fd 0/1 @ #x1000241602> (EXCL::FORMATTER-TREE . "~&~a: ~a~%~@[ [condition type: ~a]~%~]") ...) (ERROR SIMPLE-ERROR :FORMAT-CONTROL ...) (POSITION-IF-NOT #<non-lisp object @ #x7fff5baacb0a> "~&~a: ~a~%~@[ [condition type: ~a]~%~]" ...) (FORMAT #<EXCL:TERMINAL-SIMPLE-STREAM [initial terminal io] fd 0/1 @ #x1000241602> (EXCL::FORMATTER-TREE . "~&~a: ~a~%~@[ [condition type: ~a]~%~]") ...) (ERROR EXCL:SYNCHRONOUS-OPERATING-SYSTEM-SIGNAL :NAME ...) (CFFI-CALLBACKS::|PYTHONONLISP::DUMPSTD|) --- regards, Prashanth http://munichlinux.blogspot.com

1 0

Fwd: [cffi-devel] pythononlisp and array operation error
by Prashanth 25 Mar '08

25 Mar '08

Hi On Tue, Mar 25, 2008 at 6:44 PM, Luís Oliveira <luismbo(a)gmail.com> wrote: > > What version of CFFI are you using? I am using the stable 0.9.2 > Try grabbing the latest version > from the darcs repository if you're not already doing that. > I tried with that now but no result same issue. -- regards, Prashanth http://munichlinux.blogspot.com

1 0

[cffi-devel] pythononlisp and array operation error
by Prashanth 25 Mar '08

25 Mar '08

Hi, I am using pythononlisp(a unmaintained project) and trying to writing some python codes on that. Pythononlisp is dependent of cffi and this works perfectly fine in a 32-bit machine and fails in 64 bit machine. This is the error Attempt to do an array operation on #<Printer Error, obj=#x1000c10579: #<TYPE-ERROR @ #x1000c73d62>> which is not an array. this happens exactly when pythononlisp is trying to initiate the python module has someone faced this before? (cffi:defcfun ("Py_InitModule4" Py_InitModule4) :void (name :string) (methods :pointer) (doc :string) (self :pointer) (apiver :int)) and above is called like this: (Py_InitModule4 (first methods) methodptr (cffi:null-pointer) (cffi:null-pointer) 1011) -- regards, Prashanth http://munichlinux.blogspot.com

3 3

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

cffi-devel March 2008