<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE language SYSTEM "language.dtd">
<language name="4GL-PER" version="9" kateversion="5.0" section="Database" extensions="*.per;*.PER;*.per.err" mimetype="text/x-4glper;text/x-4glpererr" author="Andrej Falout (andrej@falout.org)" license="LGPL">
  <highlighting>
    <list name="keywords">
      <item>by</item>
      <item>to</item>

      <item>end</item>
      <item>not</item>
      <item>red</item>

      <item>blue</item>
      <item>cyan</item>
      <item>keys</item>
      <item>like</item>
      <item>null</item>
      <item>size</item>
      <item>type</item>

      <item>black</item>
      <item>color</item>
      <item>green</item>
      <item>input</item>
      <item>today</item>
      <item>white</item>

      <item>format</item>
      <item>record</item>
      <item>screen</item>
      <item>tables</item>
      <item>yellow</item>

      <item>default</item>
      <item>display</item>
      <item>include</item>
      <item>magenta</item>
      <item>noentry</item>
      <item>picture</item>
      <item>reverse</item>
      <item>through</item>
      <item>UPSHIFT</item>
      <item>without</item>

      <item>autonext</item>
      <item>comments</item>
      <item>COMPRESS</item>
      <item>database</item>
      <item>formonly</item>
      <item>noupdate</item>
      <item>required</item>
      <item>WORDWRAP</item>

      <item>character</item>
      <item>downshift</item>
      <item>invisible</item>
      <item>underline</item>

      <item>attributes</item>
      <item>delimiters</item>

      <item>instructions</item>
    </list>
    <list name="types">
      <item>char</item>
      <item>date</item>
      <item>array</item>
      <item>float</item>
      <item>money</item>
      <item>serial</item>
      <item>DECIMAL</item>
      <item>integer</item>
      <item>NUMERIC</item>
      <item>VARCHAR</item>
      <item>DATETIME</item>
      <item>FRACTION</item>
      <item>INTERVAL</item>
      <item>smallint</item>
    </list>
   <contexts>
      <context attribute="Normal Text" lineEndContext="#stay" name="Normal Text 1">
        <keyword attribute="Keyword" context="#stay" String="keywords"/>
        <keyword attribute="Data Type" context="#stay" String="types"/>
        <Float attribute="Float" context="#stay"/>
        <HlCOct attribute="Octal" context="#stay"/>
        <HlCHex attribute="Hex" context="#stay"/>
        <Int attribute="Decimal" context="#stay"/>
        <HlCChar attribute="Char" context="#stay"/>
        <DetectChar attribute="String" context="String" char="&quot;"/>
        <DetectChar attribute="Comment" context="Comment 1" char="#"/>
        <DetectChar attribute="Comment" context="Comment 2" char="{" beginRegion="BlockComment"/>
        <Detect2Chars attribute="Comment" context="Comment 1" char="/" char1="/"/>
        <Detect2Chars attribute="Comment" context="Comment 2" char="/" char1="*" beginRegion="BlockComment"/>
        <AnyChar attribute="Symbol" context="#stay" String="!%&amp;()+,-&lt;=&gt;?[]^|~"/>
      </context>
      <context attribute="String" lineEndContext="#pop" name="String">
        <LineContinue attribute="String" context="#stay"/>
        <HlCStringChar attribute="String Char" context="#stay"/>
        <DetectChar attribute="String" context="#pop" char="&quot;"/>
      </context>
      <context attribute="Comment" lineEndContext="#pop" name="Comment 1">
        <DetectSpaces />
        <IncludeRules context="##Comments" />
      </context>
      <context attribute="Comment" lineEndContext="#stay" name="Comment 2">
        <DetectChar attribute="Comment" context="#pop" char="}" endRegion="BlockComment"/>
        <Detect2Chars attribute="Comment" context="#pop" char="*" char1="/" endRegion="BlockComment"/>
        <DetectSpaces />
        <IncludeRules context="##Comments" />
      </context>
    </contexts>
    <itemDatas>
      <itemData name="Normal Text" defStyleNum="dsNormal"/>
      <itemData name="Keyword"  defStyleNum="dsKeyword"/>
      <itemData name="Data Type"  defStyleNum="dsDataType"/>
      <itemData name="Decimal"  defStyleNum="dsDecVal"/>
      <itemData name="Octal"  defStyleNum="dsBaseN"/>
      <itemData name="Hex"  defStyleNum="dsBaseN"/>
      <itemData name="Float"  defStyleNum="dsFloat"/>
      <itemData name="Char"  defStyleNum="dsChar"/>
      <itemData name="String"  defStyleNum="dsString"/>
      <itemData name="String Char"  defStyleNum="dsSpecialChar"/>
      <itemData name="Comment"  defStyleNum="dsComment"/>
      <itemData name="Symbol"  defStyleNum="dsOperator"/>
    </itemDatas>
  </highlighting>
  <general>
    <comments>
      <comment name="multiLine" start="{" end="}" region="BlockComment" />
    </comments>
    <keywords casesensitive="0" />
  </general>
</language>
<!-- kate: replace-tabs on; tab-width 2; indent-width 2; -->
