I have procedure that generate sha1 hash from string:
(define (string->sha1 string)
(let ((port (open-input-string string)))
(hex (sha1 port))))
the function hex and sha1 are taken from A "pure" scheme implementation (R5RS) of SHA256? I've put the code in sha.scm and load using:
(load "sha.scm")
and I've got warnings like this:
;;; /home/kuba/projects/jcubic/notes/./rpc.scm:66:6: warning: possibly unbound variable `hex'
;;; /home/kuba/projects/jcubic/notes/./rpc.scm:66:11: warning: possibly unbound variable `sha1'
How can I resolve those warnings?