X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=examples%2Fexample.spl;h=4a55e3550275b4c72300329dddeb2db0b0122b61;hb=5b1c37a52f0d63d4972665f672df100a231a2f57;hp=0bf275e8856ba18c11c0295150a2762ac8d66523;hpb=77b19906f627f79a62445281bbc54a8eb584e0d1;p=cc1516.git

diff --git a/examples/example.spl b/examples/example.spl
index 0bf275e..4a55e35 100644
--- a/examples/example.spl
+++ b/examples/example.spl
@@ -2,6 +2,9 @@
 	Three ways to implement the f acto rial function in SPL.
 	First the recursive version .
 */
+var r = 1;
+var facN = 1;
+var ok = True;
 
 facR(n) :: Int -> Int {
 	if (n < 2) {