aboutsummaryrefslogtreecommitdiff
path: root/src/boot/ast.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/ast.boot')
-rw-r--r--src/boot/ast.boot3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/boot/ast.boot b/src/boot/ast.boot
index 656fdceb..23bd1425 100644
--- a/src/boot/ast.boot
+++ b/src/boot/ast.boot
@@ -1312,6 +1312,9 @@ bfDs n ==
n = 0 => '""
strconc('"D",bfDs(n-1))
+bfEnum(t,csts) ==
+ ['DEFTYPE,t,nil,backquote(['MEMBER,:csts],nil)]
+
bfHandlers(n,e,hs) == main(n,e,hs,nil) where
main(n,e,hs,xs) ==
hs = nil =>