<?xml version="1.0" encoding="windows-1251"?>
<!DOCTYPE hrc PUBLIC "-//Cail Lomecb//DTD Colorer HRC take5//EN"
"http://colorer.sf.net/2003/hrc.dtd">
<hrc version="take5" xmlns="http://colorer.sf.net/2003/hrc"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation="http://colorer.sf.net/2003/hrc http://colorer.sf.net/2003/hrc.xsd">
<type name="ada">
<annotation>
<documentation><![CDATA[
Ada syntax
<filename>/\.(ads|adb|adc)$/i</filename>
]]></documentation>
<contributors>
Eugene Kotlyarov 2:5058/26.9@fidonet.org http://ekot.narod.ru/far
</contributors>
</annotation>
<region name="String" parent="def:String"/>
<region name="Symbol" parent="def:Symbol"/>
<region name="Keyword" parent="def:Keyword"/>
<region name="Number" parent="def:Number"/>
<region name="Function" parent="def:Function"/>
<region name="PairStart" parent="def:PairStart"/>
<region name="PairEnd" parent="def:PairEnd"/>
<scheme name="ada">
<!-- Comments -->
<block start="/--/" end="/$/" scheme="def:Comment" region="def:LineComment"/>
<!-- paired -->
<block start="/(\()/" end="/(\))/" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<block start="/(\[)/" end="/(\])/" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<block start="/\b(begin)\b/i" end="/\b(end)\b/i" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<block start="/\b(if)\b/i" end="/\b(end\s+if)/i" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<block start="/\b(case)\b/i" end="/\b(end\s+case)/i" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<block start="/\b(loop)\b/i" end="/\b(end\s+loop)/i" scheme="ada" region00="Symbol" region01="PairStart" region10="Symbol" region11="PairEnd"/>
<regexp match="/(pragma\s+([A-Za-z_])+\s*(.*\))?;)/i" region0="def:Directive"/>
<regexp match="/\b(?{Keyword}procedure|function)\s+(?{Function}[_\w]+)\s*/i"/>
<!-- character -->
<regexp match="/('.')/" region0="String"/>
<!-- Strings -->
<regexp match="/(".*?")/" region0="String"/>
<!-- Numbers -->
<!-- based -->
<regexp match="/[0-9_]+\#[0-9a-f_]+(\.([0-9a-f][_]?)+)?\#/i" region0="Number"/>
<!-- decimal -->
<regexp match="/\b[0-9_]+(\.([0-9][_]?)+)?(E([\+]?|\-)([0-9][_]?)*)?\b/" region="Number"/>
<!-- Symbols -->
<keywords region="Symbol">
<symb name="<"/>
<symb name="=>"/>
<symb name="^"/>
<symb name="+"/>
<symb name="&"/>
<symb name="~"/>
<symb name="|"/>
<symb name="-"/>
<symb name="*"/>
<symb name="/"/>
<symb name=";"/>
<symb name=":"/>
<symb name=":="/>
<symb name="="/>
<symb name="("/>
<symb name=")"/>
<symb name="["/>
<symb name="]"/>
<symb name=","/>
<symb name=">"/>
<symb name="}"/>
<symb name="{"/>
<symb name="'"/>
<symb name="."/>
</keywords>
<!-- Common words -->
<keywords ignorecase="yes" region="Keyword">
<word name="abort"/>
<word name="abs"/>
<word name="abstract"/>
<word name="accept"/>
<word name="access"/>
<word name="aliased"/>
<word name="all"/>
<word name="and"/>
<word name="array"/>
<word name="at"/>
<word name="begin"/>
<word name="body"/>
<word name="case"/>
<word name="constant"/>
<word name="declare"/>
<word name="delay"/>
<word name="delta"/>
<word name="digits"/>
<word name="do"/>
<word name="else"/>
<word name="elsif"/>
<word name="end"/>
<word name="entry"/>
<word name="exception"/>
<word name="exit"/>
<word name="for"/>
<word name="function"/>
<word name="generic"/>
<word name="goto"/>
<word name="if"/>
<word name="in"/>
<word name="limited"/>
<word name="loop"/>
<word name="mod"/>
<word name="new"/>
<word name="not"/>
<word name="or"/>
<word name="others"/>
<word name="out"/>
<word name="package"/>
<word name="pragma"/>
<word name="private"/>
<word name="procedure"/>
<word name="protected"/>
<word name="is"/>
<word name="raise"/>
<word name="range"/>
<word name="record"/>
<word name="rem"/>
<word name="renames"/>
<word name="requeue"/>
<word name="return"/>
<word name="reverse"/>
<word name="select"/>
<word name="separate"/>
<word name="null"/>
<word name="of"/>
<word name="subtype"/>
<word name="tagged"/>
<word name="task"/>
<word name="terminate"/>
<word name="then"/>
<word name="type"/>
<word name="when"/>
<word name="with"/>
<word name="until"/>
<word name="use"/>
<word name="while"/>
<word name="xor"/>
</keywords>
</scheme>
</type>
</hrc>
<!-- ***** BEGIN LICENSE BLOCK *****
- Version: MPL 1.1/GPL 2.0/LGPL 2.1
-
- The contents of this file are subject to the Mozilla Public License Version
- 1.1 (the "License"); you may not use this file except in compliance with
- the License. You may obtain a copy of the License at
- http://www.mozilla.org/MPL/
-
- Software distributed under the License is distributed on an "AS IS" basis,
- WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
- for the specific language governing rights and limitations under the
- License.
-
- The Original Code is the Colorer Library.
-
- The Initial Developer of the Original Code is
- Cail Lomecb <cail@nm.ru>.
- Portions created by the Initial Developer are Copyright (C) 1999-2003
- the Initial Developer. All Rights Reserved.
-
- Contributor(s):
-
- Alternatively, the contents of this file may be used under the terms of
- either the GNU General Public License Version 2 or later (the "GPL"), or
- the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
- in which case the provisions of the GPL or the LGPL are applicable instead
- of those above. If you wish to allow use of your version of this file only
- under the terms of either the GPL or the LGPL, and not to allow others to
- use your version of this file under the terms of the MPL, indicate your
- decision by deleting the provisions above and replace them with the notice
- and other provisions required by the LGPL or the GPL. If you do not delete
- the provisions above, a recipient may use your version of this file under
- the terms of any one of the MPL, the GPL or the LGPL.
-
- ***** END LICENSE BLOCK ***** -->