X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=yard.dcl;h=a1bb2a3e51562abbb55d2e20ea59e99dad14386c;hb=4766205e7035a58c8a1fa1557b6e14577ed26f32;hp=9f40539fcf697211f1decd7929c04f68aaf358b8;hpb=89c1b0d0eb0851e93ae19ab934033af3ec50518f;p=cc1516.git

diff --git a/yard.dcl b/yard.dcl
index 9f40539..a1bb2a3 100644
--- a/yard.dcl
+++ b/yard.dcl
@@ -6,8 +6,8 @@ from Data.Functor import class Functor
 from Control.Monad import class Monad
 from Control.Applicative import class Applicative, class Alternative
 
-:: Parser a b = Parser ([a] -> (Either Error b, [a]))
 :: Error = ParseException
+:: Parser a b = Parser ([a] -> (Either Error b, [a]))
 
 runParser :: (Parser a b) [a] -> (Either Error b, [a])
 
@@ -20,4 +20,4 @@ fail :: Parser a b
 top :: Parser a a
 satisfy :: (a -> Bool) -> Parser a a
 item :: a -> Parser a a | Eq a
-list :: [a] -> Parser a [a] | Eq a
\ No newline at end of file
+list :: [a] -> Parser a [a] | Eq a