diff options
Diffstat (limited to 'test-suite/standalone/test-language.el')
-rw-r--r-- | test-suite/standalone/test-language.el | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/standalone/test-language.el b/test-suite/standalone/test-language.el new file mode 100644 index 000000000..c1f09cc3f --- /dev/null +++ b/test-suite/standalone/test-language.el @@ -0,0 +1,11 @@ +;; Sample Elisp code for `test-language'. + +(defun fib (n) + "Anything but a fib." + (if (<= n 1) + n + (+ (fib (- n 1)) + (fib (- n 2))))) + +(or (= 13 (fib 7)) + (error "Something's wrong!")) |