Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
I
iTasks-SDK
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
73
Issues
73
List
Boards
Labels
Service Desk
Milestones
Merge Requests
6
Merge Requests
6
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
clean-and-itasks
iTasks-SDK
Commits
9f91b23b
Commit
9f91b23b
authored
Oct 23, 2019
by
Mart Lubbers
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix overlap instances
parent
2da7d59b
Pipeline
#31803
failed with stage
in 58 seconds
Changes
3
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
4 additions
and
7 deletions
+4
-7
Libraries/iTasks/Extensions/DateTime.dcl
Libraries/iTasks/Extensions/DateTime.dcl
+2
-0
Libraries/iTasks/Internal/SDS.icl
Libraries/iTasks/Internal/SDS.icl
+0
-5
Libraries/iTasks/WF/Derives.icl
Libraries/iTasks/WF/Derives.icl
+2
-2
No files found.
Libraries/iTasks/Extensions/DateTime.dcl
View file @
9f91b23b
...
...
@@ -3,6 +3,7 @@ definition module iTasks.Extensions.DateTime
* This module provides types for working with dates and times
*/
import
iTasks
.
WF
.
Definition
import
iTasks
.
SDS
.
Definition
from
Data
.
Error
import
::
MaybeError
,
::
MaybeErrorString
from
Text
.
GenPrint
import
generic
gPrint
,
::
PrintState
,
class
PrintOutput
...
...
@@ -150,3 +151,4 @@ waitForDateTime :: !DateTime -> Task DateTime
waitForTimer
::
!
Int
->
Task
DateTime
dateTimeStampedShare
::
(
sds
p
(
DateTime
,
a
)
(
DateTime
,
a
))
->
SDSLens
p
(
DateTime
,
a
)
a
|
gText
{|*|}
p
&
TC
p
&
TC
a
&
RWShared
sds
Libraries/iTasks/Internal/SDS.icl
View file @
9f91b23b
...
...
@@ -974,11 +974,6 @@ readSDSDebug (SDSDebug name sds) p context mbRegister iworld
db
(
Ok
(
AsyncRead
sds
),
iworld
)
=
(
Ok
(
AsyncRead
(
SDSDebug
name
sds
)),
iShow
[
"AsyncRead "
+++
name
]
iworld
)
// toString instances for SDSDebug
instance
toString
(
TaskId
,
Maybe
RemoteNotifyOptions
)
where
toString
(
taskId
,
Nothing
)
=
"local "
+++
toString
taskId
toString
(
taskId
,
(
Just
remote
))
=
"remote "
+++
toString
taskId
+++
" "
+++
toString
remote
instance
toString
RemoteNotifyOptions
where
toString
{
hostToNotify
,
portToNotify
,
remoteSdsId
}
=
hostToNotify
+++
":"
+++
toString
portToNotify
+++
"@"
+++
remoteSdsId
...
...
Libraries/iTasks/WF/Derives.icl
View file @
9f91b23b
...
...
@@ -20,8 +20,8 @@ gEq{|Dynamic|} _ _ = False // dynamics are never equal
gEditor
{|{}|}
_
_
tjx
fjx
=
emptyEditorWithDefaultInEnterMode_
(
JSONEncode
{|*
->
*|}
tjx
)
(
JSONDecode
{|*
->
*|}
fjx
)
{}
gText
{|{}|}
_
_
_
=
[]
derive
gEditor
SVGElt
,
SVGAttr
,
SVGAlign
,
SVGColor
,
SVGDefer
,
SVGFillOpacity
,
SVGFuncIRI
,
SVGLengthAdjust
,
SVGLengthUnit
,
SVGLineCap
,
SVGFillRule
,
SVGLineJoin
,
SVGMeetOrSlice
,
SVGStrokeMiterLimit
,
SVGPaint
,
SVGStrokeDashArray
,
SVGStrokeDashOffset
,
SVGStrokeWidth
,
SVGTransform
,
SVGZoomAndPan
derive
gText
SVGElt
,
SVGAttr
,
SVGAlign
,
SVGColor
,
SVGDefer
,
SVGFillOpacity
,
SVGFuncIRI
,
SVGLengthAdjust
,
SVGLengthUnit
,
SVGLineCap
,
SVGFillRule
,
SVGLineJoin
,
SVGMeetOrSlice
,
SVGStrokeMiterLimit
,
SVGPaint
,
SVGStrokeDashArray
,
SVGStrokeDashOffset
,
SVGStrokeWidth
,
SVGTransform
,
SVGZoomAndPan
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
derive
gEditor
HtmlAttr
derive
gText
HtmlAttr
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment