From 1570e819a875ac0e7f80857f0793784984db687d Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 28 Nov 2014 20:36:42 -0400
Subject: + Added single-line comments. + Added multi-line comments, with
 nesting.

---
 src/example/test1.lang | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/example/test1.lang')

diff --git a/src/example/test1.lang b/src/example/test1.lang
index 43f3111fa..f805b1085 100644
--- a/src/example/test1.lang
+++ b/src/example/test1.lang
@@ -1,16 +1,20 @@
 
 (* 5 6)
 
+## My first function definition!
 (def (repeat n val)
   (if (<=' n 0)
     (#Nil [])
     (#Cons [val (repeat (-' n 1) val)])))
 
+## Testing one, two, three...
 (repeat 5 5)
 
 (def (fold f init inputs)
   (case inputs
+    #( Outer comment #( Inner comment )# )#
     (#Nil [])            init
     (#Cons [head tail]) (fold f (f init head) tail)))
 
+## It's alive!
 (fold * 1 (repeat 5 5))
-- 
cgit v1.2.3