0f228d2d25
consistent with the language's attitude towards code blocks and indentation. No more long-range action closing parens.
138 lines
2.0 KiB
Plaintext
138 lines
2.0 KiB
Plaintext
# This is just a comment
|
|
#.. Block comments
|
|
start with a #.. and
|
|
continue until dedent
|
|
|
|
run file "core.nom"
|
|
|
|
say "foo"
|
|
|
|
say (4)
|
|
|
|
#.. "rule" is just a function that takes a function call spec and a block of code to run,
|
|
and stores the function definition
|
|
rule "fart": say "poot"
|
|
|
|
fart
|
|
|
|
# multi-line strings:
|
|
say ".."
|
|
| Once upon a time
|
|
|there was a very
|
|
|
|
|
|
|long string
|
|
|
|
|
| with
|
|
| rather
|
|
| silly
|
|
| indentation
|
|
|
|
| and "quotes"
|
|
|.." (even fakeouts like that) "
|
|
|(done)
|
|
|
|
|
|
|
rule "doublefart": # this farts twice
|
|
say "poot"
|
|
say "poot"
|
|
|
|
doublefart
|
|
|
|
rule "subex work": return "subexpressions work"
|
|
|
|
say (subex work)
|
|
|
|
say (..)
|
|
subex work
|
|
|
|
say ["lists", "work"]
|
|
|
|
say []
|
|
|
|
say [..]
|
|
1, 2
|
|
3
|
|
|
|
rule "say both %one and %two":
|
|
say %one
|
|
say %two
|
|
|
|
say both [..]
|
|
1,2
|
|
..and [..]
|
|
3,4
|
|
|
|
|
|
say both..
|
|
"hello"
|
|
and "world"
|
|
|
|
rule "three": return 3
|
|
say both ..
|
|
"a list:"
|
|
and [..]
|
|
1,2,(three),(4)
|
|
|
|
if 1: yes
|
|
..else: no
|
|
|
|
if 1: yes ..else: no
|
|
|
|
say (do: return 5)
|
|
|
|
rule "do %one also %two":
|
|
do %one
|
|
do %two
|
|
|
|
do: say "one liner"
|
|
..also: say "another one liner"
|
|
|
|
say (do: return "wow")
|
|
|
|
say (1 + (-(2 * 3)))
|
|
|
|
say (2 + (..)
|
|
3 * 4
|
|
..)
|
|
|
|
if %x:
|
|
say "one"
|
|
..else: if %y:
|
|
say "two"
|
|
..else:
|
|
say "three"
|
|
|
|
|
|
printf [..]
|
|
".."
|
|
|this is a longstring
|
|
|
|
|
.., "with", ".."
|
|
| multiple lines
|
|
|
|
rule "%n bottles":
|
|
lua block [..]
|
|
".."
|
|
|do
|
|
| print("running raw lua code...")
|
|
| local n =
|
|
.., %n, ".."
|
|
|
|
|
| for i=n,1,-1 do
|
|
| print(tostring(i).." bottles of beer on the wall. Take one down, pass it around,")
|
|
| end
|
|
| print("no more bottles of beer on the wall.")
|
|
|end
|
|
nil
|
|
9 bottles
|
|
|
|
rule "dumsum %nums":
|
|
let "sum" = 0
|
|
for "n" in %nums:
|
|
let "sum" = (%sum + %n)
|
|
return %sum
|
|
|
|
say (dumsum [1,2,3])
|
|
|