X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/85bd695090dbecdca2d4562927d09b0fd88317be..0f00dc4c8eb47e67bc0f148c2dd109f73a451e0a:/utils/psstest-xlate.lisp diff --git a/utils/psstest-xlate.lisp b/utils/psstest-xlate.lisp index 47930f5..a6a34ea 100644 --- a/utils/psstest-xlate.lisp +++ b/utils/psstest-xlate.lisp @@ -58,12 +58,12 @@ 0x~A \"~A\" 0 \"\" ~A-mgf ~:*~A ~A~)~%" - nbits + nbits out hash (get mech 'hash) (get mech 'hashsz)) t))))) - + (with-open-file (str "/tmp/mdw/psstests") (parse-stanza str))