@@ -21,9 +21,8 @@ import Text.Parsing.Parser.Token
2121-- ---------------------------------------------------------
2222
2323-- | This is a minimal token definition for Haskell style languages. It
24- -- defines the style of comments, valid identifiers and case
25- -- sensitivity. It does not define any reserved words or operators.
26-
24+ -- | defines the style of comments, valid identifiers and case
25+ -- | sensitivity. It does not define any reserved words or operators.
2726haskellStyle :: LanguageDef
2827haskellStyle = LanguageDef (unGenLanguageDef emptyDef)
2928 { commentStart = " {-"
@@ -43,9 +42,8 @@ haskellStyle = LanguageDef (unGenLanguageDef emptyDef)
4342 op' = oneOf [' :' , ' !' , ' #' , ' $' , ' %' , ' &' , ' *' , ' +' , ' .' , ' /' , ' <' , ' =' , ' >' , ' ?' , ' @' , ' \\ ' , ' ^' , ' |' , ' -' , ' ~' ]
4443
4544-- | This is a minimal token definition for Java style languages. It
46- -- defines the style of comments, valid identifiers and case
47- -- sensitivity. It does not define any reserved words or operators.
48-
45+ -- | defines the style of comments, valid identifiers and case
46+ -- | sensitivity. It does not define any reserved words or operators.
4947javaStyle :: LanguageDef
5048javaStyle = LanguageDef (unGenLanguageDef emptyDef)
5149 { commentStart = " /*"
@@ -64,10 +62,9 @@ javaStyle = LanguageDef (unGenLanguageDef emptyDef)
6462-- ------------------------------------------------------
6563
6664-- | This is the most minimal token definition. It is recommended to use
67- -- this definition as the basis for other definitions. `emptyDef` has
68- -- no reserved names or operators, is case sensitive and doesn't accept
69- -- comments, identifiers or operators.
70-
65+ -- | this definition as the basis for other definitions. `emptyDef` has
66+ -- | no reserved names or operators, is case sensitive and doesn't accept
67+ -- | comments, identifiers or operators.
7168emptyDef :: LanguageDef
7269emptyDef = LanguageDef
7370 { commentStart: " "
@@ -90,13 +87,11 @@ emptyDef = LanguageDef
9087-- -- Haskell
9188-- -----------------------------------------------------------
9289
93- -- -- | A lexer for the haskell language.
94-
90+ -- | A lexer for the haskell language.
9591haskell :: TokenParser
9692haskell = makeTokenParser haskellDef
9793
98- -- -- | The language definition for the Haskell language.
99-
94+ -- | The language definition for the Haskell language.
10095haskellDef :: LanguageDef
10196haskellDef =
10297 case haskell98Def of
@@ -109,8 +104,7 @@ haskellDef =
109104 ]
110105 }
111106
112- -- -- | The language definition for the language Haskell98.
113-
107+ -- | The language definition for the language Haskell98.
114108haskell98Def :: LanguageDef
115109haskell98Def = LanguageDef (unGenLanguageDef haskellStyle)
116110 { reservedOpNames = [" ::" ," .." ," =" ," \\ " ," |" ," <-" ," ->" ," @" ," ~" ," =>" ]
0 commit comments