From 57571f10c00ea85aa88ba94f9d1442eb741ca07a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?=
 <dominik.pantucek@trustica.cz>
Date: Thu, 11 May 2023 10:04:58 +0200
Subject: [PATCH] Finish conditional parsing of calendar days and months.

---
 src/cal-day.scm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/cal-day.scm b/src/cal-day.scm
index d7fdcd2..2811ffe 100644
--- a/src/cal-day.scm
+++ b/src/cal-day.scm
@@ -38,6 +38,10 @@
 
   cal-day->month
 
+  cal-day->string
+  string->cal-day
+  parse-cal-day/month
+
   cal-day-tests!
   )
 
@@ -180,6 +184,8 @@
 		 (make-cal-day 2023 5 11))
     (test-true parse-cal-day/month
 	       (cal-day? (parse-cal-day/month "2023-05-11")))
+    (test-true parse-cal-day/month
+	       (cal-month? (parse-cal-day/month "2023-05")))
     ))
 
  )