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
004e0c17
Commit
004e0c17
authored
Nov 02, 2014
by
Maxime Perrotin
Browse files
Fix Ada backend missing parenthesis
parent
30e8928a
Changes
3
Hide whitespace changes
Inline
Side-by-side
AdaGenerator.py
View file @
004e0c17
...
...
@@ -1451,9 +1451,9 @@ def _decision(dec):
exp
=
u
'tmp{idx} {op} {ans}'
.
format
(
idx
=
dec
.
tmpVar
,
op
=
a
.
openRangeOp
.
operand
,
ans
=
ans_str
)
else
:
exp
=
u
'{q} {op} {ans}'
.
format
(
q
=
q_str
,
op
=
a
.
openRangeOp
.
operand
,
ans
=
ans_str
)
exp
=
u
'
(
{q}
)
{op} {ans}'
.
format
(
q
=
q_str
,
op
=
a
.
openRangeOp
.
operand
,
ans
=
ans_str
)
code
.
append
(
sep
+
exp
+
' then'
)
if
a
.
transition
:
stmt
,
tr_decl
=
generate
(
a
.
transition
)
...
...
LlvmGenerator.py
View file @
004e0c17
...
...
@@ -2148,6 +2148,7 @@ def sdl_equals(a_val, b_val, asn1ty, ctx):
b_val
=
sdl_sequenceof
(
b_val
,
ctx
)
# XXX add isinstance(b_val, SDLAppend) and SDLSubstring, no?
# Also in _equals a_val should also be evaluated against special types
try
:
type_name
=
asn1ty
.
ReferencedTypeName
.
replace
(
'-'
,
'_'
).
lower
()
...
...
tests/regression/test-llvm/orchestrator.pr
View file @
004e0c17
...
...
@@ -41,7 +41,18 @@ endfor';
TASK variable := variable(0,2);
/* CIF PROCEDURECALL (361, 794), (259, 35) */
CALL writeln(variable(0, 2));
/* CIF NEXTSTATE (456, 844), (70, 35) */
/* CIF DECISION (380, 844), (221, 50) */
DECISION variable // variable = 'HopHop';
/* CIF ANSWER (371, 914), (70, 23) */
(true):
/* CIF PROCEDURECALL (347, 952), (117, 35) */
CALL writeln('OK');
/* CIF ANSWER (543, 914), (70, 23) */
(false):
/* CIF PROCEDURECALL (474, 952), (207, 35) */
CALL writeln(variable // variable);
ENDDECISION;
/* CIF NEXTSTATE (455, 1002), (70, 35) */
NEXTSTATE wait;
/* CIF STATE (272, 359), (70, 35) */
STATE wait;
...
...
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