Adding some more examples and tests

examples/addition.fs

@@ -1,6 +1,4 @@
 module Test
 
 let main () =
-    let first = 23
-    let second = 89
-    first + second
+    9 + 11

examples/additionVars.fs

@@ -0,0 +1,6 @@
+module Test
+
+let main () =
+    let first = 23
+    let second = 89
+    first + second

examples/multipleAdditions.fs

@@ -0,0 +1,4 @@
+module Test
+
+let main () =
+    9 + 11 + 4 + 6

examples/subtraction.fs

@@ -0,0 +1,4 @@
+module Test
+
+let main () =
+    10 - 5

test/AstToWasmTests.fs

@@ -18,6 +18,42 @@ let getModuleSymbols (moduleSymbols: ModuleSymbolList) =
 
 
 
+[<Fact>]
+let ``Can run simple main function`` () =
+    let input =
+        $"""
+module Test
+
+let main () = 23
+"""
+
+    let declarations = getDeclarations checker input
+    let wasmBytes = astToWasm declarations
+
+    //printWasm wasmBytes
+
+    let response = wasmBytes |> runFuncInt32Return "main"
+    response.Should().Be(23)
+
+[<Fact>]
+let ``Can compile multiple functions`` () =
+    let input =
+        $"""
+module Test
+
+let second () = 24
+let third () = 24
+let main () = 23
+"""
+
+    let declarations = getDeclarations checker input
+    let wasmBytes = astToWasm declarations
+
+    //printWasm wasmBytes
+
+    let response = wasmBytes |> runFuncInt32Return "main"
+    response.Should().Be(23)
+
 [<Theory>]
 [<InlineData("1", 1)>]
 [<InlineData("1 + 3", 4)>]