scsh-conservatory
/
sunterlib
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

blowfish fixes

This commit is contained in:
erana 2012-01-20 17:05:18 +09:00
parent ec1faec15a
commit 728d30a647
2 changed files with 1036 additions and 1038 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2072
scsh/encryption/blowfish.scm
View File

File diff suppressed because it is too large Load Diff

2
scsh/encryption/dictionary.scm
View File

@ -80,7 +80,7 @@
((eq? msg 'get-substring) get-substring) ((eq? msg 'get-substring) get-substring)
((eq? msg 'set) set) ((eq? msg 'set) set)
((eq? msg 'add) add) ((eq? msg 'add) add)
(else (aspecterror)(display "make-dictionary")))) (else (display "make-dictionary"))))
)) ))
(define make-dictionary make-dictionary1) (define make-dictionary make-dictionary1)