From 6c01eef851439549018267fdc439e4884af0c624 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Fri, 12 Apr 2024 13:09:31 -0400
Subject: Introducing the main() function

---
 test/enums.tm | 63 ++++++++++++++++++++++++++++++-----------------------------
 1 file changed, 32 insertions(+), 31 deletions(-)

(limited to 'test/enums.tm')

diff --git a/test/enums.tm b/test/enums.tm
index aea18948..f321af8c 100644
--- a/test/enums.tm
+++ b/test/enums.tm
@@ -1,34 +1,35 @@
 enum Foo(Zero, One(x:Int), Two(x,y:Int))
 
->> Foo.Zero
-= Foo.Zero
->> Foo.One(123)
-= Foo.One(x=123)
->> Foo.Two(123, 456)
-= Foo.Two(x=123, y=456)
-
->> Foo.One(10) == Foo.One(10)
-= yes
-
->> Foo.One(10) == Foo.Zero
-= no
-
->> Foo.One(10) == Foo.One(-1)
-= no
-
->> Foo.One(10) < Foo.Two(1, 2)
-= yes
-
->> x := Foo.One(123)
->> t := {x=>"found"; default="missing"}
->> t[x]
-= "found"
->> t[Foo.Zero]
-= "missing"
-
-when x is o:One
-	>> o.x
-	= 123
-else
-	fail("Oops")
+func main()
+	>> Foo.Zero
+	= Foo.Zero
+	>> Foo.One(123)
+	= Foo.One(x=123)
+	>> Foo.Two(123, 456)
+	= Foo.Two(x=123, y=456)
+
+	>> Foo.One(10) == Foo.One(10)
+	= yes
+
+	>> Foo.One(10) == Foo.Zero
+	= no
+
+	>> Foo.One(10) == Foo.One(-1)
+	= no
+
+	>> Foo.One(10) < Foo.Two(1, 2)
+	= yes
+
+	>> x := Foo.One(123)
+	>> t := {x=>"found"; default="missing"}
+	>> t[x]
+	= "found"
+	>> t[Foo.Zero]
+	= "missing"
+
+	when x is o:One
+		>> o.x
+		= 123
+	else
+		fail("Oops")
 
-- 
cgit v1.2.3