1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
|
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE language
[
<!-- names must start with a letter, ideogram or underscore. \w matches any
word character *or* a number, hence the lookahead -->
<!ENTITY name "(?![0-9])[\w_:][\w.:_-]*">
]>
<language name="Hamlet" version="6" kateversion="5.53" section="Markup" extensions="*.hamlet" author="Bastian Holst (bastianholst@gmx.de)" license="LGPL" indenter="haskell">
<highlighting>
<contexts>
<context attribute="Normal Text" lineEndContext="#pop" name="Normal Text" >
<RegExpr attribute="Element" context="element" String="<&name;\b" />
<!-- A widget -->
<Detect2Chars attribute="Code" context="Code" char="^" char1="{"/>
<!-- Something implementing ToHtml -->
<Detect2Chars attribute="Code" context="Code" char="#" char1="{"/>
<!-- An URL -->
<Detect2Chars attribute="Code" context="Code" char="@" char1="{"/>
<!-- A Message -->
<Detect2Chars attribute="Code" context="Code" char="_" char1="{"/>
<DetectChar attribute="Logic" context="Logic" firstNonSpace="true" char="$"/>
</context>
<context attribute="Element" lineEndContext="#stay" name="element" >
<Detect2Chars attribute="Element" context="#pop" char="/" char1=">" />
<DetectChar attribute="Element" context="#pop" char=">" />
<RegExpr attribute="Attribute" context="Attribute" String="^&name;|\s+&name;" />
<RegExpr attribute="Class" context="#stay" String="\.&name;"/>
<RegExpr attribute="Error" context="#stay" String="\S" />
</context>
<context name="Logic" lineEndContext="#pop" attribute="Normal Text">
<WordDetect attribute="Logic" context="Codeline" String="if"/>
<WordDetect attribute="Logic" context="Codeline" String="elseif"/>
<WordDetect attribute="Logic" context="Assignment" String="forall"/>
<WordDetect attribute="Logic" context="Assignment" String="maybe"/>
<WordDetect attribute="Logic" context="#stay" String="else"/>
<WordDetect attribute="Logic" context="#stay" String="nothing"/>
<RegExpr attribute="Error" context="#stay" String="\S" />
</context>
<context name="Code" attribute="Normal Text" lineEndContext="#stay">
<DetectChar attribute="Code" context="#pop" char="}"/>
<IncludeRules context="##Haskell" />
</context>
<context name="Codeline" attribute="Normal Text" lineEndContext="#pop">
<IncludeRules context="##Haskell" />
</context>
<context name="Assignment" attribute="Normal Text" lineEndContext="#pop">
<Detect2Chars attribute="Assignment" context="Codeline" char="<" char1="-"/>
<IncludeRules context="##Haskell" />
</context>
<context name="Attribute" attribute="Attribute" lineEndContext="#stay">
<DetectChar attribute="Attribute" context="Value" char="=" />
<DetectChar attribute="Element" context="#pop#pop" char=">"/>
<RegExpr attribute="Error" context="#stay" String="\S" />
</context>
<context attribute="Value" lineEndContext="#stay" name="Value">
<DetectChar attribute="Value" context="Value DQ" char=""" />
<DetectChar attribute="Value" context="Value SQ" char="'" />
<Detect2Chars attribute="Code" context="Value Code" char="@" char1="{"/>
<Detect2Chars attribute="Code" context="Value Code" char="#" char1="{"/>
<RegExpr attribute="Value" context="#pop#pop" String="[^"'>\s]+"/>
<RegExpr attribute="Error" context="#stay" String="\S" />
</context>
<context name="Value DQ" attribute="Value" lineEndContext="#stay">
<DetectChar attribute="Value" context="#pop#pop#pop" char=""" />
</context>
<context name="Value SQ" attribute="Value" lineEndContext="#stay">
<DetectChar attribute="Value" context="#pop#pop#pop" char="'" />
</context>
<context name="Value Code" attribute="Normal Text" lineEndContext="#stay">
<DetectChar attribute="Code" context="#pop#pop#pop" char="}"/>
<IncludeRules context="##Haskell" />
</context>
</contexts>
<itemDatas>
<itemData name="Normal Text" defStyleNum="dsNormal" />
<itemData name="Element" defStyleNum="dsKeyword" />
<itemData name="Attribute" defStyleNum="dsOthers" spellChecking="false" />
<itemData name="Class" defStyleNum="dsString" spellChecking="false" />
<itemData name="Value" defStyleNum="dsString" spellChecking="false" />
<itemData name="Logic" defStyleNum="dsKeyword" spellChecking="false" />
<itemData name="Code" defStyleNum="dsKeyword" spellChecking="false" />
<itemData name="Error" defStyleNum="dsError" spellChecking="false" />
<itemData name="Assignment" defStyleNum="dsOthers" spellChecking="false" />
</itemDatas>
</highlighting>
<general>
<keywords casesensitive="1"/>
</general>
</language>
<!-- kate: replace-tabs on; tab-width 2; indent-width 2; -->
|