mTasks can now be built with normal taskss

[mTask.git] / Utils / SDS.icl

diff --git a/Utils/SDS.icl b/Utils/SDS.icl
index 27ebeb7..8e78cf0 100644 (file)
--- a/Utils/SDS.icl
+++ b/Utils/SDS.icl
@@ -8,7 +8,7 @@ import Tasks.Examples
 import qualified Data.Map as DM
 from Data.Func import $
 
-derive class iTask MTaskShare, BCState
+derive class iTask MTaskShare
 
 memoryShare :: String a -> Shared a | iTask a
 memoryShare s d = sdsFocus s $ memoryStore "" $ Just d