Add to global tests, fixup dependencies.

src/cal-day.scm

@@ -37,12 +37,16 @@
   cal-day-month
   cal-day-day
 
-  cal-day->cal-month
+  cal-day->month
+
+  cal-day-tests!
   )
 
  (import scheme
+	 (chicken base)
 	 util-tag
-	 cal-month)
+	 cal-month
+	 testing)
 
  ;; Type tag
  (define TAG-CAL-DAY (make-tag CAL-DAY))
@@ -110,5 +114,11 @@
 	 (cal-month-add M 1)
 	 M)))
 
+ ;; Module self-tests
+ (define (cal-day-tests!)
+   (run-tests
+    cal-day
+    ))
+
  )