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
C
clean-test
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
2
Issues
2
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
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
clean-test
Commits
0491386f
Commit
0491386f
authored
Jul 05, 2018
by
Camil Staps
🚀
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'printInvalidChildMessages' into 'master'
print invalid child messages See merge request
!7
parents
a4d76390
c272df80
Pipeline
#12732
passed with stage
in 37 seconds
Changes
1
Pipelines
2
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
2 deletions
+9
-2
cleantest.icl
cleantest.icl
+9
-2
No files found.
cleantest.icl
View file @
0491386f
...
...
@@ -24,7 +24,7 @@ import System.Options
import
System
.
Process
import
Testing
.
Options
import
Testing
.
TestEvents
from
Text
import
<+,
class
Text
(
join
,
replaceSubString
,
split
,
trim
),
instance
Text
String
from
Text
import
<+,
class
Text
(
join
,
replaceSubString
,
split
,
trim
,
concat
),
instance
Text
String
import
Text
.
GenJSON
import
Text
.
GenParse
import
Text
.
GenPrint
...
...
@@ -320,8 +320,15 @@ where
#
io
=
emit
(
EndEvent
{
name
=
r
.
TestRun
.
name
,
event
=
event
,
message
=
"Failed to read child messages"
,
message
=
join
"
\n
"
[
"Failed to read child messages:"
:
[
printToString
(
ellipsis
40
outp
)
\\
outp
<-
output
.
lines
&
Nothing
<-
results
]
]
})
io
with
ellipsis
n
s
|
size
s
<=
n
=
s
|
otherwise
=
s
%
(
0
,
n
-4
)
+++
"..."
=
return
event
r
io
w
#
ee
=
mergeResults
$
map
fromJust
results
#
io
=
emit
(
EndEvent
ee
)
io
...
...
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