added argument mismatch

[cc1516.git] / yard.dcl

diff --git a/yard.dcl b/yard.dcl
index c302420..08b2ff1 100644 (file)
--- a/yard.dcl
+++ b/yard.dcl
@@ -6,7 +6,7 @@ from StdClass import class ==, class Eq
 from Data.Functor import class Functor
 from Control.Monad import class Monad
 from Control.Applicative import class Applicative, class Alternative
 from Data.Functor import class Functor
 from Control.Monad import class Monad
 from Control.Applicative import class Applicative, class Alternative

-import Data.Void
+from Data.Void import :: Void

 
 :: Error = PositionalError Int Int String | Error String
 :: Parser a b = Parser ([a] -> (Either Error b, [a]))
 
 :: Error = PositionalError Int Int String | Error String
 :: Parser a b = Parser ([a] -> (Either Error b, [a]))


@@ -18,7 +18,6 @@ instance Alternative (Parser a)
 
 instance toString Error
 
 
 instance toString Error
 

-

 runParser :: (Parser a b) [a] -> (Either Error b, [a])
 (<?>) :: (Parser a b) Error -> Parser a b
 fail :: Parser a b
 runParser :: (Parser a b) [a] -> (Either Error b, [a])
 (<?>) :: (Parser a b) Error -> Parser a b
 fail :: Parser a b