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) (a - b)
(qat :: 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) def (add a b)
(a + b) (a + b)
@ -36,6 +36,20 @@ def fileLines
def (testUnary n) def (testUnary n)
((-n) + 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) def (splitHelp acc xs ys)
if (null xs) if (null xs)
then ((reverse acc), ys) then ((reverse acc), ys)

Loading…
Cancel
Save