1 implementation module Tasks.mTaskTask
6 import iTasks._Framework.Serialization
8 derive class iTask MTaskTask, MTaskInterval, Main, ByteCode, Stmt, Expr, BC, BCState, RWST, Identity
10 makeTask :: String Int -> Task MTaskTask
11 makeTask name ident = get currentDateTime
12 @ \dt->{MTaskTask | name=name,ident=ident,dateAdded=dt}