# Leo colorizer control file for haskell mode.
# This file is in the public domain.
# Properties for haskell mode.
properties = {
"commentEnd": "-}",
"commentStart": "{-",
"indentSize": "8",
"lineComment": "--",
"tabSize": "8",
}
# Attributes dict for haskell_main ruleset.
haskell_main_attributes_dict = {
"default": "null",
"digit_re": "",
"escape": "\\",
"highlight_digits": "true",
"ignore_case": "false",
"no_word_sep": "",
}
# Dictionary of attributes dictionaries for haskell mode.
attributesDictDict = {
"haskell_main": haskell_main_attributes_dict,
}
# Keywords dict for haskell_main ruleset.
haskell_main_keywords_dict = {
":": "literal2",
"Addr": "keyword3",
"Bool": "keyword3",
"Bounded": "keyword3",
"Char": "keyword3",
"Double": "keyword3",
"EQ": "literal2",
"Either": "keyword3",
"Enum": "keyword3",
"Eq": "keyword3",
"False": "literal2",
"FilePath": "keyword3",
"Float": "keyword3",
"Floating": "keyword3",
"Fractional": "keyword3",
"Functor": "keyword3",
"GT": "literal2",
"IO": "keyword3",
"IOError": "keyword3",
"IOResult": "keyword3",
"Int": "keyword3",
"Integer": "keyword3",
"Integral": "keyword3",
"Ix": "keyword3",
"Just": "literal2",
"LT": "literal2",
"Left": "literal2",
"Maybe": "keyword3",
"Monad": "keyword3",
"Nothing": "literal2",
"Num": "keyword3",
"Ord": "keyword3",
"Ordering": "keyword3",
"Ratio": "keyword3",
"Rational": "keyword3",
"Read": "keyword3",
"ReadS": "keyword3",
"Real": "keyword3",
"RealFloat": "keyword3",
"RealFrac": "keyword3",
"Right": "literal2",
"Show": "keyword3",
"ShowS": "keyword3",
"String": "keyword3",
"True": "literal2",
"_": "keyword1",
"as": "keyword1",
"case": "keyword1",
"class": "keyword1",
"data": "keyword1",
"default": "keyword1",
"deriving": "keyword1",
"div": "operator",
"do": "keyword1",
"elem": "operator",
"else": "keyword1",
"hiding": "keyword1",
"if": "keyword1",
"import": "keyword1",
"in": "keyword1",
"infix": "keyword1",
"infixl": "keyword1",
"infixr": "keyword1",
"instance": "keyword1",
"let": "keyword1",
"mod": "operator",
"module": "keyword1",
"newtype": "keyword1",
"notElem": "operator",
"of": "keyword1",
"qualified": "keyword1",
"quot": "operator",
"rem": "operator",
"seq": "operator",
"then": "keyword1",
"type": "keyword1",
"where": "keyword1",
}
# Dictionary of keywords dictionaries for haskell mode.
keywordsDictDict = {
"haskell_main": haskell_main_keywords_dict,
}
# Rules for haskell_main ruleset.
def haskell_rule0(colorer, s, i):
return colorer.match_span(s, i, kind="comment2", begin="{-#", end="#-}",
at_line_start=False, at_whitespace_end=False, at_word_start=False,
delegate="",exclude_match=False,
no_escape=False, no_line_break=False, no_word_break=False)
def haskell_rule1(colorer, s, i):
return colorer.match_span(s, i, kind="comment1", begin="{-", end="-}",
at_line_start=False, at_whitespace_end=False, at_word_start=False,
delegate="",exclude_match=False,
no_escape=False, no_line_break=False, no_word_break=False)
def haskell_rule2(colorer, s, i):
return colorer.match_eol_span(s, i, kind="comment1", seq="--",
at_line_start=False, at_whitespace_end=False, at_word_start=False,
delegate="", exclude_match=False)
def haskell_rule3(colorer, s, i):
return colorer.match_span(s, i, kind="literal1", begin="\"", end="\"",
at_line_start=False, at_whitespace_end=False, at_word_start=False,
delegate="",exclude_match=False,
no_escape=False, no_line_break=True, no_word_break=False)
def haskell_rule4(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="' '",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule5(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'!'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule6(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'\"'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule7(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'$'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule8(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'%'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule9(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'/'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule10(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'('",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule11(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="')'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule12(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'['",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule13(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="']'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule14(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'+'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule15(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'-'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule16(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'*'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule17(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'='",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule18(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'/'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule19(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'^'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule20(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'.'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule21(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="','",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule22(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="':'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule23(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="';'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule24(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'<'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule25(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'>'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule26(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'|'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule27(colorer, s, i):
return colorer.match_seq(s, i, kind="literal1", seq="'@'",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule28(colorer, s, i):
return colorer.match_span(s, i, kind="literal1", begin="'", end="'",
at_line_start=False, at_whitespace_end=False, at_word_start=False,
delegate="",exclude_match=False,
no_escape=False, no_line_break=False, no_word_break=True)
def haskell_rule29(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="..",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule30(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="&&",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule31(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="::",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule32(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="<",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule33(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq=">",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule34(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="+",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule35(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="-",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule36(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="*",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule37(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="/",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule38(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="%",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule39(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="^",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule40(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="=",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule41(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="|",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule42(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="@",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule43(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="~",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule44(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="!",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule45(colorer, s, i):
return colorer.match_seq(s, i, kind="operator", seq="$",
at_line_start=False, at_whitespace_end=False, at_word_start=False, delegate="")
def haskell_rule46(colorer, s, i):
return colorer.match_keywords(s, i)
# Rules dict for haskell_main ruleset.
rulesDict1 = {
"!": [haskell_rule44,],
"\"": [haskell_rule3,],
"$": [haskell_rule45,],
"%": [haskell_rule38,],
"&": [haskell_rule30,],
"'": [haskell_rule4,haskell_rule5,haskell_rule6,haskell_rule7,haskell_rule8,haskell_rule9,haskell_rule10,haskell_rule11,haskell_rule12,haskell_rule13,haskell_rule14,haskell_rule15,haskell_rule16,haskell_rule17,haskell_rule18,haskell_rule19,haskell_rule20,haskell_rule21,haskell_rule22,haskell_rule23,haskell_rule24,haskell_rule25,haskell_rule26,haskell_rule27,haskell_rule28,],
"*": [haskell_rule36,],
"+": [haskell_rule34,],
"-": [haskell_rule2,haskell_rule35,],
".": [haskell_rule29,],
"/": [haskell_rule37,],
"0": [haskell_rule46,],
"1": [haskell_rule46,],
"2": [haskell_rule46,],
"3": [haskell_rule46,],
"4": [haskell_rule46,],
"5": [haskell_rule46,],
"6": [haskell_rule46,],
"7": [haskell_rule46,],
"8": [haskell_rule46,],
"9": [haskell_rule46,],
":": [haskell_rule31,haskell_rule46,],
"<": [haskell_rule32,],
"=": [haskell_rule40,],
">": [haskell_rule33,],
"@": [haskell_rule42,haskell_rule46,],
"A": [haskell_rule46,],
"B": [haskell_rule46,],
"C": [haskell_rule46,],
"D": [haskell_rule46,],
"E": [haskell_rule46,],
"F": [haskell_rule46,],
"G": [haskell_rule46,],
"H": [haskell_rule46,],
"I": [haskell_rule46,],
"J": [haskell_rule46,],
"K": [haskell_rule46,],
"L": [haskell_rule46,],
"M": [haskell_rule46,],
"N": [haskell_rule46,],
"O": [haskell_rule46,],
"P": [haskell_rule46,],
"Q": [haskell_rule46,],
"R": [haskell_rule46,],
"S": [haskell_rule46,],
"T": [haskell_rule46,],
"U": [haskell_rule46,],
"V": [haskell_rule46,],
"W": [haskell_rule46,],
"X": [haskell_rule46,],
"Y": [haskell_rule46,],
"Z": [haskell_rule46,],
"^": [haskell_rule39,],
"_": [haskell_rule46,],
"a": [haskell_rule46,],
"b": [haskell_rule46,],
"c": [haskell_rule46,],
"d": [haskell_rule46,],
"e": [haskell_rule46,],
"f": [haskell_rule46,],
"g": [haskell_rule46,],
"h": [haskell_rule46,],
"i": [haskell_rule46,],
"j": [haskell_rule46,],
"k": [haskell_rule46,],
"l": [haskell_rule46,],
"m": [haskell_rule46,],
"n": [haskell_rule46,],
"o": [haskell_rule46,],
"p": [haskell_rule46,],
"q": [haskell_rule46,],
"r": [haskell_rule46,],
"s": [haskell_rule46,],
"t": [haskell_rule46,],
"u": [haskell_rule46,],
"v": [haskell_rule46,],
"w": [haskell_rule46,],
"x": [haskell_rule46,],
"y": [haskell_rule46,],
"z": [haskell_rule46,],
"{": [haskell_rule0,haskell_rule1,],
"|": [haskell_rule41,],
"~": [haskell_rule43,],
}
# x.rulesDictDict for haskell mode.
rulesDictDict = {
"haskell_main": rulesDict1,
}
# Import dict for haskell mode.
importDict = {}
|