c2ffi
c2ffi copied to clipboard
wrappers are not compiled in ABCL
e.g. Note, however, there's something sinister happening to 'compile at the moment, caused by something cl-include or cffi does, so don't fix this until https://github.com/armedbear/abcl/issues/431 is resolved.
(disassemble 'avpriv-get-gamma-from-trc)
; Not a compiled function:
;
; ((block avpriv-get-gamma-from-trc
; (let ((#:trc6017537
; (let ((#:trc6017537 trc))
; (let ((#:g6017541 #:trc6017537))
; (cond ((typep #:g6017541 'symbol)
; nil
; (enum-value 'av-color-transfer-characteristic
; #:trc6017537))
; ((typep #:g6017541 'integer) nil #:trc6017537)
; (t
; (error 'type-error
; :datum
; #:g6017541
; :expected-type
; '(or integer symbol))))))))
; (declare (ignorable #:trc6017537))
; (cffi-sys::%%foreign-funcall (cffi-sys::find-foreign-function '"avpriv_get_gamma_from_trc"
; ':default)
; (list #:trc6017537)
; '(:int)
; ':double))))