Commit ce4e4a5e authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Add a debug print in the user code

parent 80320ff2
......@@ -7,7 +7,7 @@ process Orchestrator;
dcl counter t_int := 0;
dcl magic_number T_Int32:= 0;
dcl magic_number T_Int32:= 666;
/* CIF ENDTEXT */
/* CIF START (718, 52), (70, 34) */
START;
......@@ -15,6 +15,40 @@ process Orchestrator;
call writeln( 'Orchestrator startup');
/* CIF NEXTSTATE (719, 156), (67, 35) */
NEXTSTATE wait;
/* CIF state (999, 100), (67, 35) */
state wait;
/* CIF input (996, 155), (71, 35) */
input pulse(t);
/* CIF PROCEDURECALL (913, 210), (236, 35) */
call writeln('[Orchestrator] Pulse (', t, ')');
/* CIF decision (986, 260), (89, 50) */
decision counter = 3;
/* CIF ANSWER (830, 330), (70, 24) */
(true):
/* CIF task (791, 374), (148, 35) */
task magic_number := 42;
/* CIF NEXTSTATE (830, 429), (70, 35) */
NEXTSTATE Step_2;
/* CIF ANSWER (1068, 330), (70, 24) */
(false):
/* CIF decision (1068, 374), (70, 50) */
decision t;
/* CIF ANSWER (986, 444), (70, 25) */
(4):
/* CIF task (950, 489), (141, 59) */
task counter := 3;
/* CIF ANSWER (1133, 444), (70, 25) */
else:
/* CIF task (1097, 489), (141, 59) */
task counter := 0,
magic_number := 0;
enddecision;
/* CIF task (1068, 564), (70, 35) */
task t := 0;
/* CIF NEXTSTATE (1068, 619), (70, 35) */
NEXTSTATE wait;
enddecision;
endstate;
/* CIF state (496, 337), (70, 35) */
state Step_2;
/* CIF input (496, 392), (70, 35) */
......@@ -23,7 +57,7 @@ process Orchestrator;
decision t = 2;
/* CIF ANSWER (420, 517), (70, 24) */
(true):
/* CIF output (400, 561), (110, 35) */
/* CIF output (399, 561), (110, 35) */
output paramesstogui;
/* CIF NEXTSTATE (420, 616), (70, 35) */
NEXTSTATE step_2;
......@@ -35,39 +69,7 @@ process Orchestrator;
NEXTSTATE all_done;
enddecision;
endstate;
/* CIF state (815, 543), (73, 35) */
/* CIF state (813, 543), (73, 35) */
state all_done;
endstate;
/* CIF state (999, 100), (67, 35) */
state wait;
/* CIF input (996, 155), (71, 35) */
input pulse(t);
/* CIF decision (986, 210), (89, 50) */
decision counter = 3;
/* CIF ANSWER (830, 280), (70, 24) */
(true):
/* CIF task (791, 324), (148, 35) */
task magic_number := 42;
/* CIF NEXTSTATE (830, 379), (70, 35) */
NEXTSTATE Step_2;
/* CIF ANSWER (1068, 280), (70, 24) */
(false):
/* CIF decision (1068, 324), (70, 50) */
decision t;
/* CIF ANSWER (986, 394), (70, 25) */
(4):
/* CIF task (950, 439), (141, 59) */
task counter := 3;
/* CIF ANSWER (1133, 394), (70, 25) */
else:
/* CIF task (1097, 439), (141, 59) */
task counter := 0,
magic_number := 0;
enddecision;
/* CIF task (1068, 514), (70, 35) */
task t := 0;
/* CIF NEXTSTATE (1068, 569), (70, 35) */
NEXTSTATE wait;
enddecision;
endstate;
endprocess Orchestrator;
\ No newline at end of file
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment