To load "cl-cuda-test":
  Load 1 ASDF system:
    cl-cuda-test
; Loading "cl-cuda-test"
......
 test cuInit
Invoking CU-INIT succeded.
 test cuDeviceGet
Invoking CU-DEVICE-GET succeded.
CUDA device handle: 0
 test cuDeviceGetCount
Invoking CU-DEVICE-GET-COUNT succeded.
CUDA device count: 2
 test cuDeviceComputeCapability
Invoking CU-DEVICE-GET succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
CUDA device compute capability: 6.1
 test cuDeviceGetName
Invoking CU-DEVICE-GET succeded.
Invoking CU-DEVICE-GET-NAME succeded.
CUDA device name: GeForce GTX 1080
 test cuCtxCreate/cuCtxDestroy
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-CTX-DESTROY succeded.
 test cuMemAlloc/cuMemFree
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 test cuMemAlloc/cuMemFree using WITH-CU-CONTEXT macro
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 test cuMemcpyHtoD/cuMemcpyDtoH
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 test cuModuleLoad
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MODULE-LOAD succeded.
CUDA module "vectorAdd_kernel.ptx" is loaded.
Invoking CU-CTX-DESTROY succeded.
 test cuModuleGetFunction
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-CTX-DESTROY succeded.
 test cuModuleGetGlobal
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-GLOBAL succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? 42 is expected to be 42
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-EVENT-CREATE succeded.
Invoking CU-EVENT-CREATE succeded.
Invoking CU-EVENT-RECORD succeded.
Invoking CU-EVENT-RECORD succeded.
Invoking CU-EVENT-SYNCHRONIZE succeded.
Invoking CU-EVENT-ELAPSED-TIME succeded.
CUDA Event - elapsed time: 0.001024
Invoking CU-EVENT-DESTROY succeded.
Invoking CU-EVENT-DESTROY succeded.
Invoking CU-CTX-DESTROY succeded.

? 1 test completed (0ms)
 C-IDENTIFIER
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

 LINES
  ? basic case 1

  ? basic case 2

 UNLINES
  ? basic case 1

 INDENT
  ? basic case 1

  ? basic case 2

? 11 tests completed (0ms)
 Float3
 float3 foreign translation
    ? 0.0 is expected to be 0.0

    ? 1.0 is expected to be 1.0

    ? 2.0 is expected to be 2.0
.
 with-float3
    ? 0.0 is expected to be 0.0

    ? 1.0 is expected to be 1.0

    ? 2.0 is expected to be 2.0

 with-float4
    ? 0.0 is expected to be 0.0

    ? 1.0 is expected to be 1.0

    ? 2.0 is expected to be 2.0

    ? 3.0 is expected to be 3.0

 with-double3
    ? 0.0d0 is expected to be 0.0d0

    ? 1.0d0 is expected to be 1.0d0

    ? 2.0d0 is expected to be 2.0d0

 with-double4
    ? 0.0d0 is expected to be 0.0d0

    ? 1.0d0 is expected to be 1.0d0

    ? 2.0d0 is expected to be 2.0d0

    ? 3.0d0 is expected to be 3.0d0

? 5 tests completed (0ms)
 CL-CUDA-TYPE-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 CFFI-TYPE
  ? basic case 1

  ? basic case 2

  ? basic case 3

 CFFI-TYPE-SIZE
  ? basic case 1

  ? basic case 2

  ? basic case 3

 CUDA-TYPE
  ? basic case 1

  ? basic case 2

  ? basic case 3

 STRUCTURE-ACCESSOR-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

 STRUCTURE-ACCESSOR-CUDA-ACCESSOR
  ? basic case 1

  ? basic case 2

  ? ACCESSOR which is not an invalid accessor.

 STRUCTURE-ACCESSOR-RETURN-TYPE
  ? basic case 1

  ? basic case 2

  ? ACCESSOR which is not an invalid accessor.

 ARRAY-TYPE-BASE
  ? basic case 1

  ? basic case 2

 ARRAY-TYPE-DIMENSION
  ? basic case 1

  ? basic case 2

