CL-USER> (asdf:test-system :cffi) ; Loading /Users/rpg/lisp/vendor/bordeaux-threads/bordeaux-threads.asd ;;; Compiling file /Users/rpg/lisp/rt/rt.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/rt/ASDF-TMP-rt.fasl ;;; Fasl write complete ;;; Compiling file ;;; /Users/rpg/lisp/vendor/bordeaux-threads/src/pkgdcl.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/ASDF-TMP-pkgdcl.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/pkgdcl.fasl ;;; Compiling file ;;; /Users/rpg/lisp/vendor/bordeaux-threads/src/bordeaux-threads.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/ASDF-TMP-bordeaux-threads.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/bordeaux-threads.fasl ;;; Compiling file ;;; /Users/rpg/lisp/vendor/bordeaux-threads/src/impl-allegro.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/ASDF-TMP-impl-allegro.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/impl-allegro.fasl ;;; Compiling file ;;; /Users/rpg/lisp/vendor/bordeaux-threads/src/default-implementations.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/ASDF-TMP-default-implementations.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/rt/rt.fasl ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/bordeaux-threads/src/default-implementations.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/package.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-package.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/package.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/bindings.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-bindings.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/bindings.fasl ; Foreign loading libtest.dylib. ; Foreign loading /Users/rpg/lisp/vendor/cffi/tests/libtest.dylib. ; Foreign loading libtest2.dylib. ; Foreign loading /Users/rpg/lisp/vendor/cffi/tests/libtest2.dylib. ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/funcall.lisp ; While compiling (METHOD EXPAND-TO-FOREIGN (T CHECK-NIL-SKIP-TYPE)): Warning: Variable VAL is never used. ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-funcall.fasl ;;; Fasl write complete Warning: COMPILE-FILE warned while performing # on #. ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/funcall.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/defcfun.lisp Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign RETURN type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-defcfun.fasl ;;; Fasl write complete Warning: COMPILE-FILE failed while performing # on #. Warning: COMPILE-FILE warned while performing # on #. ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/defcfun.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/callbacks.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-callbacks.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/callbacks.fasl ;;; Compiling file ;;; /Users/rpg/lisp/vendor/cffi/tests/foreign-globals.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-foreign-globals.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/foreign-globals.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/memory.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-memory.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/memory.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/strings.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-strings.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/strings.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/struct.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-struct.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/struct.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/union.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-union.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/union.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/enum.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-enum.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/enum.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/misc-types.lisp Warning: foreign ARG type :UNSIGNED-CHAR not compatible with lisp type (INTEGER 0 255) Warning: foreign ARG type :CHAR not compatible with lisp type (INTEGER -128 127) Warning: foreign RETURN type :CHAR not compatible with lisp type (INTEGER -128 127) ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-misc-types.fasl ;;; Fasl write complete Warning: COMPILE-FILE failed while performing # on #. Warning: COMPILE-FILE warned while performing # on #. ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/misc-types.fasl ;;; Compiling file /Users/rpg/lisp/vendor/cffi/tests/misc.lisp ;;; Writing fasl file ;;; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/ASDF-TMP-misc.fasl ;;; Fasl write complete ; Fast loading ; /Users/rpg/.cache/common-lisp/acl-8.2a-macosx-x64/Users/rpg/lisp/vendor/cffi/tests/misc.fasl ;;; running tests (uncompiled) Doing 260 pending tests of 260 tests total. LOAD-CORE-FOUNDATION FUNCALL.CHAR FUNCALL.INT.1 FUNCALL.INT.2 FUNCALL.LONG FUNCALL.LONG-LONG FUNCALL.UNSIGNED-LONG-LONG FUNCALL.FLOAT FUNCALL.DOUBLE FUNCALL.STRING.1 FUNCALL.STRING.2 FUNCALL.STRING.3 FUNCALL.VARARGS.CHAR FUNCALL.VARARGS.INT FUNCALL.VARARGS.LONG Test FUNCALL.VARARGS.DOUBLE failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SETF (MEM-REF S :CHAR) 0) (FOREIGN-FUNCALL "sprintf" :POINTER S :STRING "%.2f" :DOUBLE (COERCE PI 'DOUBLE-FLOAT) :INT)) Expected value: "3.14" Actual value: "0.00". FUNCALL.VARARGS.STRING FUNCALL.DOUBLE26 FUNCALL.FLOAT26 FUNCALL.F-S-P.1 FUNCALL.NIL-SKIP FUNCALL.POINTER-NOT-NIL DEFCFUN.PARSE-NAME-AND-OPTIONS.1 DEFCFUN.PARSE-NAME-AND-OPTIONS.2 DEFCFUN.PARSE-NAME-AND-OPTIONS.3 DEFCFUN.PARSE-NAME-AND-OPTIONS.4 DEFCFUN.PARSE-NAME-AND-OPTIONS.5 DEFCFUN.PARSE-NAME-AND-OPTIONS.6 DEFCFUN.PARSE-NAME-AND-OPTIONS.7 DEFCFUN.PARSE-NAME-AND-OPTIONS.8 TRANSLATE-UNDERSCORE-SEPARATED-NAME.TO-SYMBOL TRANSLATE-UNDERSCORE-SEPARATED-NAME.TO-STRING TRANSLATE-CAMELCASE-NAME.TO-SYMBOL TRANSLATE-CAMELCASE-NAME.TO-STRING TRANSLATE-CAMELCASE-NAME.TO-STRING-UPPER TRANSLATE-CAMELCASE-NAME.TO-SYMBOL-SPECIAL TRANSLATE-CAMELCASE-NAME.TO-STRING-SPECIAL TRANSLATE-NAME-FROM-FOREIGN.FUNCTION TRANSLATE-NAME-FROM-FOREIGN.VAR TRANSLATE-NAME-TO-FOREIGN.FUNCTION TRANSLATE-NAME-TO-FOREIGN.VAR DEFCFUN.CHAR DEFCFUN.DOCSTRING DEFCFUN.INT DEFCFUN.LONG DEFCFUN.LONG-LONG Test DEFCFUN.UNSIGNED-LONG-LONG failed Form: (LET ((ULLONG-MAX (1- (EXPT 2 (* 8 (FOREIGN-TYPE-SIZE :UNSIGNED-LONG-LONG)))))) (EQL ULLONG-MAX (ULLONG ULLONG-MAX))) Expected value: T Actual value: NIL. DEFCFUN.FLOAT DEFCFUN.DOUBLE DEFCFUN.STRING.1 DEFCFUN.STRING.2 DEFCFUN.STRING.3 DEFCFUN.NOARGS Test DEFCFUN.NOOP failed Form: (NOOP) Expected values: Actual value: NIL. DEFCFUN.VARARGS.DOCSTRINGS DEFCFUN.VARARGS.CHAR DEFCFUN.VARARGS.SHORT DEFCFUN.VARARGS.INT DEFCFUN.VARARGS.LONG Test DEFCFUN.VARARGS.FLOAT failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SPRINTF S "%.2f" :FLOAT (FLOAT PI))) Expected value: "3.14" Actual value: "0.00". Test DEFCFUN.VARARGS.DOUBLE failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SPRINTF S "%.2f" :DOUBLE (FLOAT PI 1.0d0))) Expected value: "3.14" Actual value: "0.00". DEFCFUN.VARARGS.STRING Test DEFCFUN.BFF.1 failed Form: (SUM-127-NO-LL 1442906394 520035521 -4715 50335 -13557.0 -30892.0d0 24061483 -23737.0 22 2348 4986 104895680 8073.0d0 -571698147 102484400 (MAKE-POINTER 507907275) 12733353 7824 -1275845284 13602.0 (MAKE-POINTER 286958390) -8042.0 -773681663 -1289932452 31199 -154985357 -170994216 16845.0d0 177 218969221 2794350893 6068863 26327 127699339 (MAKE-POINTER 184352771) 18512.0d0 -12345.0d0 -179853040 -19981 37268 -792845398 116 -1084653028 50494 (MAKE-POINTER 2105239646) -1710519651 1557813312 2839.0d0 90 180 30580.0 -532698978 8623 9537.0d0 -10882 54 184357206 14929.0 -8190.0 -25615.0 (MAKE-POINTER 235310526) (MAKE-POINTER 220476977) 7476055 1576685 -117 -11781 31479 23282640 (MAKE-POINTER 8627281) -17834.0 10391.0d0 -1904504370 114393659 -17062 637873619 16078 -891210259 8107 0 760.0d0 -21268 104 14133.0 10 588598141 310.0d0 20 1351785456 16159552 -10121.0d0 -25866 24821 68232851 60 -24132.0 -1660411658 13387.0 -786516668 -499825680 -1128144619 111849719 2746091587 -2 95 14488 326328135 64781 18204 150716680 -703859275 103 16809.0d0 852235610 -43 21088 242356110 324325428 -22380 23 24814.0 (MAKE-POINTER 40362014) -14322.0d0 -1864262539 523684371 -21 49995 -29175.0) Expected value: 796447501 Actual value: #. Test DEFCFUN.BFF.2 failed Form: (SUM-127 (MAKE-POINTER 2746181372) (MAKE-POINTER 177623060) -32334.0 3158055028 (MAKE-POINTER 242315091) 4288001754991016425 -21047.0d0 287.0d0 18722 243379286 -8677366518541007140 581399424 -13872 4240394881 1353358999 226 969197676 -26207.0d0 6484 11150 1241680089902988480 106068320 61865 2253 (MAKE-POINTER 866809333) -31613 35616 11715 1393601698 8940888681199591845 (MAKE-POINTER 1524606024) 805638893 3315410736 3432596795 (MAKE-POINTER 1490355706) 696175657106383698 -25438.0 1294381547 26724 (MAKE-POINTER 3196569545) 2506913373410783697 -4405955718732597856 4075932032 3224670123 2183829215657835866 1318320964 -22 -3786.0d0 -2017024146 1579225515 -626617701 -1456 (MAKE-POINTER 3561444187) 395687791 1968033632506257320 -1847773261 48853 142937735275669133 -17974.0 (MAKE-POINTER 2791749948) -14140.0 2707 3691328585 3306.0 1132012981 303633191773289330 (MAKE-POINTER 981183954) 9114.0d0 8664374572369470 -19013.0d0 -10288.0d0 -3679345119891954339 (MAKE-POINTER 3538786709) 23761 -154264605 (MAKE-POINTER 2694396308) 7023 997.0d0 1009561368 241 (MAKE-POINTER 2612292671) 48 1431872408 -32675.0d0 (MAKE-POINTER 1587599336) 958916472 -9857.0d0 111 -14370.0d0 -7308 -967514912 488790941 2146978095 -24111.0d0 13711 86681861 717987770 111 1013402998690933877 17234.0d0 -8772.0 3959216275 -8711 (MAKE-POINTER 3142780851) 9480.0 -3820453146461186120 1616574376 -3336232268263990050 -1906114671562979758 -27925.0d0 9695970875869913114 27033.0d0 1096518219 -12 104 3392025403 -27911 60 89 509297051 -533066551 29158.0 110 54 -9802.0d0 593950442165910888 -79) Expected value: 7758614658402721936 Actual value: #. DEFCFUN.UNDEFINED DEFCFUN.DOUBLE26 DEFCFUN.FLOAT26 CALLBACKS.CHAR CALLBACKS.UNSIGNED-CHAR CALLBACKS.SHORT CALLBACKS.UNSIGNED-SHORT CALLBACKS.INT CALLBACKS.UNSIGNED-INT CALLBACKS.LONG CALLBACKS.UNSIGNED-LONG CALLBACKS.LONG-LONG CALLBACKS.UNSIGNED-LONG-LONG CALLBACKS.FLOAT CALLBACKS.DOUBLE CALLBACKS.POINTER CALLBACKS.STRING CALLBACKS.STRING-NOT-DOCSTRING CALLBACKS.NIL-FOR-NULL CALLBACKS.QSORT CALLBACKS.VOID CALLBACKS.FUNCALL.1 CALLBACKS.FUNCALL.2 Test CALLBACKS.BFF.1 failed Form: (CALL-SUM-127-NO-LL (CALLBACK SUM-127-NO-LL)) Expected value: 2008547941 Actual value: -4558795076986485615. Test CALLBACKS.BFF.2 failed Form: (CALL-SUM-127 (CALLBACK SUM-127)) Expected value: 8166570665645582011 Actual value: #. CALLBACKS.NON-EXISTANT CALLBACKS.DOUBLE26 CALLBACKS.DOUBLE26.FUNCALL CALLBACKS.FLOAT26 CALLBACKS.FLOAT26.FUNCALL CALLBACKS.UNINTERNED FOREIGN-GLOBALS.REF.CHAR FOREIGN-GLOBALS.REF.UNSIGNED-CHAR FOREIGN-GLOBALS.REF.SHORT FOREIGN-GLOBALS.REF.UNSIGNED-SHORT FOREIGN-GLOBALS.REF.INT FOREIGN-GLOBALS.REF.UNSIGNED-INT FOREIGN-GLOBALS.REF.LONG FOREIGN-GLOBALS.REF.UNSIGNED-LONG FOREIGN-GLOBALS.REF.FLOAT FOREIGN-GLOBALS.REF.DOUBLE FOREIGN-GLOBALS.REF.POINTER FOREIGN-GLOBALS.REF.STRING FOREIGN-GLOBALS.REF.LONG-LONG FOREIGN-GLOBALS.REF.UNSIGNED-LONG-LONG FOREIGN-GLOBALS.SET.INT FOREIGN-GLOBALS.SET.STRING FOREIGN-GLOBALS.SET.LONG-LONG FOREIGN-GLOBALS.GET-VAR-POINTER.1 FOREIGN-GLOBALS.GET-VAR-POINTER.2 FOREIGN-GLOBALS.REF.UPPERCASEINT1 FOREIGN-GLOBALS.REF.UPPER-CASE-INT1 FOREIGN-GLOBALS.REF.MIXEDCASEINT1 FOREIGN-GLOBALS.REF.MIXED-CASE-INT1 Test FOREIGN-GLOBALS.REF.UPPERCASEINT2 failed Form: *UPPERCASEINT2* Expected value: 12345 Actual value: #. Test FOREIGN-GLOBALS.REF.UPPER-CASE-INT2 failed Form: *UPPER-CASE-INT2* Expected value: 23456 Actual value: #. Test FOREIGN-GLOBALS.REF.MIXEDCASEINT2 failed Form: *MIXEDCASEINT2* Expected value: 34567 Actual value: #. Test FOREIGN-GLOBALS.REF.MIXED-CASE-INT2 failed Form: *MIXED-CASE-INT2* Expected value: 45678 Actual value: #. FOREIGN-GLOBALS.REF.UPPERCASEINT3 FOREIGN-GLOBALS.REF.UPPER-CASE-INT3 FOREIGN-GLOBALS.REF.MIXEDCASEINT3 FOREIGN-GLOBALS.REF.MIXED-CASE-INT3 FOREIGN-GLOBALS.SYMBOL-NAME FOREIGN-GLOBALS.READ-ONLY.1 DEFCVAR.DOCSTRING FOREIGN-GLOBALS.UNDEFINED.1 FOREIGN-GLOBALS.ERROR.1 DEREF.CHAR DEREF.UNSIGNED-CHAR DEREF.SHORT DEREF.UNSIGNED-SHORT DEREF.INT DEREF.UNSIGNED-INT DEREF.LONG DEREF.UNSIGNED-LONG DEREF.LONG-LONG DEREF.UNSIGNED-LONG-LONG DEREF.FLOAT.1 DEREF.FLOAT.2 DEREF.FLOAT.3 DEREF.DOUBLE.1 DEREF.DOUBLE.2 DEREF.DOUBLE.3 DEREF.POINTER.NULL LISP-STRING-TO-FOREIGN.EMPTY WITH-FOREIGN-POINTER.EVALX2 WITH-FOREIGN-POINTER.CONSTANT-SIZE MEM-REF.LEFT-TO-RIGHT %MEM-REF.LEFT-TO-RIGHT %MEM-SET.LEFT-TO-RIGHT MEM-AREF.EVAL-TYPE-X2 MEM-AREF.LEFT-TO-RIGHT MEM-REF.NESTED MEM-AREF.NESTED DEREF.AGGREGATE DEREF.ARRAY-OF-AGGREGATES POINTER.1 POINTER.2 POINTER.NULL FOREIGN-POINTER-TYPE.NIL MAKE-POINTER.HIGH INC-POINTER.ZERO FOREIGN-ALLOC.1 FOREIGN-ALLOC.2 FOREIGN-ALLOC.3 FOREIGN-ALLOC.4 FOREIGN-ALLOC.5 FOREIGN-ALLOC.6 FOREIGN-ALLOC.7 FOREIGN-ALLOC.8 FOREIGN-ALLOC.9 Test FOREIGN-ALLOC.10 failed Form: (FOREIGN-FREE (FOREIGN-ALLOC :CHAR :COUNT 0)) Expected value: NIL Actual value: 137439369056. DEREF.NONCONST.CHAR DEREF.NONCONST.UNSIGNED-CHAR DEREF.NONCONST.SHORT DEREF.NONCONST.UNSIGNED-SHORT DEREF.NONCONST.INT DEREF.NONCONST.UNSIGNED-INT DEREF.NONCONST.LONG DEREF.NONCONST.UNSIGNED-LONG DEREF.NONCONST.LONG-LONG DEREF.NONCONST.UNSIGNED-LONG-LONG DEREF.NONCONST.FLOAT.1 DEREF.NONCONST.FLOAT.2 DEREF.NONCONST.FLOAT.3 DEREF.NONCONST.DOUBLE.1 DEREF.NONCONST.DOUBLE.2 DEREF.NONCONST.DOUBLE.3 MEM-REF.RT.1 MEM-REF.RT.2 INCF-POINTER.1 INCF-POINTER.2 POINTERP.1 POINTERP.2 POINTERP.3 Test POINTERP.4 failed Form: (POINTERP 42) Expected value: NIL Actual value: T. Test POINTERP.5 failed Form: (POINTERP 0) Expected value: NIL Actual value: T. POINTERP.6 MEM-REF.SETF.1 Test POINTER-EQ.NON-POINTERS.1 failed Form: (EXPECTING-ERROR (POINTER-EQ 1 2)) Expected value: :ERROR Actual value: :NO-ERROR. Test POINTER-EQ.NON-POINTERS.2 failed Form: (EXPECTING-ERROR (POINTER-EQ 'A 'B)) Expected value: :ERROR Actual value: :NO-ERROR. NULL-POINTER-P.NON-POINTER.1 Test NULL-POINTER-P.NON-POINTER.2 failed Form: (EXPECTING-ERROR (NULL-POINTER-P 0)) Expected value: :ERROR Actual value: :NO-ERROR. NULL-POINTER-P.NON-POINTER.3 STRING.CONVERSION.BASIC STRING.CONVERSION.BASIC.2 STRING.ENCODING.ASCII Test STRING.ENCODING.UTF-16.BASIC failed Form: (WITH-FOREIGN-STRING (S *ASCII-TEST-STRING* :ENCODING :UTF-16) (FOREIGN-STRING-TO-LISP S :ENCODING :UTF-16)) Expected values: " !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~" 190 Actual values: " ℀∀⌀␀─☀✀⠀⤀⨀⬀Ⰰⴀ⸀⼀ ㄀㈀㌀㐀㔀㘀㜀㠀㤀㨀㬀㰀㴀㸀㼀䀀䄀䈀䌀䐀䔀䘀䜀䠀䤀䨀䬀䰀䴀一伀倀儀刀匀吀唀嘀圀堀夀娀嬀尀崀帀开怀愀戀挀搀攀昀最栀椀樀欀氀洀渀漀瀀焀爀猀琀甀瘀眀砀礀稀笀簀紀縀" 190. STRING.SHORT-WRITE.1 STRING.ENCODING.UTF-8.BASIC Test STRING.ENCODINGS.ALL.BASIC failed Form: (LET (FAILED) (DOLIST (ENCODING (LIST-LATIN-COMPATIBLE-ENCODINGS) FAILED) (WITH-FOREIGN-STRING (PTR *BASIC-LATIN-ALPHABET* :ENCODING ENCODING) (LET ((STRING (FOREIGN-STRING-TO-LISP PTR :ENCODING ENCODING))) (UNLESS (STRING= *BASIC-LATIN-ALPHABET* STRING) (PUSH ENCODING FAILED)))))) Expected value: NIL Actual value: #. STRING.ENCODINGS.DEFAULT STRUCT.1 STRUCT.2 STRUCT.3 STRUCT.4 STRUCT.NAMES STRUCT.5 STRUCT.STRING.1 STRUCT.STRING.2 STRUCT.ALIGNMENT.1 STRUCT.ALIGNMENT.2 STRUCT.ALIGNMENT.3 STRUCT.ALIGNMENT.4 STRUCT.ALIGNMENT.5 STRUCT.ALIGNMENT.6 STRUCT.ALIGNMENT.7 STRUCT.NESTED-SETF STRUCT.ALIGNMENT.8 STRUCT-WRAPPER.1 STRUCT-WRAPPER.2 UNION.1 ENUM.1 ENUM.2 ENUM.3 BITFIELD.1 BITFIELD.2 BITFIELD.3 BITFIELD.4 MISC-TYPES.STRING+PTR MISC-TYPES.BOOLEAN.1 MISC-TYPES.BOOLEAN.2 MISC-TYPES.WRAPPER MISC-TYPES.SIZED-INTS MISC-TYPES.EXPAND.1 MISC-TYPES.EXPAND.2 MISC-TYPES.EXPAND.3 MISC-TYPES.EXPAND.4 MISC-TYPES.EXPAND.5 MISC-TYPES.EXPAND.6 FOREIGN-SYMBOL-POINTER.1 FOREIGN-SYMBOL-POINTER.2 ; Foreign loading libdoesnotexistimsure. LIBRARY.ERROR.1 LIBRARY.T-CLAUSE SHAREABLE-VECTOR.1 SHAREABLE-VECTOR.2 21 out of 260 total tests failed: FUNCALL.VARARGS.DOUBLE, DEFCFUN.UNSIGNED-LONG-LONG, DEFCFUN.NOOP, DEFCFUN.VARARGS.FLOAT, DEFCFUN.VARARGS.DOUBLE, DEFCFUN.BFF.1, DEFCFUN.BFF.2, CALLBACKS.BFF.1, CALLBACKS.BFF.2, FOREIGN-GLOBALS.REF.UPPERCASEINT2, FOREIGN-GLOBALS.REF.UPPER-CASE-INT2, FOREIGN-GLOBALS.REF.MIXEDCASEINT2, FOREIGN-GLOBALS.REF.MIXED-CASE-INT2, FOREIGN-ALLOC.10, POINTERP.4, POINTERP.5, POINTER-EQ.NON-POINTERS.1, POINTER-EQ.NON-POINTERS.2, NULL-POINTER-P.NON-POINTER.2, STRING.ENCODING.UTF-16.BASIC, STRING.ENCODINGS.ALL.BASIC. 16 unexpected failures: FUNCALL.VARARGS.DOUBLE, DEFCFUN.VARARGS.FLOAT, DEFCFUN.VARARGS.DOUBLE, DEFCFUN.BFF.1, DEFCFUN.BFF.2, CALLBACKS.BFF.2, FOREIGN-GLOBALS.REF.UPPERCASEINT2, FOREIGN-GLOBALS.REF.UPPER-CASE-INT2, FOREIGN-GLOBALS.REF.MIXEDCASEINT2, FOREIGN-GLOBALS.REF.MIXED-CASE-INT2, FOREIGN-ALLOC.10, POINTERP.4, POINTERP.5, POINTER-EQ.NON-POINTERS.1, POINTER-EQ.NON-POINTERS.2, NULL-POINTER-P.NON-POINTER.2. ;;; running tests (compiled) Doing 260 pending tests of 260 tests total. LOAD-CORE-FOUNDATION FUNCALL.CHAR FUNCALL.INT.1 FUNCALL.INT.2 FUNCALL.LONG FUNCALL.LONG-LONG FUNCALL.UNSIGNED-LONG-LONG FUNCALL.FLOAT FUNCALL.DOUBLE FUNCALL.STRING.1 FUNCALL.STRING.2 FUNCALL.STRING.3 FUNCALL.VARARGS.CHAR FUNCALL.VARARGS.INT FUNCALL.VARARGS.LONG Test FUNCALL.VARARGS.DOUBLE failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SETF (MEM-REF S :CHAR) 0) (FOREIGN-FUNCALL "sprintf" :POINTER S :STRING "%.2f" :DOUBLE (COERCE PI 'DOUBLE-FLOAT) :INT)) Expected value: "3.14" Actual value: "0.00". FUNCALL.VARARGS.STRING FUNCALL.DOUBLE26 FUNCALL.FLOAT26 FUNCALL.F-S-P.1 FUNCALL.NIL-SKIP FUNCALL.POINTER-NOT-NIL DEFCFUN.PARSE-NAME-AND-OPTIONS.1 DEFCFUN.PARSE-NAME-AND-OPTIONS.2 DEFCFUN.PARSE-NAME-AND-OPTIONS.3 DEFCFUN.PARSE-NAME-AND-OPTIONS.4 DEFCFUN.PARSE-NAME-AND-OPTIONS.5 DEFCFUN.PARSE-NAME-AND-OPTIONS.6 DEFCFUN.PARSE-NAME-AND-OPTIONS.7 DEFCFUN.PARSE-NAME-AND-OPTIONS.8 TRANSLATE-UNDERSCORE-SEPARATED-NAME.TO-SYMBOL TRANSLATE-UNDERSCORE-SEPARATED-NAME.TO-STRING TRANSLATE-CAMELCASE-NAME.TO-SYMBOL TRANSLATE-CAMELCASE-NAME.TO-STRING TRANSLATE-CAMELCASE-NAME.TO-STRING-UPPER TRANSLATE-CAMELCASE-NAME.TO-SYMBOL-SPECIAL TRANSLATE-CAMELCASE-NAME.TO-STRING-SPECIAL TRANSLATE-NAME-FROM-FOREIGN.FUNCTION TRANSLATE-NAME-FROM-FOREIGN.VAR TRANSLATE-NAME-TO-FOREIGN.FUNCTION TRANSLATE-NAME-TO-FOREIGN.VAR DEFCFUN.CHAR DEFCFUN.DOCSTRING DEFCFUN.INT DEFCFUN.LONG DEFCFUN.LONG-LONG Test DEFCFUN.UNSIGNED-LONG-LONG failed Form: (LET ((ULLONG-MAX (1- (EXPT 2 (* 8 (FOREIGN-TYPE-SIZE :UNSIGNED-LONG-LONG)))))) (EQL ULLONG-MAX (ULLONG ULLONG-MAX))) Expected value: T Actual value: NIL. DEFCFUN.FLOAT DEFCFUN.DOUBLE DEFCFUN.STRING.1 DEFCFUN.STRING.2 DEFCFUN.STRING.3 DEFCFUN.NOARGS Test DEFCFUN.NOOP failed Form: (NOOP) Expected values: Actual value: NIL. DEFCFUN.VARARGS.DOCSTRINGS DEFCFUN.VARARGS.CHAR DEFCFUN.VARARGS.SHORT DEFCFUN.VARARGS.INT DEFCFUN.VARARGS.LONG Test DEFCFUN.VARARGS.FLOAT failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SPRINTF S "%.2f" :FLOAT (FLOAT PI))) Expected value: "3.14" Actual value: "0.00". Test DEFCFUN.VARARGS.DOUBLE failed Form: (WITH-FOREIGN-POINTER-AS-STRING (S 100) (SPRINTF S "%.2f" :DOUBLE (FLOAT PI 1.0d0))) Expected value: "3.14" Actual value: "0.00". DEFCFUN.VARARGS.STRING Test DEFCFUN.BFF.1 failed Form: (SUM-127-NO-LL 1442906394 520035521 -4715 50335 -13557.0 -30892.0d0 24061483 -23737.0 22 2348 4986 104895680 8073.0d0 -571698147 102484400 (MAKE-POINTER 507907275) 12733353 7824 -1275845284 13602.0 (MAKE-POINTER 286958390) -8042.0 -773681663 -1289932452 31199 -154985357 -170994216 16845.0d0 177 218969221 2794350893 6068863 26327 127699339 (MAKE-POINTER 184352771) 18512.0d0 -12345.0d0 -179853040 -19981 37268 -792845398 116 -1084653028 50494 (MAKE-POINTER 2105239646) -1710519651 1557813312 2839.0d0 90 180 30580.0 -532698978 8623 9537.0d0 -10882 54 184357206 14929.0 -8190.0 -25615.0 (MAKE-POINTER 235310526) (MAKE-POINTER 220476977) 7476055 1576685 -117 -11781 31479 23282640 (MAKE-POINTER 8627281) -17834.0 10391.0d0 -1904504370 114393659 -17062 637873619 16078 -891210259 8107 0 760.0d0 -21268 104 14133.0 10 588598141 310.0d0 20 1351785456 16159552 -10121.0d0 -25866 24821 68232851 60 -24132.0 -1660411658 13387.0 -786516668 -499825680 -1128144619 111849719 2746091587 -2 95 14488 326328135 64781 18204 150716680 -703859275 103 16809.0d0 852235610 -43 21088 242356110 324325428 -22380 23 24814.0 (MAKE-POINTER 40362014) -14322.0d0 -1864262539 523684371 -21 49995 -29175.0) Expected value: 796447501 Actual value: #. Test DEFCFUN.BFF.2 failed Form: (SUM-127 (MAKE-POINTER 2746181372) (MAKE-POINTER 177623060) -32334.0 3158055028 (MAKE-POINTER 242315091) 4288001754991016425 -21047.0d0 287.0d0 18722 243379286 -8677366518541007140 581399424 -13872 4240394881 1353358999 226 969197676 -26207.0d0 6484 11150 1241680089902988480 106068320 61865 2253 (MAKE-POINTER 866809333) -31613 35616 11715 1393601698 8940888681199591845 (MAKE-POINTER 1524606024) 805638893 3315410736 3432596795 (MAKE-POINTER 1490355706) 696175657106383698 -25438.0 1294381547 26724 (MAKE-POINTER 3196569545) 2506913373410783697 -4405955718732597856 4075932032 3224670123 2183829215657835866 1318320964 -22 -3786.0d0 -2017024146 1579225515 -626617701 -1456 (MAKE-POINTER 3561444187) 395687791 1968033632506257320 -1847773261 48853 142937735275669133 -17974.0 (MAKE-POINTER 2791749948) -14140.0 2707 3691328585 3306.0 1132012981 303633191773289330 (MAKE-POINTER 981183954) 9114.0d0 8664374572369470 -19013.0d0 -10288.0d0 -3679345119891954339 (MAKE-POINTER 3538786709) 23761 -154264605 (MAKE-POINTER 2694396308) 7023 997.0d0 1009561368 241 (MAKE-POINTER 2612292671) 48 1431872408 -32675.0d0 (MAKE-POINTER 1587599336) 958916472 -9857.0d0 111 -14370.0d0 -7308 -967514912 488790941 2146978095 -24111.0d0 13711 86681861 717987770 111 1013402998690933877 17234.0d0 -8772.0 3959216275 -8711 (MAKE-POINTER 3142780851) 9480.0 -3820453146461186120 1616574376 -3336232268263990050 -1906114671562979758 -27925.0d0 9695970875869913114 27033.0d0 1096518219 -12 104 3392025403 -27911 60 89 509297051 -533066551 29158.0 110 54 -9802.0d0 593950442165910888 -79) Expected value: 7758614658402721936 Actual value: #. DEFCFUN.UNDEFINED DEFCFUN.DOUBLE26 DEFCFUN.FLOAT26 CALLBACKS.CHAR CALLBACKS.UNSIGNED-CHAR CALLBACKS.SHORT CALLBACKS.UNSIGNED-SHORT CALLBACKS.INT CALLBACKS.UNSIGNED-INT CALLBACKS.LONG CALLBACKS.UNSIGNED-LONG CALLBACKS.LONG-LONG CALLBACKS.UNSIGNED-LONG-LONG CALLBACKS.FLOAT CALLBACKS.DOUBLE CALLBACKS.POINTER CALLBACKS.STRING CALLBACKS.STRING-NOT-DOCSTRING CALLBACKS.NIL-FOR-NULL CALLBACKS.QSORT CALLBACKS.VOID CALLBACKS.FUNCALL.1 CALLBACKS.FUNCALL.2 Test CALLBACKS.BFF.1 failed Form: (CALL-SUM-127-NO-LL (CALLBACK SUM-127-NO-LL)) Expected value: 2008547941 Actual value: -4558794935252564847. Test CALLBACKS.BFF.2 failed Form: (CALL-SUM-127 (CALLBACK SUM-127)) Expected value: 8166570665645582011 Actual value: 1869687968912265330. CALLBACKS.NON-EXISTANT CALLBACKS.DOUBLE26 CALLBACKS.DOUBLE26.FUNCALL CALLBACKS.FLOAT26 CALLBACKS.FLOAT26.FUNCALL CALLBACKS.UNINTERNED FOREIGN-GLOBALS.REF.CHAR FOREIGN-GLOBALS.REF.UNSIGNED-CHAR FOREIGN-GLOBALS.REF.SHORT FOREIGN-GLOBALS.REF.UNSIGNED-SHORT FOREIGN-GLOBALS.REF.INT FOREIGN-GLOBALS.REF.UNSIGNED-INT FOREIGN-GLOBALS.REF.LONG FOREIGN-GLOBALS.REF.UNSIGNED-LONG FOREIGN-GLOBALS.REF.FLOAT FOREIGN-GLOBALS.REF.DOUBLE FOREIGN-GLOBALS.REF.POINTER FOREIGN-GLOBALS.REF.STRING FOREIGN-GLOBALS.REF.LONG-LONG FOREIGN-GLOBALS.REF.UNSIGNED-LONG-LONG FOREIGN-GLOBALS.SET.INT FOREIGN-GLOBALS.SET.STRING FOREIGN-GLOBALS.SET.LONG-LONG FOREIGN-GLOBALS.GET-VAR-POINTER.1 FOREIGN-GLOBALS.GET-VAR-POINTER.2 FOREIGN-GLOBALS.REF.UPPERCASEINT1 FOREIGN-GLOBALS.REF.UPPER-CASE-INT1 FOREIGN-GLOBALS.REF.MIXEDCASEINT1 FOREIGN-GLOBALS.REF.MIXED-CASE-INT1 ; While compiling (:ANONYMOUS-LAMBDA 148): Warning: Free reference to undeclared variable *UPPERCASEINT2* assumed special. Test FOREIGN-GLOBALS.REF.UPPERCASEINT2 failed Form: *UPPERCASEINT2* Expected value: 12345 Actual value: #. ; While compiling (:ANONYMOUS-LAMBDA 149): Warning: Free reference to undeclared variable *UPPER-CASE-INT2* assumed special. Test FOREIGN-GLOBALS.REF.UPPER-CASE-INT2 failed Form: *UPPER-CASE-INT2* Expected value: 23456 Actual value: #. ; While compiling (:ANONYMOUS-LAMBDA 150): Warning: Free reference to undeclared variable *MIXEDCASEINT2* assumed special. Test FOREIGN-GLOBALS.REF.MIXEDCASEINT2 failed Form: *MIXEDCASEINT2* Expected value: 34567 Actual value: #. ; While compiling (:ANONYMOUS-LAMBDA 151): Warning: Free reference to undeclared variable *MIXED-CASE-INT2* assumed special. Test FOREIGN-GLOBALS.REF.MIXED-CASE-INT2 failed Form: *MIXED-CASE-INT2* Expected value: 45678 Actual value: #. FOREIGN-GLOBALS.REF.UPPERCASEINT3 FOREIGN-GLOBALS.REF.UPPER-CASE-INT3 FOREIGN-GLOBALS.REF.MIXEDCASEINT3 FOREIGN-GLOBALS.REF.MIXED-CASE-INT3 FOREIGN-GLOBALS.SYMBOL-NAME FOREIGN-GLOBALS.READ-ONLY.1 DEFCVAR.DOCSTRING FOREIGN-GLOBALS.UNDEFINED.1 FOREIGN-GLOBALS.ERROR.1 DEREF.CHAR DEREF.UNSIGNED-CHAR DEREF.SHORT DEREF.UNSIGNED-SHORT DEREF.INT DEREF.UNSIGNED-INT DEREF.LONG DEREF.UNSIGNED-LONG DEREF.LONG-LONG DEREF.UNSIGNED-LONG-LONG DEREF.FLOAT.1 DEREF.FLOAT.2 DEREF.FLOAT.3 DEREF.DOUBLE.1 DEREF.DOUBLE.2 DEREF.DOUBLE.3 DEREF.POINTER.NULL LISP-STRING-TO-FOREIGN.EMPTY WITH-FOREIGN-POINTER.EVALX2 WITH-FOREIGN-POINTER.CONSTANT-SIZE MEM-REF.LEFT-TO-RIGHT %MEM-REF.LEFT-TO-RIGHT %MEM-SET.LEFT-TO-RIGHT MEM-AREF.EVAL-TYPE-X2 MEM-AREF.LEFT-TO-RIGHT MEM-REF.NESTED MEM-AREF.NESTED DEREF.AGGREGATE DEREF.ARRAY-OF-AGGREGATES POINTER.1 POINTER.2 POINTER.NULL FOREIGN-POINTER-TYPE.NIL MAKE-POINTER.HIGH INC-POINTER.ZERO FOREIGN-ALLOC.1 FOREIGN-ALLOC.2 FOREIGN-ALLOC.3 FOREIGN-ALLOC.4 FOREIGN-ALLOC.5 FOREIGN-ALLOC.6 FOREIGN-ALLOC.7 FOREIGN-ALLOC.8 FOREIGN-ALLOC.9 Test FOREIGN-ALLOC.10 failed Form: (FOREIGN-FREE (FOREIGN-ALLOC :CHAR :COUNT 0)) Expected value: NIL Actual value: 137439369376. DEREF.NONCONST.CHAR DEREF.NONCONST.UNSIGNED-CHAR DEREF.NONCONST.SHORT DEREF.NONCONST.UNSIGNED-SHORT DEREF.NONCONST.INT DEREF.NONCONST.UNSIGNED-INT DEREF.NONCONST.LONG DEREF.NONCONST.UNSIGNED-LONG DEREF.NONCONST.LONG-LONG DEREF.NONCONST.UNSIGNED-LONG-LONG DEREF.NONCONST.FLOAT.1 DEREF.NONCONST.FLOAT.2 DEREF.NONCONST.FLOAT.3 DEREF.NONCONST.DOUBLE.1 DEREF.NONCONST.DOUBLE.2 DEREF.NONCONST.DOUBLE.3 MEM-REF.RT.1 MEM-REF.RT.2 INCF-POINTER.1 INCF-POINTER.2 POINTERP.1 POINTERP.2 POINTERP.3 Test POINTERP.4 failed Form: (POINTERP 42) Expected value: NIL Actual value: T. Test POINTERP.5 failed Form: (POINTERP 0) Expected value: NIL Actual value: T. POINTERP.6 MEM-REF.SETF.1 Test POINTER-EQ.NON-POINTERS.1 failed Form: (EXPECTING-ERROR (POINTER-EQ 1 2)) Expected value: :ERROR Actual value: :NO-ERROR. Test POINTER-EQ.NON-POINTERS.2 failed Form: (EXPECTING-ERROR (POINTER-EQ 'A 'B)) Expected value: :ERROR Actual value: :NO-ERROR. NULL-POINTER-P.NON-POINTER.1 Test NULL-POINTER-P.NON-POINTER.2 failed Form: (EXPECTING-ERROR (NULL-POINTER-P 0)) Expected value: :ERROR Actual value: :NO-ERROR. NULL-POINTER-P.NON-POINTER.3 STRING.CONVERSION.BASIC STRING.CONVERSION.BASIC.2 STRING.ENCODING.ASCII Test STRING.ENCODING.UTF-16.BASIC failed Form: (WITH-FOREIGN-STRING (S *ASCII-TEST-STRING* :ENCODING :UTF-16) (FOREIGN-STRING-TO-LISP S :ENCODING :UTF-16)) Expected values: " !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~" 190 Actual values: " ℀∀⌀␀─☀✀⠀⤀⨀⬀Ⰰⴀ⸀⼀ ㄀㈀㌀㐀㔀㘀㜀㠀㤀㨀㬀㰀㴀㸀㼀䀀䄀䈀䌀䐀䔀䘀䜀䠀䤀䨀䬀䰀䴀一伀倀儀刀匀吀唀嘀圀堀夀娀嬀尀崀帀开怀愀戀挀搀攀昀最栀椀樀欀氀洀渀漀瀀焀爀猀琀甀瘀眀砀礀稀笀簀紀縀" 190. STRING.SHORT-WRITE.1 STRING.ENCODING.UTF-8.BASIC Test STRING.ENCODINGS.ALL.BASIC failed Form: (LET (FAILED) (DOLIST (ENCODING (LIST-LATIN-COMPATIBLE-ENCODINGS) FAILED) (WITH-FOREIGN-STRING (PTR *BASIC-LATIN-ALPHABET* :ENCODING ENCODING) (LET ((STRING (FOREIGN-STRING-TO-LISP PTR :ENCODING ENCODING))) (UNLESS (STRING= *BASIC-LATIN-ALPHABET* STRING) (PUSH ENCODING FAILED)))))) Expected value: NIL Actual value: #. STRING.ENCODINGS.DEFAULT STRUCT.1 STRUCT.2 STRUCT.3 STRUCT.4 STRUCT.NAMES STRUCT.5 STRUCT.STRING.1 STRUCT.STRING.2 STRUCT.ALIGNMENT.1 STRUCT.ALIGNMENT.2 STRUCT.ALIGNMENT.3 STRUCT.ALIGNMENT.4 STRUCT.ALIGNMENT.5 STRUCT.ALIGNMENT.6 STRUCT.ALIGNMENT.7 STRUCT.NESTED-SETF STRUCT.ALIGNMENT.8 STRUCT-WRAPPER.1 STRUCT-WRAPPER.2 UNION.1 ENUM.1 ENUM.2 ENUM.3 BITFIELD.1 BITFIELD.2 BITFIELD.3 BITFIELD.4 MISC-TYPES.STRING+PTR MISC-TYPES.BOOLEAN.1 MISC-TYPES.BOOLEAN.2 MISC-TYPES.WRAPPER MISC-TYPES.SIZED-INTS MISC-TYPES.EXPAND.1 MISC-TYPES.EXPAND.2 MISC-TYPES.EXPAND.3 MISC-TYPES.EXPAND.4 MISC-TYPES.EXPAND.5 MISC-TYPES.EXPAND.6 FOREIGN-SYMBOL-POINTER.1 FOREIGN-SYMBOL-POINTER.2 ; Foreign loading libdoesnotexistimsure. LIBRARY.ERROR.1 LIBRARY.T-CLAUSE SHAREABLE-VECTOR.1 SHAREABLE-VECTOR.2 21 out of 260 total tests failed: FUNCALL.VARARGS.DOUBLE, DEFCFUN.UNSIGNED-LONG-LONG, DEFCFUN.NOOP, DEFCFUN.VARARGS.FLOAT, DEFCFUN.VARARGS.DOUBLE, DEFCFUN.BFF.1, DEFCFUN.BFF.2, CALLBACKS.BFF.1, CALLBACKS.BFF.2, FOREIGN-GLOBALS.REF.UPPERCASEINT2, FOREIGN-GLOBALS.REF.UPPER-CASE-INT2, FOREIGN-GLOBALS.REF.MIXEDCASEINT2, FOREIGN-GLOBALS.REF.MIXED-CASE-INT2, FOREIGN-ALLOC.10, POINTERP.4, POINTERP.5, POINTER-EQ.NON-POINTERS.1, POINTER-EQ.NON-POINTERS.2, NULL-POINTER-P.NON-POINTER.2, STRING.ENCODING.UTF-16.BASIC, STRING.ENCODINGS.ALL.BASIC. 16 unexpected failures: FUNCALL.VARARGS.DOUBLE, DEFCFUN.VARARGS.FLOAT, DEFCFUN.VARARGS.DOUBLE, DEFCFUN.BFF.1, DEFCFUN.BFF.2, CALLBACKS.BFF.2, FOREIGN-GLOBALS.REF.UPPERCASEINT2, FOREIGN-GLOBALS.REF.UPPER-CASE-INT2, FOREIGN-GLOBALS.REF.MIXEDCASEINT2, FOREIGN-GLOBALS.REF.MIXED-CASE-INT2, FOREIGN-ALLOC.10, POINTERP.4, POINTERP.5, POINTER-EQ.NON-POINTERS.1, POINTER-EQ.NON-POINTERS.2, NULL-POINTER-P.NON-POINTER.2. T CL-USER>