summaryrefslogtreecommitdiff
path: root/assignment-7/DateExtensions.dcl
diff options
context:
space:
mode:
authorCamil Staps2017-11-05 14:06:53 +0100
committerCamil Staps2017-11-05 14:06:53 +0100
commit54f7f4d9d5b35a810626f5e567db74579a8987e5 (patch)
tree05c89c5667ba68baa29fb2eb3ee5c3c899375961 /assignment-7/DateExtensions.dcl
parentAdd showAppointments tryouts with SVG, nicer makeAppointment, proposeAppointm... (diff)
Finish appointments and other improvements
Diffstat (limited to 'assignment-7/DateExtensions.dcl')
-rw-r--r--assignment-7/DateExtensions.dcl2
1 files changed, 2 insertions, 0 deletions
diff --git a/assignment-7/DateExtensions.dcl b/assignment-7/DateExtensions.dcl
index c7eacec..1cce935 100644
--- a/assignment-7/DateExtensions.dcl
+++ b/assignment-7/DateExtensions.dcl
@@ -7,6 +7,8 @@ import iTasks.Extensions.DateTime
derive class iTask Day
instance toString Day
+addTime :: Time DateTime -> DateTime
+
nextHour :: DateTime -> DateTime
nextDay :: (Date -> Date)