Finish utils split out.

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!)

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)