From 65fa16cce7781100f105692b6502cc36de511228 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 21 May 2024 18:58:49 -0700 Subject: [PATCH] Issue #537 - Add tests --- tests/base.scm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/tests/base.scm b/tests/base.scm index 32829b8b..c67a23b3 100644 --- a/tests/base.scm +++ b/tests/base.scm @@ -9,6 +9,7 @@ (import (scheme base) + (scheme eval) (scheme inexact) (cyclone test)) @@ -31,6 +32,12 @@ (test '() (make-list -2)) ) +(test-group + "apply" + (test '(5 1 2) (eval '(apply cons '(5 (1 2))))) + (test '(5 1 2) (apply cons '(5 (1 2)))) +) + (cond-expand (memory streams (test-group