I think it was broken so I fixed it

tests/sprint3/test/sp3_while_nested_bools.alpha

@@ -11,19 +11,19 @@ bar (r,s) := {
 }
 
 entry (arg) := {
- 	[ integer: x ; integer: y; integer: z;integer: t]
-        while ( (!(x = y)) < ( z = t ) ) {
-                x := x;
-                while ( (x < y) = ( z < t ) ) {
+ 	[ Boolean: x ; Boolean: y; Boolean: z;Boolean: t]
+        while ( ((x = y)) < ( z | t ) ) {
+                while ( (x & y) = ( z < t ) ) {
                         y := y;
                 }
                 (*
+                x := x;
+                *)
                 if ( (x = y) = ( z < t ) ) then {
                         x :=  1;
                 } else {
                         x :=  1;
                 }
-                *)
         }
         return 0;
 }