(define libqrencode
(let ((platform (sys:platform)))
(cond ((string=? platform "Linux") (sys:open-dylib "libqrencode.so"))
((string=? platform "Windows") (sys:open-dylib "libqrencode.dll"))
((string=? platform "OSX") (sys:open-dylib "libqrencode.dylib"))
(else (print "Unknown platform: " platform)))))