peter/IBAFLang
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

voor de initialise-variable verandering

Browse Source
This commit is contained in:
Peter
2024-03-10 09:53:47 +01:00
parent 613fa9ab1a
commit cb7f6f8e5d
18 changed files with 163 additions and 183 deletions
Download Patch File Download Diff File Expand all files Collapse all files

103
IBAF-Tests/IBAF-1/scopes.fct
View File

@@ -1,21 +1,9 @@
initialise-binding scope
(collateral
(bind
("z",
allocate-initialised-variable
(integers,
0)),
bind
("x",
allocate-initialised-variable
(integers,
0)),
map
( ),
map
( ),
map
( ),
allocate-variable
(integers)),
map
( ),
map
@@ -26,74 +14,51 @@ initialise-binding scope
( )),
sequential
(assign
(bound
("z"),
decimal-natural
("5")),
assign
(bound
("x"),
(bound "x",
int-mul
(decimal-natural
("5"),
("10"),
decimal-natural
("3"))),
print
(assigned
(bound
("x"))),
assign
("10"))),
print assigned
(bound
("x"),
decimal-natural
("2")),
print
(int-mul
(assigned
(bound
("x")),
decimal-natural
("3"))),
("x")),
scope
(collateral
(bind
("x",
allocate-variable
(integers)),
bind
("y",
allocate-initialised-variable
(integers,
0)),
allocate-variable
(integers)),
map
( ),
map
( ),
map
( )),
sequential
(assign
(bound
("y"),
(bound "x",
decimal-natural
("4")),
print
(assigned
(bound
("y"))))),
assign
("10")),
assign
(bound "y",
int-mul
(assigned
(bound
("x")),
assigned
(bound
("x")))),
print assigned
(bound
("x")),
print assigned
(bound
("y")))),
print assigned
(bound
("z"),
int-mul
(assigned
(bound
("z")),
assigned
(bound
("x")))),
print
(assigned
(bound
("z"))),
print
(int-add
(assigned
(bound
("z")),
assigned
(bound
("x"))))))
("x"))))