Derives.dcl 2.3 KB
Newer Older
1 2 3 4 5 6 7 8
definition module iTasks.WF.Derives
/**
* This module provides derived instances for common types from StdEnv and Platform
* such that you don't have to derive them when you use these libraries.
*/
import iTasks.WF.Definition

from iTasks.WF.Combinators.Core import :: Action, :: TaskListItem, :: TaskListFilter, :: AttachmentStatus
9
from iTasks.Internal.IWorld import :: ClockParameter
10
from iTasks.SDS.Sources.System import :: TaskInstance, :: ValueStatus
11

12
import Data.Either.GenJSON, Data.Error.GenJSON
13 14
import Text.HTML.GenJSON
import System.Time.GenJSON
15

16
from Text.HTML import :: HtmlAttr
17
from Text.HTML import :: SVGElt, :: SVGAttr, :: SVGAlign, :: SVGColor, :: SVGDefer, :: SVGFillOpacity, :: SVGFuncIRI, :: SVGLengthAdjust, :: SVGLength, :: SVGICCColor, :: SVGNumber
18 19 20 21
from Text.HTML import :: SVGLengthUnit, :: SVGLineCap, :: SVGFillRule, :: SVGLineJoin, :: SVGMeetOrSlice, :: SVGStrokeMiterLimit, :: SVGPaint
from Text.HTML import :: SVGStrokeDashArray, :: SVGStrokeDashOffset, :: SVGStrokeWidth, :: SVGTransform, :: SVGZoomAndPan

//Common library types
22 23 24
derive gEq	    (->), Dynamic
derive gEditor  HtmlAttr
derive gText    HtmlAttr
25

26 27
derive gEditor    SVGElt, SVGAttr, SVGAlign, SVGColor, SVGDefer, SVGFillOpacity, SVGFuncIRI, SVGLengthAdjust, SVGLengthUnit, SVGLineCap, SVGFillRule, SVGLineJoin, SVGMeetOrSlice, SVGStrokeMiterLimit, SVGPaint, SVGStrokeDashArray, SVGStrokeDashOffset, SVGStrokeWidth, SVGTransform, SVGZoomAndPan, SVGLength, SVGICCColor
derive gText      SVGElt, SVGAttr, SVGAlign, SVGColor, SVGDefer, SVGFillOpacity, SVGFuncIRI, SVGLengthAdjust, SVGLengthUnit, SVGLineCap, SVGFillRule, SVGLineJoin, SVGMeetOrSlice, SVGStrokeMiterLimit, SVGPaint, SVGStrokeDashArray, SVGStrokeDashOffset, SVGStrokeWidth, SVGTransform, SVGZoomAndPan, SVGLength, SVGICCColor
28 29 30 31

//Common iTasks system types
derive class iTask TaskId, TaskListFilter, AttachmentStatus

32 33 34
derive JSONEncode		TaskValue, TaskListItem, TaskInstance, ValueStatus, Action, Timespec, ClockParameter
derive JSONDecode		TaskValue, TaskListItem, TaskInstance, ValueStatus, Action, Timespec, ClockParameter
derive gEq				TaskValue, TaskListItem, TaskInstance, ValueStatus, Action, Timespec, ClockParameter
35

36 37
derive gText	        TaskValue, TaskListItem, TaskInstance, ValueStatus, Action
derive gEditor			TaskValue, TaskListItem, TaskInstance, ValueStatus, Action, Timespec, ClockParameter
38