diff options
author | Masaya Tojo <masaya@tojo.tokyo> | 2021-09-09 22:43:38 +0900 |
---|---|---|
committer | Masaya Tojo <masaya@tojo.tokyo> | 2021-09-09 22:45:27 +0900 |
commit | ce5318ae19114527b9691e7a668a504d031d2ee4 (patch) | |
tree | 5cfe33b64798a62922d6b0c20ec7d82f9be87b41 /jobs | |
parent | 517ebd7e99168bb6aa3ba4e54949c6fcf0d45b40 (diff) |
acl2-verify: Update.
Diffstat (limited to 'jobs')
-rwxr-xr-x | jobs/acl2-verify.run | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/jobs/acl2-verify.run b/jobs/acl2-verify.run index 4df5ab7..5711839 100755 --- a/jobs/acl2-verify.run +++ b/jobs/acl2-verify.run @@ -1,13 +1,7 @@ #!/usr/bin/env bash set -euo pipefail -echo "--- acl2 verify: $path ---" -{ - echo ':q' - echo '(setf sb-ext:*invoke-debugger-hook* (lambda (c h) (declare (ignore c h)) (format t "~%~a~%" "******** FAILED ********") (sb-ext:quit)))' - echo '(lp)' - cat "$path" -} |\ - guix environment --container --pure --ad-hoc sbcl acl2 -- acl2 > acl2.out - -cat acl2.out | awk '{ print } ; $0 == "******** FAILED ********" { exit 1 }' +book="$(basename "$path")" +echo "--- acl2 verify: $book ---" +acl2 <<< "(CERTIFY-BOOK \"$book\")" +test -f "$book".cert |