klisp

an open source interpreter for the Kernel Programming Language.
git clone http://git.hanabi.in/repos/klisp.git
Log | Files | Refs | README

commit 438a10381014f6eaf70f344eabdbd8a09420892b
parent c41d2ac4ae9f11a3324ed497a162749412416677
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Mon, 24 Oct 2011 14:54:17 -0300

Added some comments to the tests.

Diffstat:
Msrc/tests/test-all.k | 3++-
Msrc/tests/test-helpers.k | 7+++++++
2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/src/tests/test-all.k b/src/tests/test-all.k @@ -14,7 +14,8 @@ (load "tests/environments.k") (load "tests/environment-mutation.k") (load "tests/combiners.k") -(load "tests/encapsulations.k") +;; XXX Oto, you forgot to add tests/encapsulations.k to the repo! +;;(load "tests/encapsulations.k") (load "tests/numbers.k") (load "tests/strings.k") (load "tests/characters.k") diff --git a/src/tests/test-helpers.k b/src/tests/test-helpers.k @@ -41,6 +41,13 @@ ($define! immutable-string? ($lambda (obj) ($and? (string? obj) (not? (nonempty-mutable-string? obj))))) +;; XXX/TODO Some of these could be removed if we had eager comprehension in +;; check.k (which would also complete the srfi-78 implementation). The problem +;; is that the design adaptation from macros to operatives should be taken +;; with some care. I intended to do it before the remaining tests, but since +;; Oto Havle went ahead and wrote the tests without it, they have lost some +;; priority. Andres Navarro + ;; ($false-for-all? P XS) evaluates to #t iff (P X) evaluates ;; to #f for all members X of the list XS. ;;