X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Utils%2FSDS.dcl;h=6836af11023ff7b50e0683339fff54e8d0835446;hb=ff7049a99f7fdd701d49222019df65a9aee8f05a;hp=88f12002061e7ec6108298488cb4f06439f472da;hpb=b3d2bd33a99a2dbdc4907b6876a965c16c37314c;p=mTask.git diff --git a/Utils/SDS.dcl b/Utils/SDS.dcl index 88f1200..6836af1 100644 --- a/Utils/SDS.dcl +++ b/Utils/SDS.dcl @@ -12,3 +12,6 @@ deviceStore :: Shared [MTaskDevice] sdsStore :: Shared [MTaskShare] bcStateStore :: Shared BCState mTaskTaskStore :: Shared [String] + +getSDSStore :: MTaskShare -> Shared a | iTask, mTaskType a +getSDSRecord :: Int -> Task MTaskShare