haskell-lexer-1.1.1/0000755000000000000000000000000007346545000012443 5ustar0000000000000000haskell-lexer-1.1.1/LICENSE0000644000000000000000000000211007346545000013442 0ustar0000000000000000Copyright (c) 2008 Thomas Hallgren Copyright (c) 2008 Iavor S. Diatchki Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. haskell-lexer-1.1.1/Language/Haskell/0000755000000000000000000000000007346545000015551 5ustar0000000000000000haskell-lexer-1.1.1/Language/Haskell/Lexer.hs0000644000000000000000000000370707346545000017173 0ustar0000000000000000module Language.Haskell.Lexer ( PosToken , Token(..) , lexerPass0 , lexerPass0' , lexerPass1 , rmSpace , layoutPre , module Language.Haskell.Lexer.Position ) where import Language.Haskell.Lexer.Lex(haskellLex) import Language.Haskell.Lexer.Utils import Language.Haskell.Lexer.Layout(layoutPre,PosToken) import Language.Haskell.Lexer.Position import Data.List(mapAccumL) default(Int) -- | The function 'lexerPass1' handles the part of lexical analysis that -- can be done independently of the parser---the tokenization and the -- addition of the extra layout tokens \ and {n}, as specified in -- section 9.3 of the revised Haskell 98 Report. lexerPass1 :: String -> [PosToken] lexerPass1 = lexerPass1Only . lexerPass0 lexerPass1Only :: [PosToken] -> [PosToken] lexerPass1Only = layoutPre . rmSpace -- | Remove token that are not meaningful (e.g., white space and comments). rmSpace :: [PosToken] -> [PosToken] rmSpace = filter (notWhite.fst) notWhite :: Token -> Bool notWhite t = t/=Whitespace && t/=Commentstart && t/=Comment && t/=NestedComment -- | Tokenize and add position information. Preserves white space, -- and does not insert extra tokens due to layout. lexerPass0 :: String -> [PosToken] lexerPass0 = lexerPass0' startPos -- | Same as 'lexerPass0', except that it uses the given start position. lexerPass0' :: Pos -> String -> [PosToken] lexerPass0' pos0 = addPos . haskellLex . rmcr where addPos = snd . mapAccumL pos pos0 pos p (t,s) = {-seq p'-} (p',(t,(p,s))) where p' = nextPos p s -- where s = reverse r -- | Since #nextPos# examines one character at a time, it will increase the line -- number by 2 if it sees \CR\LF, which can happen when reading DOS files on -- a Unix like system. -- Since the extra \CR characters can cause trouble later as well, we choose -- to simply remove them here. rmcr :: String -> String rmcr ('\CR':'\LF':s) = '\LF':rmcr s rmcr (c:s) = c:rmcr s rmcr "" = "" haskell-lexer-1.1.1/Language/Haskell/Lexer/0000755000000000000000000000000007346545000016630 5ustar0000000000000000haskell-lexer-1.1.1/Language/Haskell/Lexer/Layout.hs0000644000000000000000000000400207346545000020435 0ustar0000000000000000module Language.Haskell.Lexer.Layout (layoutPre,PosToken) where import Language.Haskell.Lexer.Tokens import Language.Haskell.Lexer.Position type PosToken = (Token,(Pos,String)) -- | This is an implementation of Haskell layout, as specified in -- section 9.3 of the revised Haskell 98 report. -- This preprocessor inserts the extra \ and {n} tokens. layoutPre :: [PosToken] -> [PosToken] layoutPre = indent . open open :: [PosToken] -> [PosToken] open = open1 {-+ If the first lexeme of a module is not { or module, then it is preceded by {n} where n is the indentation of the lexeme. -} open1 :: [PosToken] -> [PosToken] open1 (t1@(Reservedid,(_,"module")):ts) = t1:open2 ts open1 (t1@(Special,(_,"{")):ts) = t1:open2 ts open1 ts@((_,(p,_)):_) = (Open (column p),(p,"")):open2 ts open1 [] = [] {-+ If a let, where, do, or of keyword is not followed by the lexeme {, the token {n} is inserted after the keyword, where n is the indentation of the next lexeme if there is one, or 0 if the end of file has been reached. -} open2 :: [PosToken] -> [PosToken] open2 (t1:ts1) | isLtoken t1 = case ts1 of t2@(_,(p,_)):ts2 -> if notLBrace t2 then t1:(Open (column p),(p,"")):open2 ts1 else t1:t2:open2 ts2 [] -> t1:(Open 0,(fst (snd t1),"")):[] where isLtoken (Reservedid,(_,s)) = s `elem` ["let","where","do","of"] isLtoken _ = False notLBrace (Special,(_,"{")) = False notLBrace _ = True open2 (t:ts) = t:open2 ts open2 [] = [] {-+ (This is from the original Haskell 98 report.) The first token on each line (not including tokens already annotated) is preceeded by <n>, where n is the indentation of the token. -} indent :: [PosToken] -> [PosToken] indent (t1@(Open _,(p,_)):ts) = t1:indent2 (line p) ts indent (t1@(_,(p,_)):ts) = (Indent (column p),(p,"")):t1:indent2 (line p) ts indent [] = [] indent2 :: Int -> [PosToken] -> [PosToken] indent2 r (t1@(_,(p,_)):ts) | line p==r = t1:indent2 r ts indent2 _ ts = indent ts haskell-lexer-1.1.1/Language/Haskell/Lexer/Lex.hs0000644000000000000000000053034107346545000017722 0ustar0000000000000000 -- Automatically generated code for a DFA follows: --Equal states: [[[166,170]],[[2,3],[8,9],[166,167,168,171],[5,31],[10,11],[36,37],[39,40]]] {-# OPTIONS_GHC -O #-} module Language.Haskell.Lexer.Lex (haskellLex) where import Data.Char import Language.Haskell.Lexer.Utils type Output = [(Token,String)] type Input = String type Acc = Input -- reversed type Lexer = Input -> Output type LexerState = (Acc->Lexer) -> Acc -> Lexer haskellLex :: Lexer haskellLex is = start1 is cclass :: Char -> Int cclass c = case c of '\t' -> 1 '\n' -> 2 '\v' -> 3 '\f' -> 4 '\r' -> 5 ' ' -> 6 '\160' -> 6 '!' -> 7 '#' -> 7 '$' -> 7 '%' -> 7 '*' -> 7 '/' -> 7 '?' -> 7 '"' -> 8 '&' -> 9 '\'' -> 10 '(' -> 11 ')' -> 11 ',' -> 11 ';' -> 11 '`' -> 11 '}' -> 11 '+' -> 12 '-' -> 13 '.' -> 14 '0' -> 15 '1' -> 16 '2' -> 16 '3' -> 16 '4' -> 16 '5' -> 17 '6' -> 17 '7' -> 17 '8' -> 18 '9' -> 18 ':' -> 19 '<' -> 20 '=' -> 21 '>' -> 22 '@' -> 23 'A' -> 24 'B' -> 25 'C' -> 26 'D' -> 27 'E' -> 28 'F' -> 29 'G' -> 30 'H' -> 31 'I' -> 32 'P' -> 32 'J' -> 33 'W' -> 33 'Z' -> 33 'K' -> 34 'L' -> 35 'M' -> 36 'N' -> 37 'O' -> 38 'Q' -> 39 'R' -> 40 'S' -> 41 'T' -> 42 'U' -> 43 'V' -> 44 'X' -> 45 'Y' -> 46 '[' -> 47 '\\' -> 48 ']' -> 49 '^' -> 50 '_' -> 51 'a' -> 52 'b' -> 53 'c' -> 54 'd' -> 55 'e' -> 56 'f' -> 57 'g' -> 58 'h' -> 59 'i' -> 60 'j' -> 61 'k' -> 61 'q' -> 61 'z' -> 61 'l' -> 62 'm' -> 63 'n' -> 64 'o' -> 65 'p' -> 66 'r' -> 67 's' -> 68 't' -> 69 'u' -> 70 'v' -> 71 'w' -> 72 'x' -> 73 'y' -> 74 '{' -> 75 '|' -> 76 '~' -> 77 c | isAscii c -> 0 | isSpace c -> 3 | (\x -> isSymbol x || isPunctuation x) c -> 7 | isDigit c -> 18 | isLower c -> 61 | isUpper c -> 78 | otherwise -> 0 start1 :: Lexer start1 is = state1 (\ as is -> gotError as is) "" is state1 :: LexerState state1 err as [] = gotEOF as state1 err as iis@(i:is) = case cclass i of 52 -> state223 err (i:as) is 53 -> state223 err (i:as) is 57 -> state223 err (i:as) is 58 -> state223 err (i:as) is 59 -> state223 err (i:as) is 61 -> state223 err (i:as) is 66 -> state223 err (i:as) is 67 -> state223 err (i:as) is 68 -> state223 err (i:as) is 70 -> state223 err (i:as) is 71 -> state223 err (i:as) is 73 -> state223 err (i:as) is 74 -> state223 err (i:as) is 1 -> state2 err (i:as) is 2 -> state2 err (i:as) is 3 -> state2 err (i:as) is 4 -> state2 err (i:as) is 5 -> state2 err (i:as) is 6 -> state2 err (i:as) is 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 22 -> state4 err (i:as) is 50 -> state4 err (i:as) is 23 -> state79 err (i:as) is 48 -> state79 err (i:as) is 76 -> state79 err (i:as) is 77 -> state79 err (i:as) is 16 -> state87 err (i:as) is 17 -> state87 err (i:as) is 18 -> state87 err (i:as) is 11 -> state73 err (i:as) is 49 -> state73 err (i:as) is 0 -> err as iis 8 -> state5 err (i:as) is 10 -> state41 err (i:as) is 13 -> state74 err (i:as) is 14 -> state80 err (i:as) is 15 -> state81 err (i:as) is 19 -> state92 err (i:as) is 20 -> state95 err (i:as) is 21 -> state96 err (i:as) is 47 -> state161 err (i:as) is 51 -> state222 err (i:as) is 54 -> state224 err (i:as) is 55 -> state230 err (i:as) is 56 -> state243 err (i:as) is 60 -> state244 err (i:as) is 62 -> state256 err (i:as) is 63 -> state257 err (i:as) is 64 -> state261 err (i:as) is 65 -> state266 err (i:as) is 69 -> state267 err (i:as) is 72 -> state270 err (i:as) is 75 -> state273 err (i:as) is _ -> state97 err (i:as) is state2 :: LexerState state2 err as [] = err as [] where err _ _ = output Whitespace as (start1 []) state2 err as iis@(i:is) = case cclass i of 1 -> state2 err (i:as) is 2 -> state2 err (i:as) is 3 -> state2 err (i:as) is 4 -> state2 err (i:as) is 5 -> state2 err (i:as) is 6 -> state2 err (i:as) is _ -> err as iis where err _ _ = output Whitespace as (start1 iis) state4 :: LexerState state4 err as [] = err as [] where err _ _ = output Varsym as (start1 []) state4 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 13 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 22 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is _ -> err as iis where err _ _ = output Varsym as (start1 iis) start5 :: Lexer start5 is = state5 (\ as is -> gotError as is) "" is state5 :: LexerState state5 err as [] = err as [] state5 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 8 -> state6 err (i:as) is 48 -> state7 err (i:as) is _ -> state5 err (i:as) is state6 :: LexerState state6 err as is = output StringLit as (start1 is) start7 :: Lexer start7 is = state7 (\ as is -> gotError as is) "" is state7 :: LexerState state7 err as [] = err as [] state7 err as iis@(i:is) = case cclass i of 8 -> state5 err (i:as) is 9 -> state5 err (i:as) is 10 -> state5 err (i:as) is 48 -> state5 err (i:as) is 52 -> state5 err (i:as) is 53 -> state5 err (i:as) is 57 -> state5 err (i:as) is 64 -> state5 err (i:as) is 67 -> state5 err (i:as) is 69 -> state5 err (i:as) is 71 -> state5 err (i:as) is 1 -> state8 err (i:as) is 2 -> state8 err (i:as) is 3 -> state8 err (i:as) is 4 -> state8 err (i:as) is 5 -> state8 err (i:as) is 6 -> state8 err (i:as) is 15 -> state10 err (i:as) is 16 -> state10 err (i:as) is 17 -> state10 err (i:as) is 18 -> state10 err (i:as) is 30 -> state27 err (i:as) is 40 -> state27 err (i:as) is 43 -> state27 err (i:as) is 31 -> state23 err (i:as) is 44 -> state23 err (i:as) is 24 -> state12 err (i:as) is 25 -> state14 err (i:as) is 26 -> state16 err (i:as) is 27 -> state18 err (i:as) is 28 -> state21 err (i:as) is 29 -> state26 err (i:as) is 35 -> state28 err (i:as) is 37 -> state29 err (i:as) is 41 -> state30 err (i:as) is 50 -> state34 err (i:as) is 65 -> state35 err (i:as) is 73 -> state38 err (i:as) is _ -> err as iis start8 :: Lexer start8 is = state8 (\ as is -> gotError as is) "" is state8 :: LexerState state8 err as [] = err as [] state8 err as iis@(i:is) = case cclass i of 1 -> state8 err (i:as) is 2 -> state8 err (i:as) is 3 -> state8 err (i:as) is 4 -> state8 err (i:as) is 5 -> state8 err (i:as) is 6 -> state8 err (i:as) is 48 -> state5 err (i:as) is _ -> err as iis start10 :: Lexer start10 is = state10 (\ as is -> gotError as is) "" is state10 :: LexerState state10 err as [] = err as [] state10 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 15 -> state10 err (i:as) is 16 -> state10 err (i:as) is 17 -> state10 err (i:as) is 18 -> state10 err (i:as) is 8 -> state6 err (i:as) is 48 -> state7 err (i:as) is _ -> state5 err (i:as) is start12 :: Lexer start12 is = state12 (\ as is -> gotError as is) "" is state12 :: LexerState state12 err as [] = err as [] state12 err as iis@(i:is) = case cclass i of 26 -> state13 err (i:as) is _ -> err as iis start13 :: Lexer start13 is = state13 (\ as is -> gotError as is) "" is state13 :: LexerState state13 err as [] = err as [] state13 err as iis@(i:is) = case cclass i of 34 -> state5 err (i:as) is _ -> err as iis start14 :: Lexer start14 is = state14 (\ as is -> gotError as is) "" is state14 :: LexerState state14 err as [] = err as [] state14 err as iis@(i:is) = case cclass i of 41 -> state5 err (i:as) is 28 -> state15 err (i:as) is _ -> err as iis start15 :: Lexer start15 is = state15 (\ as is -> gotError as is) "" is state15 :: LexerState state15 err as [] = err as [] state15 err as iis@(i:is) = case cclass i of 35 -> state5 err (i:as) is _ -> err as iis start16 :: Lexer start16 is = state16 (\ as is -> gotError as is) "" is state16 :: LexerState state16 err as [] = err as [] state16 err as iis@(i:is) = case cclass i of 40 -> state5 err (i:as) is 24 -> state17 err (i:as) is _ -> err as iis start17 :: Lexer start17 is = state17 (\ as is -> gotError as is) "" is state17 :: LexerState state17 err as [] = err as [] state17 err as iis@(i:is) = case cclass i of 37 -> state5 err (i:as) is _ -> err as iis start18 :: Lexer start18 is = state18 (\ as is -> gotError as is) "" is state18 :: LexerState state18 err as [] = err as [] state18 err as iis@(i:is) = case cclass i of 28 -> state15 err (i:as) is 26 -> state19 err (i:as) is 35 -> state20 err (i:as) is _ -> err as iis start19 :: Lexer start19 is = state19 (\ as is -> gotError as is) "" is state19 :: LexerState state19 err as [] = err as [] state19 err as iis@(i:is) = case cclass i of 16 -> state5 err (i:as) is _ -> err as iis start20 :: Lexer start20 is = state20 (\ as is -> gotError as is) "" is state20 :: LexerState state20 err as [] = err as [] state20 err as iis@(i:is) = case cclass i of 28 -> state5 err (i:as) is _ -> err as iis start21 :: Lexer start21 is = state21 (\ as is -> gotError as is) "" is state21 :: LexerState state21 err as [] = err as [] state21 err as iis@(i:is) = case cclass i of 36 -> state5 err (i:as) is 37 -> state22 err (i:as) is 38 -> state23 err (i:as) is 41 -> state24 err (i:as) is 42 -> state25 err (i:as) is _ -> err as iis start22 :: Lexer start22 is = state22 (\ as is -> gotError as is) "" is state22 :: LexerState state22 err as [] = err as [] state22 err as iis@(i:is) = case cclass i of 39 -> state5 err (i:as) is _ -> err as iis start23 :: Lexer start23 is = state23 (\ as is -> gotError as is) "" is state23 :: LexerState state23 err as [] = err as [] state23 err as iis@(i:is) = case cclass i of 42 -> state5 err (i:as) is _ -> err as iis start24 :: Lexer start24 is = state24 (\ as is -> gotError as is) "" is state24 :: LexerState state24 err as [] = err as [] state24 err as iis@(i:is) = case cclass i of 26 -> state5 err (i:as) is _ -> err as iis start25 :: Lexer start25 is = state25 (\ as is -> gotError as is) "" is state25 :: LexerState state25 err as [] = err as [] state25 err as iis@(i:is) = case cclass i of 25 -> state5 err (i:as) is 45 -> state5 err (i:as) is _ -> err as iis start26 :: Lexer start26 is = state26 (\ as is -> gotError as is) "" is state26 :: LexerState state26 err as [] = err as [] state26 err as iis@(i:is) = case cclass i of 29 -> state5 err (i:as) is 41 -> state5 err (i:as) is _ -> err as iis start27 :: Lexer start27 is = state27 (\ as is -> gotError as is) "" is state27 :: LexerState state27 err as [] = err as [] state27 err as iis@(i:is) = case cclass i of 41 -> state5 err (i:as) is _ -> err as iis start28 :: Lexer start28 is = state28 (\ as is -> gotError as is) "" is state28 :: LexerState state28 err as [] = err as [] state28 err as iis@(i:is) = case cclass i of 29 -> state5 err (i:as) is _ -> err as iis start29 :: Lexer start29 is = state29 (\ as is -> gotError as is) "" is state29 :: LexerState state29 err as [] = err as [] state29 err as iis@(i:is) = case cclass i of 24 -> state13 err (i:as) is 43 -> state15 err (i:as) is _ -> err as iis start30 :: Lexer start30 is = state30 (\ as is -> gotError as is) "" is state30 :: LexerState state30 err as [] = err as [] state30 err as iis@(i:is) = case cclass i of 32 -> state5 err (i:as) is 38 -> state5 err (i:as) is 46 -> state17 err (i:as) is 42 -> state32 err (i:as) is 43 -> state33 err (i:as) is _ -> err as iis start32 :: Lexer start32 is = state32 (\ as is -> gotError as is) "" is state32 :: LexerState state32 err as [] = err as [] state32 err as iis@(i:is) = case cclass i of 45 -> state5 err (i:as) is _ -> err as iis start33 :: Lexer start33 is = state33 (\ as is -> gotError as is) "" is state33 :: LexerState state33 err as [] = err as [] state33 err as iis@(i:is) = case cclass i of 25 -> state5 err (i:as) is _ -> err as iis start34 :: Lexer start34 is = state34 (\ as is -> gotError as is) "" is state34 :: LexerState state34 err as [] = err as [] state34 err as iis@(i:is) = case cclass i of 23 -> state5 err (i:as) is 24 -> state5 err (i:as) is 25 -> state5 err (i:as) is 26 -> state5 err (i:as) is 27 -> state5 err (i:as) is 28 -> state5 err (i:as) is 29 -> state5 err (i:as) is 30 -> state5 err (i:as) is 31 -> state5 err (i:as) is 32 -> state5 err (i:as) is 33 -> state5 err (i:as) is 34 -> state5 err (i:as) is 35 -> state5 err (i:as) is 36 -> state5 err (i:as) is 37 -> state5 err (i:as) is 38 -> state5 err (i:as) is 39 -> state5 err (i:as) is 40 -> state5 err (i:as) is 41 -> state5 err (i:as) is 42 -> state5 err (i:as) is 43 -> state5 err (i:as) is 44 -> state5 err (i:as) is 45 -> state5 err (i:as) is 46 -> state5 err (i:as) is 47 -> state5 err (i:as) is 48 -> state5 err (i:as) is 49 -> state5 err (i:as) is 50 -> state5 err (i:as) is 51 -> state5 err (i:as) is _ -> err as iis start35 :: Lexer start35 is = state35 (\ as is -> gotError as is) "" is state35 :: LexerState state35 err as [] = err as [] state35 err as iis@(i:is) = case cclass i of 15 -> state36 err (i:as) is 16 -> state36 err (i:as) is 17 -> state36 err (i:as) is _ -> err as iis start36 :: Lexer start36 is = state36 (\ as is -> gotError as is) "" is state36 :: LexerState state36 err as [] = err as [] state36 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 15 -> state36 err (i:as) is 16 -> state36 err (i:as) is 17 -> state36 err (i:as) is 8 -> state6 err (i:as) is 48 -> state7 err (i:as) is _ -> state5 err (i:as) is start38 :: Lexer start38 is = state38 (\ as is -> gotError as is) "" is state38 :: LexerState state38 err as [] = err as [] state38 err as iis@(i:is) = case cclass i of 15 -> state39 err (i:as) is 16 -> state39 err (i:as) is 17 -> state39 err (i:as) is 18 -> state39 err (i:as) is 24 -> state39 err (i:as) is 25 -> state39 err (i:as) is 26 -> state39 err (i:as) is 27 -> state39 err (i:as) is 28 -> state39 err (i:as) is 29 -> state39 err (i:as) is 52 -> state39 err (i:as) is 53 -> state39 err (i:as) is 54 -> state39 err (i:as) is 55 -> state39 err (i:as) is 56 -> state39 err (i:as) is 57 -> state39 err (i:as) is _ -> err as iis start39 :: Lexer start39 is = state39 (\ as is -> gotError as is) "" is state39 :: LexerState state39 err as [] = err as [] state39 err as iis@(i:is) = case cclass i of 15 -> state39 err (i:as) is 16 -> state39 err (i:as) is 17 -> state39 err (i:as) is 18 -> state39 err (i:as) is 24 -> state39 err (i:as) is 25 -> state39 err (i:as) is 26 -> state39 err (i:as) is 27 -> state39 err (i:as) is 28 -> state39 err (i:as) is 29 -> state39 err (i:as) is 52 -> state39 err (i:as) is 53 -> state39 err (i:as) is 54 -> state39 err (i:as) is 55 -> state39 err (i:as) is 56 -> state39 err (i:as) is 57 -> state39 err (i:as) is 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 8 -> state6 err (i:as) is 48 -> state7 err (i:as) is _ -> state5 err (i:as) is start41 :: Lexer start41 is = state41 (\ as is -> gotError as is) "" is state41 :: LexerState state41 err as [] = err as [] state41 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 10 -> err as iis 48 -> state44 err (i:as) is _ -> state42 err (i:as) is start42 :: Lexer start42 is = state42 (\ as is -> gotError as is) "" is state42 :: LexerState state42 err as [] = err as [] state42 err as iis@(i:is) = case cclass i of 10 -> state43 err (i:as) is _ -> err as iis state43 :: LexerState state43 err as is = output CharLit as (start1 is) start44 :: Lexer start44 is = state44 (\ as is -> gotError as is) "" is state44 :: LexerState state44 err as [] = err as [] state44 err as iis@(i:is) = case cclass i of 8 -> state42 err (i:as) is 9 -> state42 err (i:as) is 10 -> state42 err (i:as) is 48 -> state42 err (i:as) is 52 -> state42 err (i:as) is 53 -> state42 err (i:as) is 57 -> state42 err (i:as) is 64 -> state42 err (i:as) is 67 -> state42 err (i:as) is 69 -> state42 err (i:as) is 71 -> state42 err (i:as) is 15 -> state45 err (i:as) is 16 -> state45 err (i:as) is 17 -> state45 err (i:as) is 18 -> state45 err (i:as) is 30 -> state61 err (i:as) is 40 -> state61 err (i:as) is 43 -> state61 err (i:as) is 31 -> state57 err (i:as) is 44 -> state57 err (i:as) is 24 -> state46 err (i:as) is 25 -> state48 err (i:as) is 26 -> state50 err (i:as) is 27 -> state52 err (i:as) is 28 -> state55 err (i:as) is 29 -> state60 err (i:as) is 35 -> state62 err (i:as) is 37 -> state63 err (i:as) is 41 -> state64 err (i:as) is 50 -> state68 err (i:as) is 65 -> state69 err (i:as) is 73 -> state71 err (i:as) is _ -> err as iis start45 :: Lexer start45 is = state45 (\ as is -> gotError as is) "" is state45 :: LexerState state45 err as [] = err as [] state45 err as iis@(i:is) = case cclass i of 15 -> state45 err (i:as) is 16 -> state45 err (i:as) is 17 -> state45 err (i:as) is 18 -> state45 err (i:as) is 10 -> state43 err (i:as) is _ -> err as iis start46 :: Lexer start46 is = state46 (\ as is -> gotError as is) "" is state46 :: LexerState state46 err as [] = err as [] state46 err as iis@(i:is) = case cclass i of 26 -> state47 err (i:as) is _ -> err as iis start47 :: Lexer start47 is = state47 (\ as is -> gotError as is) "" is state47 :: LexerState state47 err as [] = err as [] state47 err as iis@(i:is) = case cclass i of 34 -> state42 err (i:as) is _ -> err as iis start48 :: Lexer start48 is = state48 (\ as is -> gotError as is) "" is state48 :: LexerState state48 err as [] = err as [] state48 err as iis@(i:is) = case cclass i of 41 -> state42 err (i:as) is 28 -> state49 err (i:as) is _ -> err as iis start49 :: Lexer start49 is = state49 (\ as is -> gotError as is) "" is state49 :: LexerState state49 err as [] = err as [] state49 err as iis@(i:is) = case cclass i of 35 -> state42 err (i:as) is _ -> err as iis start50 :: Lexer start50 is = state50 (\ as is -> gotError as is) "" is state50 :: LexerState state50 err as [] = err as [] state50 err as iis@(i:is) = case cclass i of 40 -> state42 err (i:as) is 24 -> state51 err (i:as) is _ -> err as iis start51 :: Lexer start51 is = state51 (\ as is -> gotError as is) "" is state51 :: LexerState state51 err as [] = err as [] state51 err as iis@(i:is) = case cclass i of 37 -> state42 err (i:as) is _ -> err as iis start52 :: Lexer start52 is = state52 (\ as is -> gotError as is) "" is state52 :: LexerState state52 err as [] = err as [] state52 err as iis@(i:is) = case cclass i of 28 -> state49 err (i:as) is 26 -> state53 err (i:as) is 35 -> state54 err (i:as) is _ -> err as iis start53 :: Lexer start53 is = state53 (\ as is -> gotError as is) "" is state53 :: LexerState state53 err as [] = err as [] state53 err as iis@(i:is) = case cclass i of 16 -> state42 err (i:as) is _ -> err as iis start54 :: Lexer start54 is = state54 (\ as is -> gotError as is) "" is state54 :: LexerState state54 err as [] = err as [] state54 err as iis@(i:is) = case cclass i of 28 -> state42 err (i:as) is _ -> err as iis start55 :: Lexer start55 is = state55 (\ as is -> gotError as is) "" is state55 :: LexerState state55 err as [] = err as [] state55 err as iis@(i:is) = case cclass i of 36 -> state42 err (i:as) is 37 -> state56 err (i:as) is 38 -> state57 err (i:as) is 41 -> state58 err (i:as) is 42 -> state59 err (i:as) is _ -> err as iis start56 :: Lexer start56 is = state56 (\ as is -> gotError as is) "" is state56 :: LexerState state56 err as [] = err as [] state56 err as iis@(i:is) = case cclass i of 39 -> state42 err (i:as) is _ -> err as iis start57 :: Lexer start57 is = state57 (\ as is -> gotError as is) "" is state57 :: LexerState state57 err as [] = err as [] state57 err as iis@(i:is) = case cclass i of 42 -> state42 err (i:as) is _ -> err as iis start58 :: Lexer start58 is = state58 (\ as is -> gotError as is) "" is state58 :: LexerState state58 err as [] = err as [] state58 err as iis@(i:is) = case cclass i of 26 -> state42 err (i:as) is _ -> err as iis start59 :: Lexer start59 is = state59 (\ as is -> gotError as is) "" is state59 :: LexerState state59 err as [] = err as [] state59 err as iis@(i:is) = case cclass i of 25 -> state42 err (i:as) is 45 -> state42 err (i:as) is _ -> err as iis start60 :: Lexer start60 is = state60 (\ as is -> gotError as is) "" is state60 :: LexerState state60 err as [] = err as [] state60 err as iis@(i:is) = case cclass i of 29 -> state42 err (i:as) is 41 -> state42 err (i:as) is _ -> err as iis start61 :: Lexer start61 is = state61 (\ as is -> gotError as is) "" is state61 :: LexerState state61 err as [] = err as [] state61 err as iis@(i:is) = case cclass i of 41 -> state42 err (i:as) is _ -> err as iis start62 :: Lexer start62 is = state62 (\ as is -> gotError as is) "" is state62 :: LexerState state62 err as [] = err as [] state62 err as iis@(i:is) = case cclass i of 29 -> state42 err (i:as) is _ -> err as iis start63 :: Lexer start63 is = state63 (\ as is -> gotError as is) "" is state63 :: LexerState state63 err as [] = err as [] state63 err as iis@(i:is) = case cclass i of 24 -> state47 err (i:as) is 43 -> state49 err (i:as) is _ -> err as iis start64 :: Lexer start64 is = state64 (\ as is -> gotError as is) "" is state64 :: LexerState state64 err as [] = err as [] state64 err as iis@(i:is) = case cclass i of 32 -> state42 err (i:as) is 46 -> state51 err (i:as) is 38 -> state65 err (i:as) is 42 -> state66 err (i:as) is 43 -> state67 err (i:as) is _ -> err as iis start65 :: Lexer start65 is = state65 (\ as is -> gotError as is) "" is state65 :: LexerState state65 err as [] = err as [] state65 err as iis@(i:is) = case cclass i of 31 -> state42 err (i:as) is 10 -> state43 err (i:as) is _ -> err as iis start66 :: Lexer start66 is = state66 (\ as is -> gotError as is) "" is state66 :: LexerState state66 err as [] = err as [] state66 err as iis@(i:is) = case cclass i of 45 -> state42 err (i:as) is _ -> err as iis start67 :: Lexer start67 is = state67 (\ as is -> gotError as is) "" is state67 :: LexerState state67 err as [] = err as [] state67 err as iis@(i:is) = case cclass i of 25 -> state42 err (i:as) is _ -> err as iis start68 :: Lexer start68 is = state68 (\ as is -> gotError as is) "" is state68 :: LexerState state68 err as [] = err as [] state68 err as iis@(i:is) = case cclass i of 23 -> state42 err (i:as) is 24 -> state42 err (i:as) is 25 -> state42 err (i:as) is 26 -> state42 err (i:as) is 27 -> state42 err (i:as) is 28 -> state42 err (i:as) is 29 -> state42 err (i:as) is 30 -> state42 err (i:as) is 31 -> state42 err (i:as) is 32 -> state42 err (i:as) is 33 -> state42 err (i:as) is 34 -> state42 err (i:as) is 35 -> state42 err (i:as) is 36 -> state42 err (i:as) is 37 -> state42 err (i:as) is 38 -> state42 err (i:as) is 39 -> state42 err (i:as) is 40 -> state42 err (i:as) is 41 -> state42 err (i:as) is 42 -> state42 err (i:as) is 43 -> state42 err (i:as) is 44 -> state42 err (i:as) is 45 -> state42 err (i:as) is 46 -> state42 err (i:as) is 47 -> state42 err (i:as) is 48 -> state42 err (i:as) is 49 -> state42 err (i:as) is 50 -> state42 err (i:as) is 51 -> state42 err (i:as) is _ -> err as iis start69 :: Lexer start69 is = state69 (\ as is -> gotError as is) "" is state69 :: LexerState state69 err as [] = err as [] state69 err as iis@(i:is) = case cclass i of 15 -> state70 err (i:as) is 16 -> state70 err (i:as) is 17 -> state70 err (i:as) is _ -> err as iis start70 :: Lexer start70 is = state70 (\ as is -> gotError as is) "" is state70 :: LexerState state70 err as [] = err as [] state70 err as iis@(i:is) = case cclass i of 15 -> state70 err (i:as) is 16 -> state70 err (i:as) is 17 -> state70 err (i:as) is 10 -> state43 err (i:as) is _ -> err as iis start71 :: Lexer start71 is = state71 (\ as is -> gotError as is) "" is state71 :: LexerState state71 err as [] = err as [] state71 err as iis@(i:is) = case cclass i of 15 -> state72 err (i:as) is 16 -> state72 err (i:as) is 17 -> state72 err (i:as) is 18 -> state72 err (i:as) is 24 -> state72 err (i:as) is 25 -> state72 err (i:as) is 26 -> state72 err (i:as) is 27 -> state72 err (i:as) is 28 -> state72 err (i:as) is 29 -> state72 err (i:as) is 52 -> state72 err (i:as) is 53 -> state72 err (i:as) is 54 -> state72 err (i:as) is 55 -> state72 err (i:as) is 56 -> state72 err (i:as) is 57 -> state72 err (i:as) is _ -> err as iis start72 :: Lexer start72 is = state72 (\ as is -> gotError as is) "" is state72 :: LexerState state72 err as [] = err as [] state72 err as iis@(i:is) = case cclass i of 15 -> state72 err (i:as) is 16 -> state72 err (i:as) is 17 -> state72 err (i:as) is 18 -> state72 err (i:as) is 24 -> state72 err (i:as) is 25 -> state72 err (i:as) is 26 -> state72 err (i:as) is 27 -> state72 err (i:as) is 28 -> state72 err (i:as) is 29 -> state72 err (i:as) is 52 -> state72 err (i:as) is 53 -> state72 err (i:as) is 54 -> state72 err (i:as) is 55 -> state72 err (i:as) is 56 -> state72 err (i:as) is 57 -> state72 err (i:as) is 10 -> state43 err (i:as) is _ -> err as iis state73 :: LexerState state73 err as is = output Special as (start1 is) state74 :: LexerState state74 err as [] = err as [] where err _ _ = output Varsym as (start1 []) state74 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is 13 -> state75 err (i:as) is 22 -> state79 err (i:as) is _ -> err as iis where err _ _ = output Varsym as (start1 iis) state75 :: LexerState state75 err as [] = err as [] where err _ _ = output Commentstart as (start76 []) state75 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 22 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is 13 -> state75 err (i:as) is _ -> err as iis where err _ _ = output Commentstart as (start76 iis) start76 :: Lexer start76 is = state76 (\ as is -> gotError as is) "" is state76 :: LexerState state76 err as [] = err as [] state76 err as iis@(i:is) = case cclass i of 0 -> err as iis 3 -> err as iis 2 -> state77 err (i:as) is 4 -> state77 err (i:as) is 5 -> state78 err (i:as) is _ -> state76 err (i:as) is state77 :: LexerState state77 err as is = output Comment as (start1 is) state78 :: LexerState state78 err as [] = err as [] where err _ _ = output Comment as (start1 []) state78 err as iis@(i:is) = case cclass i of 2 -> state77 err (i:as) is _ -> err as iis where err _ _ = output Comment as (start1 iis) state79 :: LexerState state79 err as [] = err as [] where err _ _ = output Reservedop as (start1 []) state79 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 13 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 22 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is _ -> err as iis where err _ _ = output Reservedop as (start1 iis) state80 :: LexerState state80 err as [] = err as [] where err _ _ = output Varsym as (start1 []) state80 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 13 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 22 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is 14 -> state79 err (i:as) is _ -> err as iis where err _ _ = output Varsym as (start1 iis) state81 :: LexerState state81 err as [] = err as [] where err _ _ = output IntLit as (start1 []) state81 err as iis@(i:is) = case cclass i of 15 -> state87 err (i:as) is 16 -> state87 err (i:as) is 17 -> state87 err (i:as) is 18 -> state87 err (i:as) is 38 -> state88 err (i:as) is 65 -> state88 err (i:as) is 45 -> state90 err (i:as) is 73 -> state90 err (i:as) is 14 -> state82 err (i:as) is _ -> err as iis where err _ _ = output IntLit as (start1 iis) start82 :: Lexer start82 is = state82 (\ as is -> gotError as is) "" is state82 :: LexerState state82 err as [] = err as [] state82 err as iis@(i:is) = case cclass i of 15 -> state83 err (i:as) is 16 -> state83 err (i:as) is 17 -> state83 err (i:as) is 18 -> state83 err (i:as) is _ -> err as iis state83 :: LexerState state83 err as [] = err as [] where err _ _ = output FloatLit as (start1 []) state83 err as iis@(i:is) = case cclass i of 15 -> state83 err (i:as) is 16 -> state83 err (i:as) is 17 -> state83 err (i:as) is 18 -> state83 err (i:as) is 28 -> state84 err (i:as) is 56 -> state84 err (i:as) is _ -> err as iis where err _ _ = output FloatLit as (start1 iis) start84 :: Lexer start84 is = state84 (\ as is -> gotError as is) "" is state84 :: LexerState state84 err as [] = err as [] state84 err as iis@(i:is) = case cclass i of 15 -> state86 err (i:as) is 16 -> state86 err (i:as) is 17 -> state86 err (i:as) is 18 -> state86 err (i:as) is 12 -> state85 err (i:as) is 13 -> state85 err (i:as) is _ -> err as iis start85 :: Lexer start85 is = state85 (\ as is -> gotError as is) "" is state85 :: LexerState state85 err as [] = err as [] state85 err as iis@(i:is) = case cclass i of 15 -> state86 err (i:as) is 16 -> state86 err (i:as) is 17 -> state86 err (i:as) is 18 -> state86 err (i:as) is _ -> err as iis state86 :: LexerState state86 err as [] = err as [] where err _ _ = output FloatLit as (start1 []) state86 err as iis@(i:is) = case cclass i of 15 -> state86 err (i:as) is 16 -> state86 err (i:as) is 17 -> state86 err (i:as) is 18 -> state86 err (i:as) is _ -> err as iis where err _ _ = output FloatLit as (start1 iis) state87 :: LexerState state87 err as [] = err as [] where err _ _ = output IntLit as (start1 []) state87 err as iis@(i:is) = case cclass i of 15 -> state87 err (i:as) is 16 -> state87 err (i:as) is 17 -> state87 err (i:as) is 18 -> state87 err (i:as) is 14 -> state82 err (i:as) is _ -> err as iis where err _ _ = output IntLit as (start1 iis) start88 :: Lexer start88 is = state88 (\ as is -> gotError as is) "" is state88 :: LexerState state88 err as [] = err as [] state88 err as iis@(i:is) = case cclass i of 15 -> state89 err (i:as) is 16 -> state89 err (i:as) is 17 -> state89 err (i:as) is _ -> err as iis state89 :: LexerState state89 err as [] = err as [] where err _ _ = output IntLit as (start1 []) state89 err as iis@(i:is) = case cclass i of 15 -> state89 err (i:as) is 16 -> state89 err (i:as) is 17 -> state89 err (i:as) is _ -> err as iis where err _ _ = output IntLit as (start1 iis) start90 :: Lexer start90 is = state90 (\ as is -> gotError as is) "" is state90 :: LexerState state90 err as [] = err as [] state90 err as iis@(i:is) = case cclass i of 15 -> state91 err (i:as) is 16 -> state91 err (i:as) is 17 -> state91 err (i:as) is 18 -> state91 err (i:as) is 24 -> state91 err (i:as) is 25 -> state91 err (i:as) is 26 -> state91 err (i:as) is 27 -> state91 err (i:as) is 28 -> state91 err (i:as) is 29 -> state91 err (i:as) is 52 -> state91 err (i:as) is 53 -> state91 err (i:as) is 54 -> state91 err (i:as) is 55 -> state91 err (i:as) is 56 -> state91 err (i:as) is 57 -> state91 err (i:as) is _ -> err as iis state91 :: LexerState state91 err as [] = err as [] where err _ _ = output IntLit as (start1 []) state91 err as iis@(i:is) = case cclass i of 15 -> state91 err (i:as) is 16 -> state91 err (i:as) is 17 -> state91 err (i:as) is 18 -> state91 err (i:as) is 24 -> state91 err (i:as) is 25 -> state91 err (i:as) is 26 -> state91 err (i:as) is 27 -> state91 err (i:as) is 28 -> state91 err (i:as) is 29 -> state91 err (i:as) is 52 -> state91 err (i:as) is 53 -> state91 err (i:as) is 54 -> state91 err (i:as) is 55 -> state91 err (i:as) is 56 -> state91 err (i:as) is 57 -> state91 err (i:as) is _ -> err as iis where err _ _ = output IntLit as (start1 iis) state92 :: LexerState state92 err as [] = err as [] where err _ _ = output Reservedop as (start1 []) state92 err as iis@(i:is) = case cclass i of 7 -> state93 err (i:as) is 9 -> state93 err (i:as) is 12 -> state93 err (i:as) is 13 -> state93 err (i:as) is 14 -> state93 err (i:as) is 20 -> state93 err (i:as) is 21 -> state93 err (i:as) is 22 -> state93 err (i:as) is 23 -> state93 err (i:as) is 48 -> state93 err (i:as) is 50 -> state93 err (i:as) is 76 -> state93 err (i:as) is 77 -> state93 err (i:as) is 19 -> state94 err (i:as) is _ -> err as iis where err _ _ = output Reservedop as (start1 iis) state93 :: LexerState state93 err as [] = err as [] where err _ _ = output Consym as (start1 []) state93 err as iis@(i:is) = case cclass i of 7 -> state93 err (i:as) is 9 -> state93 err (i:as) is 12 -> state93 err (i:as) is 13 -> state93 err (i:as) is 14 -> state93 err (i:as) is 19 -> state93 err (i:as) is 20 -> state93 err (i:as) is 21 -> state93 err (i:as) is 22 -> state93 err (i:as) is 23 -> state93 err (i:as) is 48 -> state93 err (i:as) is 50 -> state93 err (i:as) is 76 -> state93 err (i:as) is 77 -> state93 err (i:as) is _ -> err as iis where err _ _ = output Consym as (start1 iis) state94 :: LexerState state94 err as [] = err as [] where err _ _ = output Reservedop as (start1 []) state94 err as iis@(i:is) = case cclass i of 7 -> state93 err (i:as) is 9 -> state93 err (i:as) is 12 -> state93 err (i:as) is 13 -> state93 err (i:as) is 14 -> state93 err (i:as) is 19 -> state93 err (i:as) is 20 -> state93 err (i:as) is 21 -> state93 err (i:as) is 22 -> state93 err (i:as) is 23 -> state93 err (i:as) is 48 -> state93 err (i:as) is 50 -> state93 err (i:as) is 76 -> state93 err (i:as) is 77 -> state93 err (i:as) is _ -> err as iis where err _ _ = output Reservedop as (start1 iis) state95 :: LexerState state95 err as [] = err as [] where err _ _ = output Varsym as (start1 []) state95 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 22 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is 13 -> state79 err (i:as) is _ -> err as iis where err _ _ = output Varsym as (start1 iis) state96 :: LexerState state96 err as [] = err as [] where err _ _ = output Reservedop as (start1 []) state96 err as iis@(i:is) = case cclass i of 7 -> state4 err (i:as) is 9 -> state4 err (i:as) is 12 -> state4 err (i:as) is 13 -> state4 err (i:as) is 14 -> state4 err (i:as) is 19 -> state4 err (i:as) is 20 -> state4 err (i:as) is 21 -> state4 err (i:as) is 23 -> state4 err (i:as) is 48 -> state4 err (i:as) is 50 -> state4 err (i:as) is 76 -> state4 err (i:as) is 77 -> state4 err (i:as) is 22 -> state79 err (i:as) is _ -> err as iis where err _ _ = output Reservedop as (start1 iis) state97 :: LexerState state97 err as [] = err as [] where err _ _ = output Conid as (start1 []) state97 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 14 -> state98 err (i:as) is _ -> state97 err (i:as) is where err _ _ = output Conid as (start1 iis) start98 :: Lexer start98 is = state98 (\ as is -> gotError as is) "" is state98 :: LexerState state98 err as [] = err as [] state98 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 8 -> err as iis 10 -> err as iis 11 -> err as iis 15 -> err as iis 16 -> err as iis 17 -> err as iis 18 -> err as iis 47 -> err as iis 49 -> err as iis 75 -> err as iis 52 -> state111 err (i:as) is 53 -> state111 err (i:as) is 57 -> state111 err (i:as) is 58 -> state111 err (i:as) is 59 -> state111 err (i:as) is 61 -> state111 err (i:as) is 66 -> state111 err (i:as) is 67 -> state111 err (i:as) is 68 -> state111 err (i:as) is 70 -> state111 err (i:as) is 71 -> state111 err (i:as) is 73 -> state111 err (i:as) is 74 -> state111 err (i:as) is 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 22 -> state99 err (i:as) is 50 -> state99 err (i:as) is 23 -> state102 err (i:as) is 48 -> state102 err (i:as) is 76 -> state102 err (i:as) is 77 -> state102 err (i:as) is 13 -> state100 err (i:as) is 14 -> state103 err (i:as) is 19 -> state104 err (i:as) is 20 -> state107 err (i:as) is 21 -> state108 err (i:as) is 51 -> state110 err (i:as) is 54 -> state112 err (i:as) is 55 -> state118 err (i:as) is 56 -> state131 err (i:as) is 60 -> state132 err (i:as) is 62 -> state144 err (i:as) is 63 -> state145 err (i:as) is 64 -> state149 err (i:as) is 65 -> state154 err (i:as) is 69 -> state155 err (i:as) is 72 -> state158 err (i:as) is _ -> state109 err (i:as) is state99 :: LexerState state99 err as [] = err as [] where err _ _ = output Qvarsym as (start1 []) state99 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 13 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 22 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is _ -> err as iis where err _ _ = output Qvarsym as (start1 iis) state100 :: LexerState state100 err as [] = err as [] where err _ _ = output Qvarsym as (start1 []) state100 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is 13 -> state101 err (i:as) is 22 -> state102 err (i:as) is _ -> err as iis where err _ _ = output Qvarsym as (start1 iis) start101 :: Lexer start101 is = state101 (\ as is -> gotError as is) "" is state101 :: LexerState state101 err as [] = err as [] state101 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 22 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is 13 -> state101 err (i:as) is _ -> err as iis start102 :: Lexer start102 is = state102 (\ as is -> gotError as is) "" is state102 :: LexerState state102 err as [] = err as [] state102 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 13 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 22 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is _ -> err as iis state103 :: LexerState state103 err as [] = err as [] where err _ _ = output Qvarsym as (start1 []) state103 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 13 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 22 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is 14 -> state102 err (i:as) is _ -> err as iis where err _ _ = output Qvarsym as (start1 iis) start104 :: Lexer start104 is = state104 (\ as is -> gotError as is) "" is state104 :: LexerState state104 err as [] = err as [] state104 err as iis@(i:is) = case cclass i of 7 -> state105 err (i:as) is 9 -> state105 err (i:as) is 12 -> state105 err (i:as) is 13 -> state105 err (i:as) is 14 -> state105 err (i:as) is 20 -> state105 err (i:as) is 21 -> state105 err (i:as) is 22 -> state105 err (i:as) is 23 -> state105 err (i:as) is 48 -> state105 err (i:as) is 50 -> state105 err (i:as) is 76 -> state105 err (i:as) is 77 -> state105 err (i:as) is 19 -> state106 err (i:as) is _ -> err as iis state105 :: LexerState state105 err as [] = err as [] where err _ _ = output Qconsym as (start1 []) state105 err as iis@(i:is) = case cclass i of 7 -> state105 err (i:as) is 9 -> state105 err (i:as) is 12 -> state105 err (i:as) is 13 -> state105 err (i:as) is 14 -> state105 err (i:as) is 19 -> state105 err (i:as) is 20 -> state105 err (i:as) is 21 -> state105 err (i:as) is 22 -> state105 err (i:as) is 23 -> state105 err (i:as) is 48 -> state105 err (i:as) is 50 -> state105 err (i:as) is 76 -> state105 err (i:as) is 77 -> state105 err (i:as) is _ -> err as iis where err _ _ = output Qconsym as (start1 iis) start106 :: Lexer start106 is = state106 (\ as is -> gotError as is) "" is state106 :: LexerState state106 err as [] = err as [] state106 err as iis@(i:is) = case cclass i of 7 -> state105 err (i:as) is 9 -> state105 err (i:as) is 12 -> state105 err (i:as) is 13 -> state105 err (i:as) is 14 -> state105 err (i:as) is 19 -> state105 err (i:as) is 20 -> state105 err (i:as) is 21 -> state105 err (i:as) is 22 -> state105 err (i:as) is 23 -> state105 err (i:as) is 48 -> state105 err (i:as) is 50 -> state105 err (i:as) is 76 -> state105 err (i:as) is 77 -> state105 err (i:as) is _ -> err as iis state107 :: LexerState state107 err as [] = err as [] where err _ _ = output Qvarsym as (start1 []) state107 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 22 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is 13 -> state102 err (i:as) is _ -> err as iis where err _ _ = output Qvarsym as (start1 iis) start108 :: Lexer start108 is = state108 (\ as is -> gotError as is) "" is state108 :: LexerState state108 err as [] = err as [] state108 err as iis@(i:is) = case cclass i of 7 -> state99 err (i:as) is 9 -> state99 err (i:as) is 12 -> state99 err (i:as) is 13 -> state99 err (i:as) is 14 -> state99 err (i:as) is 19 -> state99 err (i:as) is 20 -> state99 err (i:as) is 21 -> state99 err (i:as) is 23 -> state99 err (i:as) is 48 -> state99 err (i:as) is 50 -> state99 err (i:as) is 76 -> state99 err (i:as) is 77 -> state99 err (i:as) is 22 -> state102 err (i:as) is _ -> err as iis state109 :: LexerState state109 err as [] = err as [] where err _ _ = output Qconid as (start1 []) state109 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 14 -> state98 err (i:as) is _ -> state109 err (i:as) is where err _ _ = output Qconid as (start1 iis) start110 :: Lexer start110 is = state110 (\ as is -> gotError as is) "" is state110 :: LexerState state110 err as [] = err as [] state110 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis _ -> state111 err (i:as) is state111 :: LexerState state111 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state111 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state112 :: LexerState state112 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state112 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state113 err (i:as) is 62 -> state115 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state113 :: LexerState state113 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state113 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state114 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state114 :: LexerState state114 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state114 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state115 :: LexerState state115 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state115 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state116 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state116 :: LexerState state116 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state116 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state117 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state117 :: LexerState state117 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state117 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state118 :: LexerState state118 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state118 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state110 err (i:as) is 52 -> state119 err (i:as) is 56 -> state121 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state119 :: LexerState state119 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state119 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state120 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state120 :: LexerState state120 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state120 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state121 :: LexerState state121 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state121 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state122 err (i:as) is 67 -> state126 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state122 :: LexerState state122 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state122 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state123 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state123 :: LexerState state123 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state123 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 70 -> state124 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state124 :: LexerState state124 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state124 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state125 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state125 :: LexerState state125 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state125 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state126 :: LexerState state126 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state126 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state127 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state127 :: LexerState state127 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state127 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 71 -> state128 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state128 :: LexerState state128 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state128 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state129 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state129 :: LexerState state129 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state129 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state130 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state130 :: LexerState state130 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state130 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 58 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state131 :: LexerState state131 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state131 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state113 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state132 :: LexerState state132 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state132 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state110 err (i:as) is 63 -> state133 err (i:as) is 64 -> state136 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state133 :: LexerState state133 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state133 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 66 -> state134 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state134 :: LexerState state134 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state134 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state135 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state135 :: LexerState state135 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state135 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 67 -> state125 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) start136 :: Lexer start136 is = state136 (\ as is -> gotError as is) "" is state136 :: LexerState state136 err as [] = err as [] state136 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state137 err (i:as) is 68 -> state140 err (i:as) is _ -> state111 err (i:as) is state137 :: LexerState state137 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state137 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state138 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state138 :: LexerState state138 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state138 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 73 -> state139 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) start139 :: Lexer start139 is = state139 (\ as is -> gotError as is) "" is state139 :: LexerState state139 err as [] = err as [] state139 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state110 err (i:as) is 67 -> state110 err (i:as) is _ -> state111 err (i:as) is state140 :: LexerState state140 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state140 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state141 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state141 :: LexerState state141 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state141 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state142 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state142 :: LexerState state142 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state142 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state143 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state143 :: LexerState state143 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state143 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 54 -> state114 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state144 :: LexerState state144 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state144 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state125 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state145 :: LexerState state145 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state145 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state146 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state146 :: LexerState state146 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state146 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 55 -> state147 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state147 :: LexerState state147 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state147 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 70 -> state148 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state148 :: LexerState state148 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state148 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state114 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state149 :: LexerState state149 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state149 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state150 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state150 :: LexerState state150 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state150 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 72 -> state151 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state151 :: LexerState state151 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state151 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state152 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state152 :: LexerState state152 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state152 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 74 -> state153 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state153 :: LexerState state153 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state153 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 66 -> state114 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state154 :: LexerState state154 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state154 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state155 :: LexerState state155 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state155 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 74 -> state153 err (i:as) is 59 -> state156 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state156 :: LexerState state156 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state156 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state157 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state157 :: LexerState state157 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state157 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state110 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state158 :: LexerState state158 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state158 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 59 -> state159 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state159 :: LexerState state159 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state159 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state160 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state160 :: LexerState state160 err as [] = err as [] where err _ _ = output Qvarid as (start1 []) state160 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 67 -> state114 err (i:as) is _ -> state111 err (i:as) is where err _ _ = output Qvarid as (start1 iis) state161 :: LexerState state161 err as [] = err as [] where err _ _ = output Special as (start1 []) state161 err as iis@(i:is) = case cclass i of 24 -> state162 err (i:as) is 25 -> state162 err (i:as) is 26 -> state162 err (i:as) is 27 -> state162 err (i:as) is 28 -> state162 err (i:as) is 29 -> state162 err (i:as) is 30 -> state162 err (i:as) is 31 -> state162 err (i:as) is 32 -> state162 err (i:as) is 33 -> state162 err (i:as) is 34 -> state162 err (i:as) is 35 -> state162 err (i:as) is 36 -> state162 err (i:as) is 37 -> state162 err (i:as) is 38 -> state162 err (i:as) is 39 -> state162 err (i:as) is 40 -> state162 err (i:as) is 41 -> state162 err (i:as) is 42 -> state162 err (i:as) is 43 -> state162 err (i:as) is 44 -> state162 err (i:as) is 45 -> state162 err (i:as) is 46 -> state162 err (i:as) is 78 -> state162 err (i:as) is 52 -> state165 err (i:as) is 53 -> state165 err (i:as) is 57 -> state165 err (i:as) is 58 -> state165 err (i:as) is 59 -> state165 err (i:as) is 61 -> state165 err (i:as) is 66 -> state165 err (i:as) is 67 -> state165 err (i:as) is 68 -> state165 err (i:as) is 70 -> state165 err (i:as) is 71 -> state165 err (i:as) is 73 -> state165 err (i:as) is 74 -> state165 err (i:as) is 51 -> state164 err (i:as) is 54 -> state173 err (i:as) is 55 -> state179 err (i:as) is 56 -> state192 err (i:as) is 60 -> state193 err (i:as) is 62 -> state205 err (i:as) is 63 -> state206 err (i:as) is 64 -> state210 err (i:as) is 65 -> state215 err (i:as) is 69 -> state216 err (i:as) is 72 -> state219 err (i:as) is _ -> err as iis where err _ _ = output Special as (start1 iis) start162 :: Lexer start162 is = state162 (\ as is -> gotError as is) "" is state162 :: LexerState state162 err as [] = err as [] state162 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 14 -> state163 err (i:as) is _ -> state162 err (i:as) is start163 :: Lexer start163 is = state163 (\ as is -> gotError as is) "" is state163 :: LexerState state163 err as [] = err as [] state163 err as iis@(i:is) = case cclass i of 24 -> state162 err (i:as) is 25 -> state162 err (i:as) is 26 -> state162 err (i:as) is 27 -> state162 err (i:as) is 28 -> state162 err (i:as) is 29 -> state162 err (i:as) is 30 -> state162 err (i:as) is 31 -> state162 err (i:as) is 32 -> state162 err (i:as) is 33 -> state162 err (i:as) is 34 -> state162 err (i:as) is 35 -> state162 err (i:as) is 36 -> state162 err (i:as) is 37 -> state162 err (i:as) is 38 -> state162 err (i:as) is 39 -> state162 err (i:as) is 40 -> state162 err (i:as) is 41 -> state162 err (i:as) is 42 -> state162 err (i:as) is 43 -> state162 err (i:as) is 44 -> state162 err (i:as) is 45 -> state162 err (i:as) is 46 -> state162 err (i:as) is 78 -> state162 err (i:as) is 52 -> state165 err (i:as) is 53 -> state165 err (i:as) is 57 -> state165 err (i:as) is 58 -> state165 err (i:as) is 59 -> state165 err (i:as) is 61 -> state165 err (i:as) is 66 -> state165 err (i:as) is 67 -> state165 err (i:as) is 68 -> state165 err (i:as) is 70 -> state165 err (i:as) is 71 -> state165 err (i:as) is 73 -> state165 err (i:as) is 74 -> state165 err (i:as) is 51 -> state164 err (i:as) is 54 -> state173 err (i:as) is 55 -> state179 err (i:as) is 56 -> state192 err (i:as) is 60 -> state193 err (i:as) is 62 -> state205 err (i:as) is 63 -> state206 err (i:as) is 64 -> state210 err (i:as) is 65 -> state215 err (i:as) is 69 -> state216 err (i:as) is 72 -> state219 err (i:as) is _ -> err as iis start164 :: Lexer start164 is = state164 (\ as is -> gotError as is) "" is state164 :: LexerState state164 err as [] = err as [] state164 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis _ -> state165 err (i:as) is start165 :: Lexer start165 is = state165 (\ as is -> gotError as is) "" is state165 :: LexerState state165 err as [] = err as [] state165 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start166 :: Lexer start166 is = state166 (\ as is -> gotError as is) "" is state166 :: LexerState state166 err as [] = err as [] state166 err as iis@(i:is) = case cclass i of 0 -> err as iis 76 -> state169 err (i:as) is _ -> state166 err (i:as) is start169 :: Lexer start169 is = state169 (\ as is -> gotError as is) "" is state169 :: LexerState state169 err as [] = err as [] state169 err as iis@(i:is) = case cclass i of 0 -> err as iis 76 -> state169 err (i:as) is 49 -> state172 err (i:as) is _ -> state166 err (i:as) is state172 :: LexerState state172 err as is = output QQuote as (start1 is) start173 :: Lexer start173 is = state173 (\ as is -> gotError as is) "" is state173 :: LexerState state173 err as [] = err as [] state173 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 52 -> state174 err (i:as) is 62 -> state176 err (i:as) is _ -> state165 err (i:as) is start174 :: Lexer start174 is = state174 (\ as is -> gotError as is) "" is state174 :: LexerState state174 err as [] = err as [] state174 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 68 -> state175 err (i:as) is _ -> state165 err (i:as) is start175 :: Lexer start175 is = state175 (\ as is -> gotError as is) "" is state175 :: LexerState state175 err as [] = err as [] state175 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 56 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start176 :: Lexer start176 is = state176 (\ as is -> gotError as is) "" is state176 :: LexerState state176 err as [] = err as [] state176 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 52 -> state177 err (i:as) is _ -> state165 err (i:as) is start177 :: Lexer start177 is = state177 (\ as is -> gotError as is) "" is state177 :: LexerState state177 err as [] = err as [] state177 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 68 -> state178 err (i:as) is _ -> state165 err (i:as) is start178 :: Lexer start178 is = state178 (\ as is -> gotError as is) "" is state178 :: LexerState state178 err as [] = err as [] state178 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 68 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start179 :: Lexer start179 is = state179 (\ as is -> gotError as is) "" is state179 :: LexerState state179 err as [] = err as [] state179 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 65 -> state164 err (i:as) is 76 -> state166 err (i:as) is 52 -> state180 err (i:as) is 56 -> state182 err (i:as) is _ -> state165 err (i:as) is start180 :: Lexer start180 is = state180 (\ as is -> gotError as is) "" is state180 :: LexerState state180 err as [] = err as [] state180 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 69 -> state181 err (i:as) is _ -> state165 err (i:as) is start181 :: Lexer start181 is = state181 (\ as is -> gotError as is) "" is state181 :: LexerState state181 err as [] = err as [] state181 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 52 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start182 :: Lexer start182 is = state182 (\ as is -> gotError as is) "" is state182 :: LexerState state182 err as [] = err as [] state182 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 57 -> state183 err (i:as) is 67 -> state187 err (i:as) is _ -> state165 err (i:as) is start183 :: Lexer start183 is = state183 (\ as is -> gotError as is) "" is state183 :: LexerState state183 err as [] = err as [] state183 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 52 -> state184 err (i:as) is _ -> state165 err (i:as) is start184 :: Lexer start184 is = state184 (\ as is -> gotError as is) "" is state184 :: LexerState state184 err as [] = err as [] state184 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 70 -> state185 err (i:as) is _ -> state165 err (i:as) is start185 :: Lexer start185 is = state185 (\ as is -> gotError as is) "" is state185 :: LexerState state185 err as [] = err as [] state185 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 62 -> state186 err (i:as) is _ -> state165 err (i:as) is start186 :: Lexer start186 is = state186 (\ as is -> gotError as is) "" is state186 :: LexerState state186 err as [] = err as [] state186 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 69 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start187 :: Lexer start187 is = state187 (\ as is -> gotError as is) "" is state187 :: LexerState state187 err as [] = err as [] state187 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 60 -> state188 err (i:as) is _ -> state165 err (i:as) is start188 :: Lexer start188 is = state188 (\ as is -> gotError as is) "" is state188 :: LexerState state188 err as [] = err as [] state188 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 71 -> state189 err (i:as) is _ -> state165 err (i:as) is start189 :: Lexer start189 is = state189 (\ as is -> gotError as is) "" is state189 :: LexerState state189 err as [] = err as [] state189 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 60 -> state190 err (i:as) is _ -> state165 err (i:as) is start190 :: Lexer start190 is = state190 (\ as is -> gotError as is) "" is state190 :: LexerState state190 err as [] = err as [] state190 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 64 -> state191 err (i:as) is _ -> state165 err (i:as) is start191 :: Lexer start191 is = state191 (\ as is -> gotError as is) "" is state191 :: LexerState state191 err as [] = err as [] state191 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 58 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start192 :: Lexer start192 is = state192 (\ as is -> gotError as is) "" is state192 :: LexerState state192 err as [] = err as [] state192 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 62 -> state174 err (i:as) is _ -> state165 err (i:as) is start193 :: Lexer start193 is = state193 (\ as is -> gotError as is) "" is state193 :: LexerState state193 err as [] = err as [] state193 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 57 -> state164 err (i:as) is 76 -> state166 err (i:as) is 63 -> state194 err (i:as) is 64 -> state197 err (i:as) is _ -> state165 err (i:as) is start194 :: Lexer start194 is = state194 (\ as is -> gotError as is) "" is state194 :: LexerState state194 err as [] = err as [] state194 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 66 -> state195 err (i:as) is _ -> state165 err (i:as) is start195 :: Lexer start195 is = state195 (\ as is -> gotError as is) "" is state195 :: LexerState state195 err as [] = err as [] state195 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 65 -> state196 err (i:as) is _ -> state165 err (i:as) is start196 :: Lexer start196 is = state196 (\ as is -> gotError as is) "" is state196 :: LexerState state196 err as [] = err as [] state196 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 67 -> state186 err (i:as) is _ -> state165 err (i:as) is start197 :: Lexer start197 is = state197 (\ as is -> gotError as is) "" is state197 :: LexerState state197 err as [] = err as [] state197 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state198 err (i:as) is 68 -> state201 err (i:as) is _ -> state165 err (i:as) is start198 :: Lexer start198 is = state198 (\ as is -> gotError as is) "" is state198 :: LexerState state198 err as [] = err as [] state198 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 60 -> state199 err (i:as) is _ -> state165 err (i:as) is start199 :: Lexer start199 is = state199 (\ as is -> gotError as is) "" is state199 :: LexerState state199 err as [] = err as [] state199 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 73 -> state200 err (i:as) is _ -> state165 err (i:as) is start200 :: Lexer start200 is = state200 (\ as is -> gotError as is) "" is state200 :: LexerState state200 err as [] = err as [] state200 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state164 err (i:as) is 67 -> state164 err (i:as) is _ -> state165 err (i:as) is start201 :: Lexer start201 is = state201 (\ as is -> gotError as is) "" is state201 :: LexerState state201 err as [] = err as [] state201 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 69 -> state202 err (i:as) is _ -> state165 err (i:as) is start202 :: Lexer start202 is = state202 (\ as is -> gotError as is) "" is state202 :: LexerState state202 err as [] = err as [] state202 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 52 -> state203 err (i:as) is _ -> state165 err (i:as) is start203 :: Lexer start203 is = state203 (\ as is -> gotError as is) "" is state203 :: LexerState state203 err as [] = err as [] state203 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 64 -> state204 err (i:as) is _ -> state165 err (i:as) is start204 :: Lexer start204 is = state204 (\ as is -> gotError as is) "" is state204 :: LexerState state204 err as [] = err as [] state204 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 54 -> state175 err (i:as) is _ -> state165 err (i:as) is start205 :: Lexer start205 is = state205 (\ as is -> gotError as is) "" is state205 :: LexerState state205 err as [] = err as [] state205 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 56 -> state186 err (i:as) is _ -> state165 err (i:as) is start206 :: Lexer start206 is = state206 (\ as is -> gotError as is) "" is state206 :: LexerState state206 err as [] = err as [] state206 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 65 -> state207 err (i:as) is _ -> state165 err (i:as) is start207 :: Lexer start207 is = state207 (\ as is -> gotError as is) "" is state207 :: LexerState state207 err as [] = err as [] state207 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 55 -> state208 err (i:as) is _ -> state165 err (i:as) is start208 :: Lexer start208 is = state208 (\ as is -> gotError as is) "" is state208 :: LexerState state208 err as [] = err as [] state208 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 70 -> state209 err (i:as) is _ -> state165 err (i:as) is start209 :: Lexer start209 is = state209 (\ as is -> gotError as is) "" is state209 :: LexerState state209 err as [] = err as [] state209 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 62 -> state175 err (i:as) is _ -> state165 err (i:as) is start210 :: Lexer start210 is = state210 (\ as is -> gotError as is) "" is state210 :: LexerState state210 err as [] = err as [] state210 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 56 -> state211 err (i:as) is _ -> state165 err (i:as) is start211 :: Lexer start211 is = state211 (\ as is -> gotError as is) "" is state211 :: LexerState state211 err as [] = err as [] state211 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 72 -> state212 err (i:as) is _ -> state165 err (i:as) is start212 :: Lexer start212 is = state212 (\ as is -> gotError as is) "" is state212 :: LexerState state212 err as [] = err as [] state212 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 69 -> state213 err (i:as) is _ -> state165 err (i:as) is start213 :: Lexer start213 is = state213 (\ as is -> gotError as is) "" is state213 :: LexerState state213 err as [] = err as [] state213 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 74 -> state214 err (i:as) is _ -> state165 err (i:as) is start214 :: Lexer start214 is = state214 (\ as is -> gotError as is) "" is state214 :: LexerState state214 err as [] = err as [] state214 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 66 -> state175 err (i:as) is _ -> state165 err (i:as) is start215 :: Lexer start215 is = state215 (\ as is -> gotError as is) "" is state215 :: LexerState state215 err as [] = err as [] state215 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 57 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start216 :: Lexer start216 is = state216 (\ as is -> gotError as is) "" is state216 :: LexerState state216 err as [] = err as [] state216 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 74 -> state214 err (i:as) is 59 -> state217 err (i:as) is _ -> state165 err (i:as) is start217 :: Lexer start217 is = state217 (\ as is -> gotError as is) "" is state217 :: LexerState state217 err as [] = err as [] state217 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 56 -> state218 err (i:as) is _ -> state165 err (i:as) is start218 :: Lexer start218 is = state218 (\ as is -> gotError as is) "" is state218 :: LexerState state218 err as [] = err as [] state218 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 64 -> state164 err (i:as) is 76 -> state166 err (i:as) is _ -> state165 err (i:as) is start219 :: Lexer start219 is = state219 (\ as is -> gotError as is) "" is state219 :: LexerState state219 err as [] = err as [] state219 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 59 -> state220 err (i:as) is _ -> state165 err (i:as) is start220 :: Lexer start220 is = state220 (\ as is -> gotError as is) "" is state220 :: LexerState state220 err as [] = err as [] state220 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 56 -> state221 err (i:as) is _ -> state165 err (i:as) is start221 :: Lexer start221 is = state221 (\ as is -> gotError as is) "" is state221 :: LexerState state221 err as [] = err as [] state221 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 77 -> err as iis 76 -> state166 err (i:as) is 67 -> state175 err (i:as) is _ -> state165 err (i:as) is state222 :: LexerState state222 err as [] = err as [] where err _ _ = output Reservedid as (start1 []) state222 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis _ -> state223 err (i:as) is where err _ _ = output Reservedid as (start1 iis) state223 :: LexerState state223 err as [] = err as [] where err _ _ = output Varid as (start1 []) state223 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state224 :: LexerState state224 err as [] = err as [] where err _ _ = output Varid as (start1 []) state224 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state225 err (i:as) is 62 -> state227 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state225 :: LexerState state225 err as [] = err as [] where err _ _ = output Varid as (start1 []) state225 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state226 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state226 :: LexerState state226 err as [] = err as [] where err _ _ = output Varid as (start1 []) state226 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state227 :: LexerState state227 err as [] = err as [] where err _ _ = output Varid as (start1 []) state227 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state228 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state228 :: LexerState state228 err as [] = err as [] where err _ _ = output Varid as (start1 []) state228 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state229 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state229 :: LexerState state229 err as [] = err as [] where err _ _ = output Varid as (start1 []) state229 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 68 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state230 :: LexerState state230 err as [] = err as [] where err _ _ = output Varid as (start1 []) state230 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state222 err (i:as) is 52 -> state231 err (i:as) is 56 -> state233 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state231 :: LexerState state231 err as [] = err as [] where err _ _ = output Varid as (start1 []) state231 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state232 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state232 :: LexerState state232 err as [] = err as [] where err _ _ = output Varid as (start1 []) state232 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state233 :: LexerState state233 err as [] = err as [] where err _ _ = output Varid as (start1 []) state233 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state234 err (i:as) is 67 -> state238 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state234 :: LexerState state234 err as [] = err as [] where err _ _ = output Varid as (start1 []) state234 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state235 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state235 :: LexerState state235 err as [] = err as [] where err _ _ = output Varid as (start1 []) state235 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 70 -> state236 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state236 :: LexerState state236 err as [] = err as [] where err _ _ = output Varid as (start1 []) state236 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state237 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state237 :: LexerState state237 err as [] = err as [] where err _ _ = output Varid as (start1 []) state237 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state238 :: LexerState state238 err as [] = err as [] where err _ _ = output Varid as (start1 []) state238 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state239 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state239 :: LexerState state239 err as [] = err as [] where err _ _ = output Varid as (start1 []) state239 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 71 -> state240 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state240 :: LexerState state240 err as [] = err as [] where err _ _ = output Varid as (start1 []) state240 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state241 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state241 :: LexerState state241 err as [] = err as [] where err _ _ = output Varid as (start1 []) state241 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state242 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state242 :: LexerState state242 err as [] = err as [] where err _ _ = output Varid as (start1 []) state242 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 58 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state243 :: LexerState state243 err as [] = err as [] where err _ _ = output Varid as (start1 []) state243 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state225 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state244 :: LexerState state244 err as [] = err as [] where err _ _ = output Varid as (start1 []) state244 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state222 err (i:as) is 63 -> state245 err (i:as) is 64 -> state248 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state245 :: LexerState state245 err as [] = err as [] where err _ _ = output Varid as (start1 []) state245 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 66 -> state246 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state246 :: LexerState state246 err as [] = err as [] where err _ _ = output Varid as (start1 []) state246 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state247 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state247 :: LexerState state247 err as [] = err as [] where err _ _ = output Varid as (start1 []) state247 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 67 -> state237 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state248 :: LexerState state248 err as [] = err as [] where err _ _ = output Reservedid as (start1 []) state248 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state249 err (i:as) is 68 -> state252 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Reservedid as (start1 iis) state249 :: LexerState state249 err as [] = err as [] where err _ _ = output Varid as (start1 []) state249 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 60 -> state250 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state250 :: LexerState state250 err as [] = err as [] where err _ _ = output Varid as (start1 []) state250 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 73 -> state251 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state251 :: LexerState state251 err as [] = err as [] where err _ _ = output Reservedid as (start1 []) state251 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state222 err (i:as) is 67 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Reservedid as (start1 iis) state252 :: LexerState state252 err as [] = err as [] where err _ _ = output Varid as (start1 []) state252 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state253 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state253 :: LexerState state253 err as [] = err as [] where err _ _ = output Varid as (start1 []) state253 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 52 -> state254 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state254 :: LexerState state254 err as [] = err as [] where err _ _ = output Varid as (start1 []) state254 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state255 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state255 :: LexerState state255 err as [] = err as [] where err _ _ = output Varid as (start1 []) state255 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 54 -> state226 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state256 :: LexerState state256 err as [] = err as [] where err _ _ = output Varid as (start1 []) state256 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state237 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state257 :: LexerState state257 err as [] = err as [] where err _ _ = output Varid as (start1 []) state257 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 65 -> state258 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state258 :: LexerState state258 err as [] = err as [] where err _ _ = output Varid as (start1 []) state258 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 55 -> state259 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state259 :: LexerState state259 err as [] = err as [] where err _ _ = output Varid as (start1 []) state259 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 70 -> state260 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state260 :: LexerState state260 err as [] = err as [] where err _ _ = output Varid as (start1 []) state260 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 62 -> state226 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state261 :: LexerState state261 err as [] = err as [] where err _ _ = output Varid as (start1 []) state261 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state262 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state262 :: LexerState state262 err as [] = err as [] where err _ _ = output Varid as (start1 []) state262 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 72 -> state263 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state263 :: LexerState state263 err as [] = err as [] where err _ _ = output Varid as (start1 []) state263 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 69 -> state264 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state264 :: LexerState state264 err as [] = err as [] where err _ _ = output Varid as (start1 []) state264 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 74 -> state265 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state265 :: LexerState state265 err as [] = err as [] where err _ _ = output Varid as (start1 []) state265 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 66 -> state226 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state266 :: LexerState state266 err as [] = err as [] where err _ _ = output Varid as (start1 []) state266 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 57 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state267 :: LexerState state267 err as [] = err as [] where err _ _ = output Varid as (start1 []) state267 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 74 -> state265 err (i:as) is 59 -> state268 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state268 :: LexerState state268 err as [] = err as [] where err _ _ = output Varid as (start1 []) state268 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state269 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state269 :: LexerState state269 err as [] = err as [] where err _ _ = output Varid as (start1 []) state269 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 64 -> state222 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state270 :: LexerState state270 err as [] = err as [] where err _ _ = output Varid as (start1 []) state270 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 59 -> state271 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state271 :: LexerState state271 err as [] = err as [] where err _ _ = output Varid as (start1 []) state271 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 56 -> state272 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state272 :: LexerState state272 err as [] = err as [] where err _ _ = output Varid as (start1 []) state272 err as iis@(i:is) = case cclass i of 0 -> err as iis 1 -> err as iis 2 -> err as iis 3 -> err as iis 4 -> err as iis 5 -> err as iis 6 -> err as iis 7 -> err as iis 8 -> err as iis 9 -> err as iis 11 -> err as iis 12 -> err as iis 13 -> err as iis 14 -> err as iis 19 -> err as iis 20 -> err as iis 21 -> err as iis 22 -> err as iis 23 -> err as iis 47 -> err as iis 48 -> err as iis 49 -> err as iis 50 -> err as iis 75 -> err as iis 76 -> err as iis 77 -> err as iis 67 -> state226 err (i:as) is _ -> state223 err (i:as) is where err _ _ = output Varid as (start1 iis) state273 :: LexerState state273 err as [] = err as [] where err _ _ = output Special as (start1 []) state273 err as iis@(i:is) = case cclass i of 13 -> state274 err (i:as) is _ -> err as iis where err _ _ = output Special as (start1 iis) state274 :: LexerState state274 err as is = nestedComment as is state275 state275 :: LexerState state275 err as is = output NestedComment as (start1 is) haskell-lexer-1.1.1/Language/Haskell/Lexer/Position.hs0000644000000000000000000000240007346545000020764 0ustar0000000000000000module Language.Haskell.Lexer.Position where -- | The posisiotn within a file. data Pos = Pos { char, line, column :: !Int } deriving (Show) -- | The line and column numbers of a position. simpPos :: Pos -> (Int,Int) simpPos (Pos _ l c) = (l,c) -- Some functions still put fake char positions in Pos values, so... instance Eq Pos where p1 == p2 = simpPos p1 == simpPos p2 instance Ord Pos where compare p1 p2 = compare (simpPos p1) (simpPos p2) -- | The first column is designated column 1, not 0. startPos :: Pos startPos = Pos { char = 0, line = 1, column = 1 } -- | Advance position by a string. nextPos :: Pos -> String -> Pos nextPos = foldl nextPos1 -- | Advance position by a single character. nextPos1 :: Pos -> Char -> Pos nextPos1 (Pos n y x) c = case c of -- The characters newline, return, linefeed, and formfeed, all start -- a new line. '\CR' -> Pos (n+1) (y+1) 1 '\LF' -> Pos (n+1) (y+1) 1 '\FF' -> Pos (n+1) (y+1) 1 -- Tab stops are 8 characters apart. -- A tab character causes the insertion of enough spaces to align the -- current position with the next tab stop. -- + (not in the report) the first tab stop is column 1. '\t' -> Pos (n+1) y (x+8-(x-1) `mod` 8) _ -> Pos (n+1) y (x+1) haskell-lexer-1.1.1/Language/Haskell/Lexer/Tokens.hs0000644000000000000000000000263007346545000020430 0ustar0000000000000000module Language.Haskell.Lexer.Tokens where -- | Haskell token classifications: data Token = Varid -- ^ Variable | Conid -- ^ Constructor | Varsym -- ^ Variable operator | Consym -- ^ Constructor operator | Reservedid -- ^ Reserved keyword | Reservedop -- ^ Reserved operator | Specialid | IntLit -- ^ Integral numeric literal | FloatLit -- ^ Fractional numeric literal | CharLit -- ^ Character literal | StringLit -- ^ String literal | QQuote -- ^ Quasi quote: @[|text|stuff|]@ | Qvarid -- ^ Qualified variable | Qconid -- ^ Qualified constructor | Qvarsym -- ^ Qualified variable operator | Qconsym -- ^ Qualified constructor operator | Special | Whitespace -- ^ White space | NestedCommentStart -- ^ Internal: causes a call to an external function | NestedComment -- ^ A nested comment ({- ... -}) | LiterateComment -- ^ Not handled by the lexer | Commentstart -- ^ Dashes | Comment -- ^ The stuff after the dashes | ErrorToken | GotEOF | TheRest | ModuleName | ModuleAlias -- ^ recognized in a later pass -- Inserted during layout processing (see Haskell 98, 9.3): | Layout -- ^ for implicit braces | Indent Int -- ^ \, to preceed first token on each line | Open Int -- ^ \{n\}, after let, where, do or of, if not followed by a \"{\" deriving (Show,Eq,Ord) haskell-lexer-1.1.1/Language/Haskell/Lexer/Utils.hs0000644000000000000000000000300107346545000020256 0ustar0000000000000000module Language.Haskell.Lexer.Utils ( module Language.Haskell.Lexer.Utils , Token(..) ) where import Language.Haskell.Lexer.Tokens gotEOF :: [a] -> [(Token,[a])] gotEOF [] = [] gotEOF as = [(GotEOF, reverse as)] gotError :: [a] -> [a] -> [(Token, [a])] gotError as is = (ErrorToken, reverse as): if null is then [(GotEOF,[])] else [(TheRest,is{-reverse (take 80 is)-})] -- Inlining the call to output does not make a big difference. --output token as cont = (token, reverse as):cont -- Not reversing the token string seems to save about 10% of the time with HBC. -- The difference in speed seems insignificant with ghc-6.0.1 -O. output :: t -> [a] -> [(t, [a])] -> [(t, [a])] output token as cont = (token,reverse as):cont -- This avoids constructing a closure for the call to reverse. -- This saves about 10% too. {- output token as cont = rev as [] where rev [] as' = (token,as'):cont rev (a:as) as' = rev as (a:as') --} nestedComment :: [Char] -> [Char] -> (([a] -> [a] -> [(Token, [a])]) -> [Char] -> [Char] -> [(Token, [Char])]) -> [(Token, [Char])] nestedComment as' is' next = nest (0::Int) as' is' where nest n as is = case is of '-' : '}' : is1 -> if n == 0 then next gotError ('}':'-':as) is1 else nest (n-1) ('}':'-':as) is1 '{' : '-' : is1 -> nest (n+1) ('-':'{':as) is1 c : is1 -> nest n (c:as) is1 [] -> gotError as is -- EOF inside comment haskell-lexer-1.1.1/Setup.hs0000644000000000000000000000005707346545000014101 0ustar0000000000000000import Distribution.Simple main = defaultMain haskell-lexer-1.1.1/haskell-lexer.cabal0000644000000000000000000000242007346545000016165 0ustar0000000000000000Cabal-version: 2.2 Name: haskell-lexer Version: 1.1.1 License: MIT License-file: LICENSE Author: Thomas Hallgren Maintainer: diatchki@galois.com Category: Language Synopsis: A fully compliant Haskell 98 lexer Description: A fully compliant Haskell 98 lexer. Build-type: Simple Homepage: https://github.com/yav/haskell-lexer Bug-reports: https://github.com/yav/haskell-lexer/issues tested-with: GHC == 9.4.1 GHC == 9.2.3 GHC == 9.0.2 GHC == 8.10.7 GHC == 8.8.4 GHC == 8.6.5 GHC == 8.4.4 GHC == 8.2.2 GHC == 8.0.2 GHC == 7.10.3 GHC == 7.8.4 GHC == 7.6.3 GHC == 7.4.2 GHC == 7.2.2 GHC == 7.0.4 Library Build-Depends: base < 5 Exposed-modules: Language.Haskell.Lexer Other-modules: Language.Haskell.Lexer.Layout, Language.Haskell.Lexer.Tokens, Language.Haskell.Lexer.Lex, Language.Haskell.Lexer.Utils, Language.Haskell.Lexer.Position GHC-options: -Wall -fno-warn-unused-matches -fno-warn-name-shadowing if impl(GHC >= 8.0) GHC-options: -Wcompat default-language: Haskell2010 source-repository head type: git location: https://github.com/yav/haskell-lexer.git