? 26 tests completed (0ms)
 Macro
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 Literal
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 Reference
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

 Inline-if
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 Function application
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

  ? FORM which is an invalid function application.

  ? basic case 7

  ? basic case 8

  ? basic case 9

  ? FORM which is an invalid function application.

  ? basic case 10

  ? basic case 11

  ? basic case 12

 If statement
  ? basic case 1

 Symbol-macrolet statement
  ? basic case 1

  ? basic case 2

  ? basic case 3

 Macrolet statement
  ? basic case 1

  ? basic case 2

  ? basic case 3

 Do statement
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 Do statement - binding
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 WITH-SHARED-MEMORY-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 WITH-SHARED-MEMORY-SPEC-P
  ? basic case 1

  ? basic case 2

 Set statement
  ? basic case 1

  ? basic case 2

? 58 tests completed (0ms)
 Variable environment - Variable
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

  ? basic case 7

  ? basic case 8

 Variable environment - Symbol macro
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 Variable environment - Global
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

  ? basic case 7

  ? basic case 8

  ? Invalid name.

  ? Invalid cl-cuda type.

  ? Invalid variable environment.

  ? Invalid variable environment.

  ? Invalid name.

  ? Invalid variable environment.

  ? Invalid name.

  ? Invalid variable environment.

  ? Invalid name.

  ? Invalid variable environment.

  ? Invalid name.

  ? Invalid variable environment.

  ? Invalid name.

 Function environment - Function
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

  ? basic case 7

 Function environment - Macro
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

? 46 tests completed (1ms)
 BUILT-IN-FUNCTION-RETURN-TYPE
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 BUILT-IN-FUNCTION-INFIX-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

 BUILT-IN-FUNCTION-C-NAME
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

