X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=metaeditor%2FMetaType.dcl;h=e74a2769fa6bedb6dfee5a02a02bd222ae3fdab1;hb=95e99be6bdd04513688b88f1afaefac360eeff1d;hp=7f854584ebbd3ea7a9cefaf506efa8ad805d5e1f;hpb=d19291be9099351d160c3578fecc196c599b9cb0;p=clean-tests.git diff --git a/metaeditor/MetaType.dcl b/metaeditor/MetaType.dcl index 7f85458..e74a276 100644 --- a/metaeditor/MetaType.dcl +++ b/metaeditor/MetaType.dcl @@ -1,18 +1,17 @@ definition module MetaType from StdOverloaded import class toString, class fromString -from iTasks.UI.Editor import :: Editor -from iTasks.UI.Definition import :: UIType -from iTasks.WF.Definition import class iTask -from iTasks.UI.Editor import :: Editor -from iTasks.UI.Editor.Generic import generic gEditor -from iTasks.Internal.Generic.Visualization import generic gText, :: TextFormat -from iTasks.Internal.Generic.Defaults import generic gDefault -from iTasks.WF.Definition import :: Task -from Text.GenJSON import generic JSONEncode, generic JSONDecode, :: JSONNode + +from Data.Either import :: Either from Data.GenEq import generic gEq from Data.Maybe import :: Maybe -from Data.Either import :: Either +from Text.GenJSON import generic JSONEncode, generic JSONDecode, :: JSONNode + +from iTasks.Internal.Generic.Defaults import generic gDefault +from iTasks.Internal.Generic.Visualization import generic gText, :: TextFormat +from iTasks.UI.Editor import :: Editor +from iTasks.UI.Editor.Generic import generic gEditor +from iTasks.WF.Definition import class iTask, :: Task derive class iTask MetaType derive gEq MetaInst