Custom Query (1030 matches)

UFFI uses internal CCL functions, some of which do not work any more:

%set-cstring assumed byte-wide characters

%find-foreign-record first looked for a structure definition, then for a union definition. For unions, it appears that the struct definition that was created for unions was always returned. I reversed the order (first look for a union definition, then for a structure definition for a given name) which fixes the problem for the UFFI test suite. This needs review.

Patch attached.

When entering an invalid symbol like "..." into the REPL, an internal error resulting from a typo is signalled.

Fix:

Index: l1-reader.lisp
===================================================================
--- l1-reader.lisp	(revision 8515)
+++ l1-reader.lisp	(working copy)
@@ -2407,7 +2407,7 @@
             (if (= len 1)
               (or dot-ok
                   (signal-reader-error stream "Dot context error in ~s." (%string-from-token tb)))
-              (signal-reader-error stream "Illegal symbol syntax in ~s. (%string-from-token tb)"))
+              (signal-reader-error stream "Illegal symbol syntax in ~s." (%string-from-token tb)))
             ;; Something other than a buffer full of dots.  Thank god.
             (let* ((num (if (null escapes)
                             (handler-case

In order to dump an image that I can start, it appears that I need to unload the shared libraries that have been loaded and load them at image startup time. I figured that CLOSE-SHARED-LIBRARY is meant to be used to close and unload a shared library. This function is unavailable on FreeBSD, and it appears that fixing this is not totally trivial, as OPEN-SHARED-LIBRARY seems not to return or store the pointer returned by dlopen. I guess this is not news. Is there a workaround available that makes it possible to use images dumped from a CCL that has shared libraries loaded?