2003-04-01 13:43:15 -05:00
|
|
|
(define-interface base64-interface
|
|
|
|
|
(export base64-encode-vector
|
|
|
|
|
base64-encode-port
|
2003-11-21 05:29:42 -05:00
|
|
|
base64-encode-string
|
2003-04-01 13:43:15 -05:00
|
|
|
base64-decode-string
|
|
|
|
|
base64-decode-port))
|
2004-03-10 13:30:44 -05:00
|
|
|
|
|
|
|
|
(define-structure base64 base64-interface
|
|
|
|
|
(open scheme-with-scsh
|
|
|
|
|
let-opt
|
|
|
|
|
byte-vectors
|
|
|
|
|
bytio)
|
|
|
|
|
(files base64))
|
