X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Utils%2FSDS.icl;fp=Utils%2FSDS.icl;h=920c7a61620c0cc6aa2e7577e0ea0ac99176e341;hb=18c1286739897b65578e87b17167c6cef1922a3b;hp=9c6b46a9923cc05df447d42889cb5f05564b0bda;hpb=e37402e7672352aa3642df4c1183417a72f59641;p=mTask.git diff --git a/Utils/SDS.icl b/Utils/SDS.icl index 9c6b46a..920c7a6 100644 --- a/Utils/SDS.icl +++ b/Utils/SDS.icl @@ -8,8 +8,6 @@ import Tasks.Examples import qualified Data.Map as DM from Data.Func import $ -derive class iTask MTaskShare - memoryShare :: String a -> Shared a | iTask a memoryShare s d = sdsFocus s $ memoryStore "" $ Just d