test: Resurrect running boot tests on Guile.

[mes.git] / scaffold / boot / 45-pass-if.scm

diff --git a/scaffold/boot/45-pass-if.scm b/scaffold/boot/45-pass-if.scm
index 1d8a30f51bb2851ed1b1f2ec4b1ea05227c753dd..31ccc7f2aab332450763e2aea81fcd83095bdd67 100644 (file)
--- a/scaffold/boot/45-pass-if.scm
+++ b/scaffold/boot/45-pass-if.scm
@@ -26,6 +26,6 @@
   (list
    'begin
    (list core:display "test: ") (list core:display name)
-   (list result t)))
+   (list (quote result) t)))
 
 (pass-if "first dummy" #t)