www

commit 713eec89ea1a59a1a03a07359ca15ba124a49a3f
parent d6012a7472457f949f56cd2ccca0a292f5210d59
Author: AlexKnauth <alexander@knauth.org>
Date:   Mon,  3 Apr 2017 11:21:24 -0700

provide ~True and ~False from stlc+union.rkt

Diffstat:
M
turnstile/examples/stlc+union.rkt
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/turnstile/examples/stlc+union.rkt b/turnstile/examples/stlc+union.rkt
@@ -27,7 +27,8 @@
                     [* : (→ Num Num Num)]
                     [add1 : (→ Int Int)]
                     [sub1 : (→ Int Int)])
-         #%datum #%app)
+         #%datum #%app
+         (for-syntax ~True ~False))
 
 (define-syntax define-named-type-alias
   (syntax-parser