added pass to check validity of automata and disable flattening of automaton branch because of incorrect code resulting from it

2022-12-16 01:04:09 +01:00
parent 1b3af051b3
commit 6af9ddf394
3 changed files with 42 additions and 27 deletions
--- a/src/test.node
+++ b/src/test.node
@@ -12,9 +12,10 @@ let
 tel

 node auto (i: int) returns (o : int);
+var x, y:int;
 let
 	automaton
-	| Incr -> do o = (pre o) + 1; done
-	| Decr -> do o = (pre o) - 1; done
+	| Incr -> do (o,x) = (0 fby o + 1, 2); done
+	| Decr -> do (o,x) = diagonal_int(0 fby o); done
 tel