Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-and-itasks
sapl-interpreter
Commits
9878014b
Commit
9878014b
authored
Mar 10, 2016
by
Laszlo Domoszlai
Browse files
order let bindings
parent
66795043
Changes
2
Hide whitespace changes
Inline
Side-by-side
precompiler/precompiler.icl
View file @
9878014b
...
...
@@ -2,6 +2,7 @@ module precompiler
import
Sapl
.
SaplParser
import
Sapl
.
SaplTokenizer
import
Sapl
.
Transform
.
Let
import
StdBool
,
StdList
,
StdOrdList
,
StdFile
,
StdFunc
,
StdArray
,
StdDebug
...
...
@@ -97,6 +98,7 @@ where
sTermS
ctx
(
SSelect
expr
cs
)
a
=
a
<++
"S"
<++
sTerm
{
ctx
&
inspine
=
False
}
expr
<++
sList
(
sSelectCase
ctx
)
(
sortBy
selectCaseOrder
cs
)
sTermS
ctx
(
SIf
cond
texpr
fexpr
)
a
=
a
<++
"I"
<++
sTerm
{
ctx
&
inspine
=
False
}
cond
<++
sTerm
ctx
texpr
<++
sTerm
ctx
fexpr
sTermS
ctx
(
SLet
body
bindings
)
a
#
bindings
=
fromJust
(
sortBindings
bindings
)
#
ctx
=
{
ctx
&
vars
=
registerVars
ctx
.
vars
ctx
.
localcount
(
map
unpackBindVar
bindings
),
localcount
=
ctx
.
localcount
+
length
bindings
}
=
a
<++
"E"
<++
sTerm
ctx
body
<++
sList
(
sLetDef
{
ctx
&
inspine
=
False
})
bindings
...
...
precompiler/precompiler.prj
View file @
9878014b
...
...
@@ -7,7 +7,7 @@ Global
CheckStacks: False
CheckIndexes: True
Application
HeapSize: 2097152
HeapSize: 2097152
0
StackSize: 512000
ExtraMemory: 81920
IntialHeapSize: 204800
...
...
@@ -893,6 +893,20 @@ OtherModules
ReadableABC: False
ReuseUniqueNodes: True
Fusion: False
Module
Name: Sapl.Transform.Let
Dir: {Application}\iTasks-SDK\Dependencies\clean-sapl\src
Compiler
NeverMemoryProfile: False
NeverTimeProfile: False
StrictnessAnalysis: True
ListTypes: StrictExportTypes
ListAttributes: True
Warnings: True
Verbose: True
ReadableABC: False
ReuseUniqueNodes: True
Fusion: False
Module
Name: _SystemDynamic
Dir: {Application}\iTasks-SDK\Patches\Dynamics
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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