X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Shares%2FmTaskShare.dcl;h=0f476d5148ad830ca9ca8a6a8f484e025a541391;hb=6abf86833edeae1742db393160db8a9e5c043889;hp=e3fdd426df0dbc9b9332bdcec3005d8c05fd1918;hpb=b3d2bd33a99a2dbdc4907b6876a965c16c37314c;p=mTask.git diff --git a/Shares/mTaskShare.dcl b/Shares/mTaskShare.dcl index e3fdd42..0f476d5 100644 --- a/Shares/mTaskShare.dcl +++ b/Shares/mTaskShare.dcl @@ -1,8 +1,12 @@ definition module Shares.mTaskShare +import iTasks + :: MTaskShare = { initValue :: Int, withTask :: String, identifier :: Int, realShare :: String } + +viewShares :: [MTaskShare] -> Task ()