Improved the test system

tests/invalid_function_name_intrinsic.qbl

@@ -1,4 +1,4 @@
-//invalid,Function name print at 3:22 is already an intrinsic
+//invalid,Function name print at 3:22 is already an intrinsic:END:
 
 function int => print
 {

tests/invalid_function_name_operation.qbl

@@ -1,4 +1,4 @@
-//invalid,Expected function name but got deq at 3:20
+//invalid,Expected function name but got deq at 3:20:END:
 
 function int => deq
 {

tests/missing_function_name.qbl

@@ -1,4 +1,4 @@
-//invalid,Expected function name but got { at 4:2
+//invalid,Expected function name but got { at 4:2:END:
 
 function int =>
 {

tests/recursion.qbl

@@ -1,3 +1,6 @@
+//valid,10946
+//:END:
+
 function int int int int => int fibonacci
 {
 	dup 0 == req req req req
@@ -11,4 +14,4 @@ function int int int int => int fibonacci
 	}
 }
 
-20 0 1 0 fibonacci print
+20 0 1 0 fibonacci println

tests/req_impl.qbl

@@ -1,3 +1,7 @@
+//valid,231
+//231
+//:END:
+
 function int => int req_impl { }
 
 1 2 3 req_impl print print println

tests/rule110.qbl

@@ -1,4 +1,4 @@
-
+//valid,:END:
 function bool bool bool => bool rule110
 {
 	if

tests/test.qbl

@@ -1,6 +1,5 @@
-//valid
-//output: Hello, World!
-//4242test2Falsetesttesttest
+//valid,Hello, World!
+//4242test2Falsetesttesttest:END:
 
 "Hello, World!\n" print 43 foo foo deq
 

tests/typecheck_function_multiple_io.qbl

@@ -1,8 +1,9 @@
-//valid,output:42footesttest2stuff
+//valid,42footesttest2stuff
+//:END:
 
 function int str any => str str str foo
 {
 	print req deq "test" "test2" "stuff" print
 }
 
-42 "foo" "bar" foo print print print
+42 "foo" "bar" foo print print println

tests/unknown_function_basic.qbl

@@ -1,2 +1,2 @@
-//invalid,Call to unknown function foo at 2:4
+//invalid,Call to unknown function 'foo' at 2:4:END:
 foo

tests/unknown_function_hard.qbl

@@ -1,4 +1,4 @@
-//invalid,Call to unknown function bar at 9:7
+//invalid,Call to unknown function 'bar' at 9:7:END:
 
 function int => foo
 {

tests/unknown_function_in_function.qbl

@@ -1,4 +1,4 @@
-//invalid,Call to unknown function bar at 5:5
+//invalid,Call to unknown function 'bar' at 5:5:END:
 
 function => foo
 {

tests/while.qbl

@@ -1,4 +1,5 @@
-//valid,output:10987654321falsefalse
+//valid,10987654321falsefalse
+//:END:
 
 true while
 {
@@ -18,4 +19,4 @@ true true true while
 {
 	false
 }
-print print
+print println