? 12 tests completed (0ms)
 MAKE-KERNEL
  ? basic case 1

  ? basic case 2

 KERNEL-FUNCTION-NAMES
  ? basic case 1

 KERNEL-MACRO-NAMES
  ? basic case 1

 KERNEL-SYMBOL-MACRO-NAMES
  ? kernel basic 1

 KERNEL-GLOBAL-NAMES
  ? kernel basic 1

 KERNEL-DEFINE-FUNCTION
  ? basic case 1

  ? NAME which is not a cl-cuda symbol.

  ? RETURN-TYPE which is not a cl-cuda type.

  ? ARGUMENTS which are invlalid arguments.

 KERNEL-FUNCTION-EXISTS-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

 KERNEL-DEFINE-MACRO
  ? basic case 1

  ? NAME which is not a cl-cuda symbol.

 KERNEL-MACRO-EXISTS-P
  ? basic case 1

  ? basic case 2

  ? basic case 3

 EXPAND-MACRO-1
  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((FOO 1) T) is expected to be ((FOO 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (A T) is expected to be (A T)

  ? (C NIL) is expected to be (C NIL)

  ? (EXPAND-MACRO-1 '(FOO) KERNEL) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {1004F5B673}>)

 EXPAND-MACRO
  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (1.0 T) is expected to be (1.0 T)

  ? (C NIL) is expected to be (C NIL)

  ? (EXPAND-MACRO '(FOO) KERNEL) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {10050272D3}>)

 KERNEL-DEFINE-SYMBOL-MACRO
  ? basic case 1

  ? NAME which is not a cl-cuda symbol.

 KERNEL-SYMBOL-MACRO-EXISTS-P
  ? basic case 1

  ? basic case 2

 kernel-define-global
    ? T is expected to be T

    ? FOO is expected to be FOO

    ? "cl_cuda_test_lang_kernel_foo" is expected to be "cl_cuda_test_lang_kernel_foo"

    ? (:DEVICE) is expected to be (:DEVICE)

    ? 42 is expected to be 42

    ? T is expected to be T

    ? NIL is expected to be NIL

    ? (:DEVICE :CONSTANT) is expected to be (:DEVICE :CONSTANT)

    ? Invalid kernel.

    ? Invalid name.

    ? Invalid qualifier.

 kernel-global-exists-p
    ? T is expected to be T

    ? NIL is expected to be NIL

    ? NIL is expected to be NIL

    ? Invalid kernel.

    ? Invalid name.

 kernel-global-name
    ? FOO is expected to be FOO

    ? Global not found.

    ? Invalid kernel.

    ? Invalid name.

 kernel-global-c-name
    ? "cl_cuda_test_lang_kernel_foo" is expected to be "cl_cuda_test_lang_kernel_foo"

    ? Global not found.

    ? Invalid kernel.

    ? Invalid name.

 kernel-global-qualifiers
    ? (:DEVICE) is expected to be (:DEVICE)

    ? Global not found.

    ? Invalid kernel.

    ? Invalid name.

 kernel-global-initializer
    ? 42 is expected to be 42

    ? Global not found.

    ? Invalid kernel.

    ? Invalid name.

? 42 tests completed (1ms)
 COMPILE-SYMBOL
  ? basic case 1

  ? basic case 2

 COMPILE-BOOL
  ? basic case 1

  ? basic case 2

 COMPILE-INT
  ? basic case 1

 COMPILE-FLOAT
  ? basic case 1

 COMPILE-DOUBLE
  ? basic case 1

  ? basic case 2

? 8 tests completed (0ms)
 COMPILE-TYPE
  ? basic case 1

? 1 test completed (0ms)
 TYPE-OF-EXPRESSION
  ? INT is expected to be INT

 TYPE-OF-LITERAL
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 TYPE-OF-CUDA-DIMENSION
  ? basic case 1

 TYPE-OF-REFERENCE - VARIABLE
  ? basic case 1

  ? basic caase 2

  ? FORM which is a variable not found.

  ? FORM which is a variable not found.

 TYPE-OF-REFERENCE - STRUCTURE
  ? FLOAT is expected to be FLOAT

  ? FLOAT is expected to be FLOAT

  ? (TYPE-OF-REFERENCE '(FLOAT4-X X) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The structure reference ~S is invalid." {100514A7A3}>)

 TYPE-OF-REFERENCE - ARRAY
  ? (TYPE-OF-REFERENCE '(AREF X) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The expression ~S is malformed." {1005356553}>)

  ? INT is expected to be INT

  ? (TYPE-OF-REFERENCE '(AREF X 0 0) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The dimension of array reference ~S is invalid." {10053658F3}>)

  ? (TYPE-OF-REFERENCE '(AREF X 0) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The dimension of array reference ~S is invalid." {100536E213}>)

  ? INT is expected to be INT

 TYPE-OF-INLINE-IF
  ? (TYPE-OF-INLINE-IF '(IF) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The expression ~S is malformed." {100537BC83}>)

  ? (TYPE-OF-INLINE-IF '(IF (= 1 1)) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The expression ~S is malformed." {1005380143}>)

  ? (TYPE-OF-INLINE-IF
     '(IF (= 1 1)
          1)
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The expression ~S is malformed." {1005384843}>)

  ? INT is expected to be INT

  ? (TYPE-OF-INLINE-IF
     '(IF 1
          2
          3)
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of expression ~S is invalid." {100538C0A3}>)

  ? (TYPE-OF-INLINE-IF
     '(IF (= 1 1)
          1
          2.0)
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of expression ~S is invalid." {1005391C43}>)

 TYPE-OF-FUNCTION
  ? INT is expected to be INT

  ? INT is expected to be INT

  ? FLOAT is expected to be FLOAT

  × (TYPE-OF-FUNCTION '(+ 1 1.0) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got FLOAT)

  ? FLOAT is expected to be FLOAT

× 1 of 30 tests failed (0ms)
 COMPILE-EXPRESSION
  ? "1" is expected to be "1"

 COMPILE-MACRO
  ? basic case 1

 COMPILE-SYMBOL-MACRO
  ? basic case 1

 COMPILE-LITERAL
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

 COMPILE-CUDA-DIMENSION
  ? basic case 1

 COMPILE-REFERENCE - VARIABLE
  ? basic case 1

  ? basic case 2

  ? FORM which is a variable not found.

  ? FORM which is a variable not found.

 COMPILE-REFERENCE - STRUCTURE
  ? basic case 1

  ? basic case 2

  ? (COMPILE-REFERENCE '(FLOAT4-X X) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The structure reference ~S is invalid." {10054645A3}>)

 COMPILE-REFERENCE - ARRAY
  ? basic case 1

 COMPILE-INLINE-IF
  ? basic case 1

 COMPILE-CONSTRUCTOR
  ? base case 1

  ? base case 2

 COMPILE-ARITHMETIC
  ? basic case 1

 COMPILE-FUNCTION
  ? basic case 1

  ? (COMPILE-FUNCTION '(FOO 1 1 1) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The function application ~S is invalid." {10054863C3}>)

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 1

? 27 tests completed (1ms)
 COMPILE-IF
  ? basic case 1

  ? basic case 2

  ? (COMPILE-IF LISP-CODE VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of statement ~S is invalid." {10054AD003}>)

 COMPILE-LET
  ? basic case 1

  ? (COMPILE-LET
     '(LET (I)
        (RETURN))
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The statement ~S is malformed." {10054B6C03}>)

  ? (COMPILE-LET
     '(LET ((I))
        (RETURN))
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The statement ~S is malformed." {10054BC423}>)

  ? (COMPILE-LET
     '(LET ((X 1) (Y X))
        (RETURN Y))
     VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The variable ~S not found." {10054C1DD3}>)

 COMPILE-SYMBOL-MACROLET
  ? basic case 1

 COMPILE-MACROLET
  ? basic case 1

  ? basic case 2

 COMPILE-DO
  ? basic case 1

 COMPILE-WITH-SHARED-MEMORY
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4

  ? basic case 5

  ? basic case 6

  ? (COMPILE-WITH-SHARED-MEMORY LISP-CODE VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The statement ~S is malformed." {100555F533}>)

  ? (COMPILE-WITH-SHARED-MEMORY LISP-CODE VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The dimension of array reference ~S is invalid." {1005579173}>)

 COMPILE-SET
  ? basic case 1

  ? (COMPILE-SET '(SET X 1.0) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of statement ~S is invalid." {1005581703}>)

  ? basic case 2

  ? (COMPILE-SET '(SET (AREF X 0) 1.0) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of statement ~S is invalid." {10055957D3}>)

  ? basic case 3

  ? (COMPILE-SET '(SET (FLOAT3-X X) 1) VAR-ENV FUNC-ENV) is expected to raise a condition SIMPLE-ERROR (got #<SIMPLE-ERROR "The type of statement ~S is invalid." {10055A10D3}>)

? 25 tests completed (3ms)
 COMPILE-KERNEL
  ? basic case 1

? 1 test completed (1ms)
 KERNEL-MANAGER
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? basic case 1

  ? basic case 2

  ? basic case 3

  ? basic case 4
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 5

  ? basic case 6

  ? basic case 7

  ? basic case 8
Invoking CU-MODULE-LOAD succeded.
  ? basic case 9

  ? basic case 10

  ? basic case 11

  ? basic case 12
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? basic case 11

  ? basic case 12

  ? basic case 13

  ? basic case 14
Invoking CU-MODULE-GET-GLOBAL succeded.
  ? basic case 15
Invoking CU-MODULE-UNLOAD succeded.
  ? basic case 16

  ? basic case 17

  ? basic case 18

  ? basic case 19

  ? basic case 20

  ? basic case 21

  ? basic case 22

  ? basic case 23
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-COMPILE-MODULE
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? KERNEL-MANAGER whose state is compiled state.
Invoking CU-MODULE-LOAD succeded.
  ? KERNEL-MANAGER whose state is module-loaded state.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? KERNEL-MANAGER whose state is function-loaded state.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-LOAD-MODULE
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? KERNEL-MANAGER whose state is initial state.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
  ? KERNEL-MANAGER whose state is module-loaded state.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? KERNEL-MANAGER whose state is function-loaded state.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-LOAD-FUNCTION
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? KERNEL-MANAGER whose state is initial state.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? KERNEL-MANAGER whose state is compiled state.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? The kernel function FOO has been already loaded.

  ? The kernel function BAR is not defined.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? The kernel module which KERNEL-MANAGER specifies does not exist.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-LOAD-GLOBAL
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? Invalid kernel manager state.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? Invalid kernel manager state.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-GLOBAL succeded.
  ? The kernel global A has been already loaded.

  ? The kernel global B is not defined.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-UNLOAD
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? basic case 1
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 2
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-DEFINE-FUNCTION
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 1

  ? basic case 2

  ? basic case 3
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
  ? KERNEL-MANAGER whose state is module-loaded state.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? KERNEL-MANAGER whose state is function-loaded state.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-DEFINE-MACRO
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 1

  ? basic case 2

  ? basic case 3
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
  ? KERNEL-MANAGER whose state is module-loaded state.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? KERNEL-MANAGER whose state is function-loaded state.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-DEFINE-SYMBOL-MACRO
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 1

  ? basic case 2

  ? basic case 3
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
  ? KERNEL-MANAGER whose state is module-loaded state.
Invoking CU-MODULE-GET-FUNCTION succeded.
  ? KERNEL-MANAGER whose state is function-loaded state.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 KERNEL-MANAGER-DEFINE-GLOBAL
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
  ? basic case 1

  ? basic case 2

  ? basic case 3
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
  ? Invalid kernel manager state.
Invoking CU-MODULE-GET-GLOBAL succeded.
  ? Invalid kernel manager state.
Invoking CU-CTX-DESTROY succeded.
 EXPAND-MACRO-1
  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((FOO 1) T) is expected to be ((FOO 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (A T) is expected to be (A T)

  ? (C NIL) is expected to be (C NIL)

  ? (EXPAND-MACRO-1 '(FOO) MGR) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {1005E29E93}>)

 EXPAND-MACRO
  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (1.0 T) is expected to be (1.0 T)

  ? (C NIL) is expected to be (C NIL)
.
  ? (EXPAND-MACRO '(FOO) MGR) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {1005F02203}>)

? 76 tests completed (4ms)
 ALLOC-MEMORY-BLOCK / FREE-MEMORY-BLOCK
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? TYPE which is a void type
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? SIZE which specifies memory larger than available on the gpu
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  ? SIZE which is zero
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
  × SIZE which is negative
    (ALLOC-MEMORY-BLOCK 'INT -1) is expected to raise a condition TYPE-ERROR (got #<SIMPLE-ERROR "~A failed with driver API error No. ~A.~%~A" {1005F407A3}>)
Invoking CU-CTX-DESTROY succeded.
 MEMORY-BLOCK-DEVICE-PTR
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 MEMORY-BLOCK-HOST-PTR
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 MEMORY-BLOCK-TYPE
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 MEMORY-BLOCK-SIZE
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 MEMORY-BLOCK-AREF
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
  ? basic case 2
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.
 SYNC-MEMORY-BLOCK
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 1
Invoking CU-MEM-FREE succeded.
Invoking CU-CTX-DESTROY succeded.

× 1 of 12 tests failed (0ms)
 WITH-LAUNCHING-ARGUMENTS
  ? basic case 1

 DEFKERNEL
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 1 (1658ms)
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 2 (1643ms)
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 3 (1641ms)
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 4 (1716ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 5

  ? basic case 6
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 7 (1558ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 8
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 9 (1514ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 10
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 11 (1468ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 12
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 13 (1521ms)
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 14
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
  ? basic case 15

  ? basic case 16
Invoking CU-MEM-FREE succeded.
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 17 (1522ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 18
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 19
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 DEFKERNELMACRO
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 19 (1560ms)
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 DEFKERNEL-SYMBOL-MACRO
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 20 (1893ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 21
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 DEFGLOBAL
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-GLOBAL succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? 42 is expected to be 42 (1601ms)
Invoking CU-MODULE-GET-GLOBAL succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? 0 is not expected to be 42
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? 42 is expected to be 42
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-MEM-ALLOC succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
nvcc -arch=sm_61 -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-LAUNCH-KERNEL succeded.
  ? basic case 22 (1627ms)
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
  ? basic case 23
Invoking CU-MEM-FREE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
 EXPAND-MACRO
  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((FOO 1) T) is expected to be ((FOO 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (A T) is expected to be (A T)

  ? (C NIL) is expected to be (C NIL)

  ? (EXPAND-MACRO-1 '(FOO)) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {1004E2B0F3}>)

  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((RETURN 1) T) is expected to be ((RETURN 1) T)

  ? ((BAZ 1) NIL) is expected to be ((BAZ 1) NIL)

  ? (1.0 T) is expected to be (1.0 T)

  ? (1.0 T) is expected to be (1.0 T)

  ? (C NIL) is expected to be (C NIL)

  ? (EXPAND-MACRO '(FOO)) is expected to raise a condition ERROR (got #<SB-KERNEL::ARG-COUNT-ERROR {1004EF1503}>)

? 42 tests completed (20926ms)
 TIMER
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-CTX-CREATE succeded.
Invoking CU-DEVICE-COMPUTE-CAPABILITY succeded.
Invoking CU-EVENT-CREATE succeded.
Invoking CU-EVENT-CREATE succeded.
Invoking CU-EVENT-RECORD succeded.
Invoking CU-EVENT-RECORD succeded.
Invoking CU-EVENT-SYNCHRONIZE succeded.
Invoking CU-EVENT-ELAPSED-TIME succeded.
  ? 0.002048 is expected to be T
Invoking CU-EVENT-DESTROY succeded.
Invoking CU-EVENT-DESTROY succeded.
Invoking CU-CTX-DESTROY succeded.

? 1 test completed (0ms)

To load "cl-cuda-interop-test":
  Load 1 ASDF system:
    cl-cuda-interop-test
; Loading "cl-cuda-interop-test"
...Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02D50FD0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X00AA80C0)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02D50FD0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X00AA83A0) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
nvcc -I C:/Users/sgrf/.roswell/lisp/quicklisp/dists/quicklisp/software/cl-cuda-20171227-git/include -ptx -o C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.ptx C:/Users/sgrf/AppData/Local/Temp/cl-cuda.tmp.cu -Xcompiler /source-charset:utf-8
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02D523F0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X00AA8240)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02D523F0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X00AA8270) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02DBBFD0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X02D5CAD0)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02DBBCE0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X02D5CB70) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02DBBCE0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X02D5CC50)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02DBBCE0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X02D5CB40) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02DBBCE0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X02D5CA70)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02DBBCE0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X02D5CD00) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(CL-CUDA-INTEROP.API.MEMORY::MEMORY-BLOCK
       :HOST-PTR #.(SB-SYS:INT-SAP #X02DBBCE0)
       :VERTEX-BUFFER-OBJECT 1
       :GRAPHIC-RESOURCE-PTR #.(SB-SYS:INT-SAP #X02D5CC00)
       :TYPE INT
       :SIZE 1024) is expected to be T
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
  ? 73071067136 is expected to be T
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? #.(SB-SYS:INT-SAP #X02DBBCE0) is expected to be T

  ? 1 is expected to be T

  ? #.(SB-SYS:INT-SAP #X02D5CD80) is expected to be T

  ? INT is expected to be INT

  ? 1024 is expected to be 1024
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1 is expected to be 1
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? 1.0 is expected to be 1.0
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0) is expected to be #S(FLOAT3 :X 1.0 :Y 1.0 :Z 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
  ? #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0) is expected to be #S(FLOAT4 :X 1.0 :Y 1.0 :Z 1.0 :W 1.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-CTX-DESTROY succeded.
Invoking CU-INIT succeded.
Invoking CU-DEVICE-GET succeded.
Invoking CU-GL-CTX-CREATE succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-GL-REGISTER-BUFFER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-HOST-TO-DEVICE succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-MODULE-LOAD succeded.
Invoking CU-MODULE-GET-FUNCTION succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-LAUNCH-KERNEL succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-SET-MAP-FLAGS succeded.
Invoking CU-GRAPHICS-MAP-RESOURCES succeded.
Invoking CU-GRAPHICS-RESOURCE-GET-MAPPED-POINTER succeded.
Invoking CU-MEMCPY-DEVICE-TO-HOST succeded.
Invoking CU-GRAPHICS-UNMAP-RESOURCES succeded.
  ? 2 is expected to be 2

  ? 2.0 is expected to be 2.0

  ? #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0) is expected to be #S(FLOAT3 :X 2.0 :Y 2.0 :Z 2.0)
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-GRAPHICS-UNREGISTER-RESOURCE succeded.
Invoking CU-MODULE-UNLOAD succeded.
Invoking CU-CTX-DESTROY succeded.
press 'Q' on the test window to quit

? 84 tests completed (0ms)