RosettaCodeData/Task/Inverted-syntax/OxygenBasic/inverted-syntax.basic

18 lines
173 B
Plaintext

macro cond(a,c) {c then a}
macro store(b,a) {a=b}
sys a,c=10
if c>4 then a=4
'INVERTED SYNTAX FORMS:
cond a=40, if c>4
store 4,a
'COMBINED:
cond store(5,a), if c>4