;;; Compiling file /home/binghe/Lisp/cffi/tests/foreign-globals.lisp ... ;;; Safety = 3, Speed = 1, Space = 1, Float = 1, Interruptible = 0 ;;; Compilation speed = 1, Debug = 2, Fixnum safety = 3 ;;; Source level debugging is on ;;; Source file recording is on ;;; Cross referencing is on ; (TOP-LEVEL-FORM 1) ; (TOP-LEVEL-FORM 2) ; (TOP-LEVEL-FORM 3) ; (TOP-LEVEL-FORM 4) ; CFFI-TESTS::%VAR-ACCESSOR-*CHAR-VAR* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*CHAR-VAR*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*CHAR-VAR*) ; (TOP-LEVEL-FORM 5) ; (TOP-LEVEL-FORM 6) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-CHAR* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-CHAR*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-UNSIGNED-CHAR*) ; (TOP-LEVEL-FORM 7) ; (TOP-LEVEL-FORM 8) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-SHORT* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-SHORT*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-SHORT*) ; (TOP-LEVEL-FORM 9) ; (TOP-LEVEL-FORM 10) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-SHORT* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-SHORT*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-UNSIGNED-SHORT*) ; (TOP-LEVEL-FORM 11) ; (TOP-LEVEL-FORM 12) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-INT* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-INT*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-INT*) ; (TOP-LEVEL-FORM 13) ; (TOP-LEVEL-FORM 14) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-INT* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-INT*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-UNSIGNED-INT*) ; (TOP-LEVEL-FORM 15) ; (TOP-LEVEL-FORM 16) **++++ Error in CFFI-TESTS::%VAR-ACCESSOR-*VAR-LONG*: Type (SIGNED-BYTE 64) not supported by SYSTEM:TYPED-AREF. ; (TOP-LEVEL-FORM 17) ; (TOP-LEVEL-FORM 18) **++++ Error in CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-LONG*: Type (UNSIGNED-BYTE 64) not supported by SYSTEM:TYPED-AREF. ; (TOP-LEVEL-FORM 19) ; (TOP-LEVEL-FORM 20) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-FLOAT* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-FLOAT*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-FLOAT*) ; (TOP-LEVEL-FORM 21) ; (TOP-LEVEL-FORM 22) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-DOUBLE* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-DOUBLE*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-DOUBLE*) ; (TOP-LEVEL-FORM 23) ; (TOP-LEVEL-FORM 24) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-POINTER* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-POINTER*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-POINTER*) ; (TOP-LEVEL-FORM 25) ; (TOP-LEVEL-FORM 26) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-STRING* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-STRING*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-STRING*) ; (TOP-LEVEL-FORM 27) ; (TOP-LEVEL-FORM 28) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-LONG-LONG* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-LONG-LONG*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-LONG-LONG*) ; (TOP-LEVEL-FORM 29) ; (TOP-LEVEL-FORM 30) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-LONG-LONG* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-UNSIGNED-LONG-LONG*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-UNSIGNED-LONG-LONG*) ; (TOP-LEVEL-FORM 31) ; (TOP-LEVEL-FORM 32) ; (TOP-LEVEL-FORM 33) ; (TOP-LEVEL-FORM 34) ; (TOP-LEVEL-FORM 35) ; (TOP-LEVEL-FORM 36) ; (TOP-LEVEL-FORM 37) ; (TOP-LEVEL-FORM 38) ; (TOP-LEVEL-FORM 39) ; (TOP-LEVEL-FORM 40) ; (TOP-LEVEL-FORM 41) ; (TOP-LEVEL-FORM 42) ; (TOP-LEVEL-FORM 43) ; (TOP-LEVEL-FORM 44) ; CFFI-TESTS::WITH-OLD-VALUE-RESTORED ; (TOP-LEVEL-FORM 45) ; (TOP-LEVEL-FORM 46) ; (TOP-LEVEL-FORM 47) ; (TOP-LEVEL-FORM 48) ; (TOP-LEVEL-FORM 49) ; (TOP-LEVEL-FORM 50) ; (TOP-LEVEL-FORM 51) ; CFFI-TESTS::%VAR-ACCESSOR-*UPPERCASEINT1* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*UPPERCASEINT1*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*UPPERCASEINT1*) ; (TOP-LEVEL-FORM 52) ; (TOP-LEVEL-FORM 53) ; CFFI-TESTS::%VAR-ACCESSOR-*UPPER-CASE-INT1* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*UPPER-CASE-INT1*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*UPPER-CASE-INT1*) ; (TOP-LEVEL-FORM 54) ; (TOP-LEVEL-FORM 55) ; CFFI-TESTS::%VAR-ACCESSOR-*MIXEDCASEINT1* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*MIXEDCASEINT1*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*MIXEDCASEINT1*) ; (TOP-LEVEL-FORM 56) ; (TOP-LEVEL-FORM 57) ; CFFI-TESTS::%VAR-ACCESSOR-*MIXED-CASE-INT1* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*MIXED-CASE-INT1*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*MIXED-CASE-INT1*) ; (TOP-LEVEL-FORM 58) ; (TOP-LEVEL-FORM 59) ; (TOP-LEVEL-FORM 60) ; (TOP-LEVEL-FORM 61) ; (TOP-LEVEL-FORM 62) ; (TOP-LEVEL-FORM 63) ; (TOP-LEVEL-FORM 64) ; (TOP-LEVEL-FORM 65) ; (TOP-LEVEL-FORM 66) ; (TOP-LEVEL-FORM 67) ; (TOP-LEVEL-FORM 68) ; (TOP-LEVEL-FORM 69) ; (TOP-LEVEL-FORM 70) ; (TOP-LEVEL-FORM 71) ; (TOP-LEVEL-FORM 72) ; (TOP-LEVEL-FORM 73) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-CHAR* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-CHAR*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-CHAR*) ; (TOP-LEVEL-FORM 74) ; (TOP-LEVEL-FORM 75) ; CFFI-TESTS::%VAR-ACCESSOR-VAR-CHAR ; (SETF CFFI-TESTS::%VAR-ACCESSOR-VAR-CHAR) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::VAR-CHAR) ; (TOP-LEVEL-FORM 76) ; (TOP-LEVEL-FORM 77) ; (TOP-LEVEL-FORM 78) ; (TOP-LEVEL-FORM 79) ; (TOP-LEVEL-FORM 80) ; (TOP-LEVEL-FORM 81) ; (TOP-LEVEL-FORM 82) ; CFFI-TESTS::%VAR-ACCESSOR-*NS-VAR1* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*NS-VAR1*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*NS-VAR1*) ; (TOP-LEVEL-FORM 83) ; (TOP-LEVEL-FORM 84) ; CFFI-TESTS::%VAR-ACCESSOR-*NS-VAR2* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*NS-VAR2*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*NS-VAR2*) ; (TOP-LEVEL-FORM 85) ; (TOP-LEVEL-FORM 86) ; (TOP-LEVEL-FORM 87) ; CFFI-TESTS::%VAR-ACCESSOR-*VAR-CHAR-RO* ; (SETF CFFI-TESTS::%VAR-ACCESSOR-*VAR-CHAR-RO*) ; (DEFINE-SYMBOL-MACRO CFFI-TESTS::*VAR-CHAR-RO*) ; (TOP-LEVEL-FORM 88) ; (TOP-LEVEL-FORM 89) ; *** 2 errors detected, no fasl file produced. Warning: COMPILE-FILE warned while performing # on #. Warning: COMPILE-FILE failed while performing # on #. Error: erred while invoking # on # 1 (continue) Retry performing # on #. 2 Continue, treating # on # as having been successful. 3 Retry performing # on #. 4 Continue, treating # on # as having been successful. 5 (abort) Return to level 0. 6 Restart top-level loop. Type :b for backtrace, :c