(module (openssl version) ( openssl-version-number openssl-version openssl/version openssl/cflags openssl/built-on openssl/platform openssl/dir openssl/engines-dir ) (import scheme) (import (chicken base)) (import (chicken foreign)) #> #include <# (define OpenSSL_version_num (foreign-lambda unsigned-long "OpenSSL_version_num")) (define OpenSSL_version (foreign-lambda (const c-string) "OpenSSL_version" int)) (define openssl/version (foreign-value "OPENSSL_VERSION" int)) (define openssl/cflags (foreign-value "OPENSSL_CFLAGS" int)) (define openssl/built-on (foreign-value "OPENSSL_BUILT_ON" int)) (define openssl/platform (foreign-value "OPENSSL_PLATFORM" int)) (define openssl/dir (foreign-value "OPENSSL_DIR" int)) (define openssl/engines-dir (foreign-value "OPENSSL_ENGINES_DIR" int)) (define (openssl-version-number) (OpenSSL_version_num)) (define (openssl-version type) (OpenSSL_version type)) )