X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=examples%2Fexample.spl;h=e71c2162f4c473f00c81296158134ed198e57b51;hb=a363f872ee96379d8b0b9b14cb6faec9d74e7e92;hp=0bf275e8856ba18c11c0295150a2762ac8d66523;hpb=77b19906f627f79a62445281bbc54a8eb584e0d1;p=cc1516.git diff --git a/examples/example.spl b/examples/example.spl index 0bf275e..e71c216 100644 --- a/examples/example.spl +++ b/examples/example.spl @@ -2,6 +2,14 @@ Three ways to implement the f acto rial function in SPL. First the recursive version . */ +Int r = 1; +Char r = 1; +Int r = -1; +Void r = 0; +Bool r = !True; +Bool r = -True; +//var facN = 1; +//var ok = True; facR(n) :: Int -> Int { if (n < 2) {