Files
IBAFLang/IBAF-cbs/Funcons-beta/Computations/Normal/Storing/tests/structural-assign-3.config
2023-11-01 09:29:33 +01:00

26 lines
811 B
Plaintext

general {
funcon-term:
initialise-storing
give(
{ "a" |-> allocate-initialised-variable(booleans,false),
"b" |-> 42,
"c" |-> allocate-initialised-variable(booleans,true) },
sequential(
structural-assign(map(),map()),
structural-assign(given,{"a"|->true,"b"|->42,"c"|->false}),
structural-assign(true,true),
else(
structural-assign(given,{"a"|->true,"b"|->99,"c"|->false}),
structural-assign(given,{"a"|->true,"c"|->false}),
structural-assign(given,map()),
structural-assign(given,{"a"|->true,"b"|->42,"c"|->false,"d"|->()}),
structural-assign(true,false),
print"OK")))
;
}
tests {
result-term: null-value;
standard-out: ["OK"];
}