mise à jour des tests

tests/fragment2/call.test_out

@@ -0,0 +1 @@
+one() = 1

tests/fragment2/call.vsl

@@ -0,0 +1,4 @@
+PROTO INT one()
+FUNC VOID main() { PRINT "one() = ", one() }
+FUNC INT one() RETURN 1
+

tests/fragment2/call2.test_out

@@ -0,0 +1 @@
+1+3 = 4

tests/fragment2/call2.vsl

@@ -0,0 +1,4 @@
+PROTO INT plus(x,y)
+FUNC VOID main() PRINT "1+3 = " ,plus(1,3)
+
+FUNC INT plus(x,y) RETURN x+y

tests/fragment2/call3expr.test_out

@@ -0,0 +1,14 @@
+1+3 = 4
+1-3 = -2
+1*3 = 3
+1/3 = 0
+1+1 = 2
+1* (1+3) = 4
+1*  1+3  = 4
+5+2 = 7
+5-2 = 3
+5*2 = 10
+5/2 = 2
+5+1 = 6
+5* (5+2) = 35
+5*  5+2  = 27

tests/fragment2/call3expr.vsl

@@ -0,0 +1,12 @@
+PROTO VOID expr(x,y)
+FUNC VOID main() { expr(1,3) expr(5,2) }
+FUNC VOID expr(x,y) {
+	PRINT x,"+",y," = ", x+y ,"\n"
+	PRINT x,"-",y," = ", x-y ,"\n"
+	PRINT x,"*",y," = ", x*y ,"\n"
+	PRINT x,"/",y," = ", x/y ,"\n"
+	PRINT x,"+",1," = ", x+1 ,"\n"
+	PRINT x,"* (",x,"+",y,") = ", x*(x+y) ,"\n"
+	PRINT x,"*  ",x,"+",y,"  = ", x * x + y  ,"\n"
+	}
+

tests/fragment2/call4if.test_out

@@ -0,0 +1,3 @@
+2 est different de 1
+1 est different de 2
+1 est egal a 1

tests/fragment2/call4if.vsl

@@ -0,0 +1,7 @@
+PROTO VOID compare(x,y)
+FUNC VOID main() { compare(2,1) compare(1,2) compare(1,1) }
+FUNC VOID compare(x,y) IF x-y	THEN PRINT x, " est different de ",y,"\n"
+				ELSE PRINT x, " est egal a ",y,"\n"
+				FI
+
+

tests/fragment2/proto1.test_ret

@@ -0,0 +1 @@
+0

tests/fragment2/proto1.vsl

@@ -0,0 +1,2 @@
+PROTO INT main()
+FUNC INT main() RETURN 0

tests/fragment2/proto2.test_out

@@ -0,0 +1 @@
+1+3 = 4

tests/fragment2/proto2.vsl

@@ -0,0 +1,5 @@
+PROTO INT plus(x,y)
+
+FUNC VOID main() PRINT "1+3 = ", plus(1,3)
+
+FUNC INT plus(x,y) RETURN x+y