added a new test script

2023-11-12 23:03:39 +09:00
parent 8cb9178820
commit 1c083885bc
3 changed files with 18 additions and 0 deletions
--- a/t/fun-01.hcl
+++ b/t/fun-01.hcl
@ -0,0 +1,16 @@
+defun aaa(a b) {
+	| c |
+	set c (+ a b);
+	return c;
+};
+
+set k (aaa 10 20);
+
+(if (= k 30)
+	(printf "OK\n")
+else
+	(printf "ERROR\n")
+)
+
+
+