(use lazy-ffi)

#~"libdl.so.2"

(define atof (#~dlsym pointer: #f "atof" return: pointer:)) ; lookup in current module

(print atof)    ; ==> "#<pointer 1077736272.0>"

(pp (#~~ atof "99" return: double:))    ; ==> 99.0