One-time pad/Racket: Difference between revisions
m
Fixed syntax highlighting.
(=={{header|Racket}}== implementation added) |
m (Fixed syntax highlighting.) |
||
Line 3:
We have encryption decryption and pad file management all bundled together here.
<syntaxhighlight lang="racket">#lang racket
(require srfi/14) ; character sets
Line 142:
(otp-scratch-lines "test.otp" enc-lines-used)
(printf "Pad file after scratching:~%~a~%" (file->string "test.otp"))
)</
|