;; takes an error correction level (bind-func qr_create_with_level (lambda (input_string:String* version level) (QRcode_encodeString8bit (cstring input_string) version level)))