Added basic test case for functions

2022-10-18 15:00:17 -04:00 · 2022-10-18 15:00:17 -04:00 · 2a1a48d9c5
parent 3067b64f47
commit 2a1a48d9c5
3 changed files with 29 additions and 0 deletions
--- a/analyzer/func-section.go
+++ b/analyzer/func-section.go
@ -0,0 +1,3 @@
+package analyzer
+
+// TODO
--- a/analyzer/func-section_test.go
+++ b/analyzer/func-section_test.go
@ -0,0 +1,18 @@
+package analyzer
+
+import "testing"
+
+func TestFuncSection (test *testing.T) {
+	checkTree ("../tests/analyzer/funcSection", false,
+`
+typeSection ro ../tests/analyzer/funcSection.aCString
+	type 1 pointer {Int}
+funcSection ro ../tests/analyzer/funcSection.bArbitrary
+	block
+		arbitraryPhrase
+			command 'puts'
+			cast
+				type aCString
+				arg string 'hellorld` + "\000" + `'
+`, test)
+}
--- a/tests/analyzer/funcSection/main.arf
+++ b/tests/analyzer/funcSection/main.arf
@ -0,0 +1,8 @@
+:arf
+---
+
+type ro aCString:{U8}
+
+func ro bArbitrary
+	---
+	'puts' [cast 'hellorld\000' aCString]