repositories
/
cc1516.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
man toegevoegd, mapjes gemaakt, bijna klaar voor inleveren
[cc1516.git]
/
src
/
yard.dcl
diff --git
a/src/yard.dcl
b/src/yard.dcl
index
178356a
..
7d08a9c
100644
(file)
--- a/
src/yard.dcl
+++ b/
src/yard.dcl
@@
-8,7
+8,7
@@
from Control.Monad import class Monad
from Control.Applicative import class Applicative, class Alternative
import Data.Void
from Control.Applicative import class Applicative, class Alternative
import Data.Void
-:: Error = P
arseError | LexError String | Unexpected String Int
+:: Error = P
ositionalError Int Int String | Error String
:: Parser a b = Parser ([a] -> (Either Error b, [a]))
instance Functor (Parser a)
:: Parser a b = Parser ([a] -> (Either Error b, [a]))
instance Functor (Parser a)
@@
-20,7
+20,7
@@
instance toString Error
runParser :: (Parser a b) [a] -> (Either Error b, [a])
runParser :: (Parser a b) [a] -> (Either Error b, [a])
-(<?>) :: (Parser a b)
(String, Int)
-> Parser a b
+(<?>) :: (Parser a b)
Error
-> Parser a b
fail :: Parser a b
top :: Parser a a
peek :: Parser a a
fail :: Parser a b
top :: Parser a a
peek :: Parser a a