From 8b793fe457bad583213735d49fed4f78995732f2 Mon Sep 17 00:00:00 2001
From: Masaya Tojo <masaya@tojo.tokyo>
Date: Sat, 31 Jul 2021 22:39:04 +0900
Subject: Add `acl2-theorems` job.

---
 cfg/jobs/acl2-verify.sh | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 cfg/jobs/acl2-verify.sh

(limited to 'cfg/jobs/acl2-verify.sh')

diff --git a/cfg/jobs/acl2-verify.sh b/cfg/jobs/acl2-verify.sh
new file mode 100644
index 0000000..ea65156
--- /dev/null
+++ b/cfg/jobs/acl2-verify.sh
@@ -0,0 +1,11 @@
+#!/bin/sh
+
+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 --pure acl2 -- acl2 |\
+    awk '{ print } ; $0 == "******** FAILED ********" { exit 1 }'
-- 
cgit v1.2.3