Tasks/mTaskTask.dcl

   1 definition module Tasks.mTaskTask
   2
   3 import mTask
   4 import iTasks
   5
   6 derive class iTask MTaskTask, MTaskInterval, Main, ByteCode, Stmt, Expr, BC, BCState
   7
   8 :: MTaskTask = {
   9                 name :: String,
  10                 ident :: Int,
  11                 dateAdded :: DateTime
  12         }
  13
  14 makeTask :: String Int -> Task MTaskTask