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"] |
11 builtin = ["succ", "pred", "low", "high", "ord"] |
12 |
12 |
13 pascalLanguageDef |
13 pascalLanguageDef |
14 = emptyDef |
14 = emptyDef |
15 { commentStart = "(*" |
15 { commentStart = "(*" |
16 , commentEnd = "*)" |
16 , commentEnd = "*)" |