equal
deleted
inserted
replaced
6 import Text.Parsec.Prim |
6 import Text.Parsec.Prim |
7 import Text.Parsec.Token |
7 import Text.Parsec.Token |
8 import Text.Parsec.Language |
8 import Text.Parsec.Language |
9 import Data.Char |
9 import Data.Char |
10 |
10 |
11 builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit"] |
11 builtin = ["succ", "pred", "low", "high", "ord", "inc", "dec", "exit", "break"] |
12 |
12 |
13 pascalLanguageDef |
13 pascalLanguageDef |
14 = emptyDef |
14 = emptyDef |
15 { commentStart = "(*" |
15 { commentStart = "(*" |
16 , commentEnd = "*)" |
16 , commentEnd = "*)" |