X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=lex.dcl;h=f256af59e857849a664acb4501a84fcf646e20fb;hb=4b8ac77a88528dd1eeac43fd7a6c2e6ac711d5a9;hp=3abe22d521c452a216afa89fe934185f4f854605;hpb=9b74ace948b5035934d377a712eddda653bc640e;p=cc1516.git

diff --git a/lex.dcl b/lex.dcl
index 3abe22d..f256af5 100644
--- a/lex.dcl
+++ b/lex.dcl
@@ -44,6 +44,6 @@ import Data.Either
 	| AmpersandsToken   // &&
 	| PipesToken        // ||
 
-:: LexerOutput :== Either String [Token]
+:: LexerOutput a :== Either String a
 
-lexer :: [Char] -> LexerOutput
+lexer :: [Char] -> LexerOutput [Token]