(dynamic-load "retropikzel/pffi/pffi-gauche" :init-function "Scm__Init_pffi_gauche")

(foo 10)

(define size-of-type
  (lambda (type)
    (cond ((equal? type 'int8) 1))))