Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TASTE
OpenGEODE
Commits
a4379d9f
Commit
a4379d9f
authored
Oct 26, 2014
by
Maxime Perrotin
Browse files
Report non-support of DECISION ANY in Ada backend
parent
f16f1b9c
Changes
2
Hide whitespace changes
Inline
Side-by-side
AdaGenerator.py
View file @
a4379d9f
...
...
@@ -1430,6 +1430,10 @@ def _choiceitem(choice):
def
_decision
(
dec
):
''' generate the code for a decision '''
code
,
local_decl
=
[],
[]
if
dec
.
kind
==
'any'
:
LOG
.
warning
(
'Ada backend does not support the "ANY" statement'
)
code
.
append
(
'-- "DECISION ANY" statement was ignored'
)
return
code
,
local_decl
question_type
=
dec
.
question
.
exprType
# XXX check if we should get the type like this
actual_type
=
getattr
(
...
...
tests/regression/test-debug/orchestrator.pr
View file @
a4379d9f
...
...
@@ -60,7 +60,14 @@ endfor;
TASK seq := {1} // {2} // {3};
/* CIF TASK (392, 961), (172, 35) */
TASK seq := seq // {2} // {1};
/* CIF NEXTSTATE (419, 1011), (118, 50) */
/* CIF DECISION (443, 1011), (70, 50) */
DECISION any;
/* CIF ANSWER (398, 1081), (70, 23) */
('a'):
/* CIF ANSWER (488, 1081), (70, 23) */
('b'):
ENDDECISION;
/* CIF NEXTSTATE (419, 1119), (118, 50) */
NEXTSTATE Wait_for_GUI;
/* CIF STATE (423, 163), (118, 50) */
STATE Wait_for_GUI;
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment