Browse Source

new example with a bunch of nested constructs to at least try to make testing more rigorous

pull/14/head
nisstyre56 11 years ago
parent
commit
7bba04dae1
  1. 16
      example.jl

16
example.jl

@ -2,7 +2,7 @@ defop 2 Left (a ++ b)
(a - b)
(qat :: A -> b)
def qat (lambda a b c -> (a + b))
def tdeftype (lambda a b c -> (a + b))
def (add a b)
(a + b)
@ -36,6 +36,20 @@ def fileLines
def (testUnary n)
((-n) + n)
def (foo bar)
let {
lol = [1,
(lambda qwerty blah ->
[qerty, blah,
(lambda whatever -> whatever)])]
}
if bar
then [lol,(- 1.2),"lulz",lol]
else if something
then [,]
else
somethingelse
def (splitHelp acc xs ys)
if (null xs)
then ((reverse acc), ys)

Loading…
Cancel
Save