X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Utils%2FSDS.icl;h=920c7a61620c0cc6aa2e7577e0ea0ac99176e341;hb=a2df77cbda43d5a24eeb8ac7db7452baae9f18aa;hp=9c6b46a9923cc05df447d42889cb5f05564b0bda;hpb=5f4c4b61ea1e4062e90715af9e1027da6d1c7a66;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