X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/85bd695090dbecdca2d4562927d09b0fd88317be..3e248c3b5b309bc03eb5f70762d3f5671d51f996:/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))