X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Utils%2FSDS.dcl;h=b33045a4c09fbfb8de20b4dc983b6de73dca8825;hb=6abf86833edeae1742db393160db8a9e5c043889;hp=702045179d908a4bd18e5d13bcb8e927d46ecf63;hpb=7fec7868123d56d410e807042cb3e031ebda12b9;p=mTask.git diff --git a/Utils/SDS.dcl b/Utils/SDS.dcl index 7020451..b33045a 100644 --- a/Utils/SDS.dcl +++ b/Utils/SDS.dcl @@ -4,7 +4,7 @@ import Shares.mTaskShare import Devices.mTaskDevice import iTasks -derive class iTask MTaskShare, BCState +derive class iTask MTaskShare memoryShare :: String a -> Shared a | iTask a