Plaster

common-lisp
CL-USER> (oclcl-petalisp:list-platforms) Platform 0: AMD Accelerated Parallel Processing from Advanced Micro Devices, Inc., OpenCL 2.1 AMD-APP (2671.3) Device 0, 0: Ellesmere, 1411 MHz, 8096 MiB memory NIL CL-USER> (setf petalisp:*backend* (oclcl-petalisp:choose-device 0)) #<OCLCL-PETALISP:OCLCL-BACKEND {1005D90693}> CL-USER> (α #'+ #(1 2 3) #(4 5 6)) #<APPLICATION NUMBER (~ 0 2)> CL-USER> (compute *) #(5.0 7.0 9.0) CL-USER> (describe *backend*) #<OCLCL-PETALISP:OCLCL-BACKEND {1005D90693}> [standard-object] Slots with :INSTANCE allocation: PLATFORM = 140710974968208 Α-CACHED-PROGRAMS = #<HASH-TABLE :TEST EQUAL :COUNT 1 {1005D90A73}> DEVICES = (#S(EAZY-OPENCL.BINDINGS:BOXED-DEVICE-ID :VALUE 140710980734240)) CONTEXT = #S(EAZY-OPENCL.BINDINGS:BOXED-CONTEXT :VALUE 140710041627248)