diff tests/reduce.lac @ 23:bfa2e9ae4df8

Tree-shaking
author Adam Chlipala <adamc@hcoop.net>
date Sun, 08 Jun 2008 17:15:09 -0400
parents d8850cc06d24
children
line wrap: on
line diff
--- a/tests/reduce.lac	Sun Jun 08 16:08:31 2008 -0400
+++ b/tests/reduce.lac	Sun Jun 08 17:15:09 2008 -0400
@@ -23,3 +23,5 @@
         fn x : $([n = t] ++ fs) => x.n
 val test_grab1 = grab[#A] {A = 6, B = "13"}
 val test_grab2 = grab[#B] {A = 6, B = "13"}
+
+val main = {A = test_grab1, B = test_grab2}