X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/fe6657c961b01ec72e9f35f4c3d96b11b31cf09c..45c0fd363937c6e9b05da04a9167e9912c05ca0c:/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))