[Cc to RDNZL mailing list]
Hi!
On Sat, 18 Dec 2004 18:28:33 -0600, "Francisco Rivera" <jfrivera56(a)hotmail.com> wrote:
> RDNZL works very fine using LispWorks Personal 4.3.7, but then I
> cannot make deliver. When I try to use the full LispWorks 4.0.1 the
> following error appears:
>
> ; Loading text file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\load.lisp
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\packages.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\current-lib\modules\concat\xref.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\specials.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\util.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\port-lw.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\ffi.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\container.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\reader.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\arrays.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\adapter.fsl
> ; Loading fasl file C:\Program
> Files\Harlequin\LispWorks\RDNZL-0.3.0\import.fsl
>
> CL-USER 1 > (use-package :rdnzl)
> T
>
> CL-USER 2 > (enable-rdnzl-syntax)
>
> CL-USER 3 > (import-types "System.Windows.Forms"
> "MessageBox" "MessageBoxButtons" "DialogResult")
>
> Error: The subscript 0 exceeds the limit -1 for the first dimension of the
> foreign-array #<Foreign-Array FLI::WCHAR-T (0) : addr #x00397128>.
> 1 (abort) Return to level 0.
> 2 Return to top loop level 0.
>
> Type :b for backtrace, :c <option number> to proceed, or :? for other
> options
>
> CL-USER 4 : 1 > :b
> Call to FLI::DO-FOREIGN-AREF
> Call to (SETF FLI:FOREIGN-AREF)
> Call to (SUBFUNCTION (LABELS EXTERNAL-FORMAT:EF-WRITE-BYTE) (SUBFUNCTION
> EXTERNAL-FORMAT::MAKE-EF-FUNCTION-GENERATOR (SUBFUNCTION 1
> FLI::LISP-TO-C-STRING))) Call to (SUBFUNCTION
> EXTERNAL-FORMAT::MAKE-EF-FUNCTION-GENERATOR (SUBFUNCTION 1
> FLI::LISP-TO-C-STRING)) Call to RDNZL::%MAKE-TYPE-FROM-NAME Call to
> RDNZL::MAKE-TYPE-FROM-NAME Call to INVOKE Call to LOAD-ASSEMBLY Call to
> IMPORT-TYPES Call to CAPI::CAPI-TOP-LEVEL-FUNCTION Call to
> LISPWORKS-TOOLS::LISTENER-TOP-LEVEL-FUNCTION
> Call to CAPI::INITIALIZE-AND-PROCESS-EVENTS
> Call to (SUBFUNCTION 1 CAPI::CALL-AND-PROCESS-EVENTS)
> Call to (SUBFUNCTION 1 MP::INITIALIZE-PROCESS-STACK)
>
> CL-USER 5 : 1 >
>
> I suppose that the old FFI in LW 4.0.1 will not be supported.
Looks like some problem with the old FFI to me, yes. If you have a
license then maybe you can get a patch from Xanalys support.
Cheers,
Edi.