Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
4fcb4718
Commit
4fcb4718
authored
Jan 13, 2015
by
Andrey Mokhov
Browse files
Improve terseRun.
parent
5aa3addc
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/Oracles/Builder.hs
View file @
4fcb4718
...
...
@@ -122,9 +122,13 @@ interestingInfo builder ss = case builder of
GhcCabal
->
prefixAndSuffix
3
0
ss
where
prefixAndSuffix
n
m
ss
=
if
length
ss
<=
n
+
m
if
length
ss
<=
n
+
m
+
1
then
ss
else
take
n
ss
++
[
"..."
]
++
drop
(
length
ss
-
m
)
ss
else
take
n
ss
++
[
"... skipping "
++
show
(
length
ss
-
n
-
m
)
++
" arguments ..."
]
++
drop
(
length
ss
-
m
)
ss
-- Check if the builder is uniquely specified in config files
specified
::
Builder
->
Condition
...
...
Write
Preview
Supports
Markdown
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