X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Utils%2FSDS.dcl;h=785af5d601882d006f66be4018fdc68444a7c934;hb=a2df77cbda43d5a24eeb8ac7db7452baae9f18aa;hp=6836af11023ff7b50e0683339fff54e8d0835446;hpb=9f93ff243f8ba2e1924e70df10978060a3b6f461;p=mTask.git

diff --git a/Utils/SDS.dcl b/Utils/SDS.dcl
index 6836af1..785af5d 100644
--- a/Utils/SDS.dcl
+++ b/Utils/SDS.dcl
@@ -4,8 +4,6 @@ import Shares.mTaskShare
 import Devices.mTaskDevice
 import iTasks
 
-derive class iTask MTaskShare
-
 memoryShare :: String a -> Shared a | iTask a
 
 deviceStore :: Shared [MTaskDevice]
@@ -13,5 +11,4 @@ sdsStore :: Shared [MTaskShare]
 bcStateStore :: Shared BCState
 mTaskTaskStore :: Shared [String]
 
-getSDSStore :: MTaskShare -> Shared a | iTask, mTaskType a
 getSDSRecord :: Int -> Task MTaskShare