Changeset 14306
- Timestamp:
- 12/07/12 10:38:15 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/digest.lisp
r14202 r14306 43 43 (defun sha256 (&rest paths-or-strings) ;;; XXX more than one arg is very broken. 44 44 "Returned ASCIIfied representation of SHA256 digest of byte-based resource at PATHS-OR-STRINGs." 45 (warn "Unaudited computatation of cryptograhpical digest initiated.") ;; TODO Need tests with some tool for verification 45 46 (let ((first (first paths-or-strings)) 46 47 (rest (rest paths-or-strings)))
Note: See TracChangeset
for help on using the changeset viewer.