1 files changed, 6 insertions, 0 deletions
diff --git a/tests/test.mew b/tests/test.mew
index 5587d90..32d9df1 100644
--- a/tests/test.mew
+++ b/tests/test.mew
@@ -141,6 +141,12 @@
   (test "\n" (with-output-to-string (fun () (prn))))
   (test 3 (esc ret (with-output-to-string (fun () (ret (prn 1 2 3)))))))
 
+(test-group "app"
+  (test 15 (app + '(4 5 6)))
+  (test 15 (app + 4 5 '(6)))
+  (test 15 (app + 4 5 6 '()))
+  (test 0 (app +)))
+
 (test-group "seq"
   (test #t (void? (seq)))
   (test 1 (seq 1))