[general] renaming (pp -> lustre_pp ; c_* -> intermediate_*)
This commit is contained in:
21
tests/test.node
Normal file
21
tests/test.node
Normal file
@@ -0,0 +1,21 @@
|
||||
node diagonal_int (i: int) returns (o1, o2 : int);
|
||||
let
|
||||
(o1, o2) = (i, i);
|
||||
tel
|
||||
|
||||
node undiag_test (i: int) returns (o : bool);
|
||||
var l1, l2: int; l3: int;
|
||||
let
|
||||
l3 = (pre (1)) -> 0;
|
||||
(l1, l2) = diagonal_int(i);
|
||||
o = (not (not (l1 = l2))) and (l1 = l2) and true;
|
||||
tel
|
||||
|
||||
node auto (i: int) returns (o : int);
|
||||
var x, y:int;
|
||||
let
|
||||
automaton
|
||||
| Incr -> do (o,x) = (0 fby o + 1, 2); done
|
||||
| Decr -> do (o,x) = diagonal_int(0 fby o); done
|
||||
tel
|
||||
|
11
tests/test2.node
Normal file
11
tests/test2.node
Normal file
@@ -0,0 +1,11 @@
|
||||
node diagonal_int (i: int) returns (o1, o2 : int);
|
||||
let
|
||||
(o1, o2) = (i, i);
|
||||
tel
|
||||
|
||||
node main (i: int) returns (o1, o2, o3, o4: int);
|
||||
let
|
||||
(o1, o2) = diagonal_int(i);
|
||||
(o3, o4) = diagonal_int(o1);
|
||||
tel
|
||||
|
4
tests/test_pre.node
Normal file
4
tests/test_pre.node
Normal file
@@ -0,0 +1,4 @@
|
||||
node n2 (i: int) returns (o: bool);
|
||||
let
|
||||
o = pre (true and pre( i = pre(pre(i))));
|
||||
tel
|
Reference in New Issue
Block a user