Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
curry
curry-frontend
Commits
9080edff
Commit
9080edff
authored
Dec 21, 2015
by
Björn Peemöller
Browse files
Replaced show of ModuleIdent by moduleName
parent
c79f8488
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/CurryBuilder.hs
View file @
9080edff
...
...
@@ -173,7 +173,7 @@ compMessage :: (Int, Int) -> String -> ModuleIdent
->
(
FilePath
,
FilePath
)
->
String
compMessage
(
curNum
,
maxNum
)
what
m
(
src
,
dst
)
=
'['
:
lpad
(
length
sMaxNum
)
(
show
curNum
)
++
" of "
++
sMaxNum
++
"]"
++
' '
:
rpad
9
what
++
' '
:
rpad
16
(
show
m
)
++
' '
:
rpad
9
what
++
' '
:
rpad
16
(
moduleName
m
)
++
" ( "
++
normalise
src
++
", "
++
normalise
dst
++
" )"
where
sMaxNum
=
show
maxNum
...
...
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