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
669414b7
Commit
669414b7
authored
Apr 29, 2016
by
Katharina Rahf
Browse files
CYM was updated; so runCYM had to be replaced by runCYMIgnWarn
parent
2449d5f2
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/Token/TokenStream.hs
View file @
669414b7
...
...
@@ -12,7 +12,7 @@ import Control.Monad.Writer (liftIO)
import
Data.List
(
intercalate
)
import
System.FilePath
(
replaceExtension
)
import
Curry.Base.Monad
(
CYIO
,
liftCYM
,
failMessages
,
runCYM
)
import
Curry.Base.Monad
(
CYIO
,
liftCYM
,
failMessages
,
runCYM
IgnWarn
)
import
Curry.Base.Position
(
Position
(
..
))
import
Curry.Base.Pretty
(
text
)
import
Curry.Files.Filenames
(
addCurrySubdirModule
)
...
...
@@ -55,7 +55,7 @@ formatToken f = do
mbModule
<-
liftIO
$
readModule
f
case
mbModule
of
Nothing
->
failMessages
[
message
$
text
$
"Missing file: "
++
f
]
Just
src
->
return
$
runCYM
(
lexSource
f
src
)
Just
src
->
return
$
runCYM
IgnWarn
(
lexSource
f
src
)
-- |Show tokens and their value if needed
showToken
::
Token
->
String
...
...
@@ -86,7 +86,6 @@ showToken t =
Token
Backquote
NoAttributes
->
"Backquote"
-- layout
Token
LeftBraceSemicolon
NoAttributes
->
"LeftBracketSemicolon"
Token
VSemicolon
NoAttributes
->
"VSemicolon"
Token
VRightBrace
NoAttributes
->
"VRightBrace"
...
...
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