summaryrefslogtreecommitdiff
path: root/tests/examplefiles/r6rs-comments.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/examplefiles/r6rs-comments.scm')
-rw-r--r--tests/examplefiles/r6rs-comments.scm23
1 files changed, 0 insertions, 23 deletions
diff --git a/tests/examplefiles/r6rs-comments.scm b/tests/examplefiles/r6rs-comments.scm
deleted file mode 100644
index cd5c3636..00000000
--- a/tests/examplefiles/r6rs-comments.scm
+++ /dev/null
@@ -1,23 +0,0 @@
-#!r6rs
-
-#|
-
- The FACT procedure computes the factorial
-
- of a non-negative integer.
-
-|#
-
-(define fact
-
- (lambda (n)
-
- ;; base case
-
- (if (= n 0)
-
- #;(= n 1)
-
- 1 ; identity of *
-
- (* n (fact (- n 1))))))