diff --git a/brmsaptool.scm b/brmsaptool.scm index 9aa6dca..d1a9359 100644 --- a/brmsaptool.scm +++ b/brmsaptool.scm @@ -30,6 +30,7 @@ period member-file command-line + utils ansi members-base) @@ -42,6 +43,7 @@ (dictionary-tests!) (month-tests!) (period-tests!) +(utils-tests!) (ansi-tests!) (member-file-tests!) (command-line-tests!) diff --git a/utils.scm b/utils.scm index c307bb4..2001a0e 100644 --- a/utils.scm +++ b/utils.scm @@ -32,6 +32,10 @@ utils-tests! ) + (import scheme + (chicken base) + testing) + ;; Returns a list with elements matching pred? predicate. (define (filter pred? lst) (let loop ((lst lst)