thin-provisioning-tools/functional-tests/crc32c/checksum.scm

12 lines
236 B
Scheme

(library
(crc32c checksum)
(export crc32c)
(import (chezscheme))
(define __ (load-shared-object "../lib/libft.so"))
(define crc32c
(foreign-procedure "crc32c" (unsigned-32 (* unsigned-8) unsigned) unsigned-32)))