1<?php 2/************************************************************************************* 3 * ada.php 4 * ------- 5 * Author: Phil Thornley (tux@inmail.cz) 6 * Copyright: (c) 2004 Phil Thornley (http://www.sparksure.com) 7 * Release Version: 1.0.9.1 8 * Date Started: 2010/08/22 9 * 10 * SPARK language file for GeSHi. 11 * 12 * Created by modifying Ada file version 1.0.2 13 * Words are from SciTe configuration file 14 * 15 * CHANGES 16 * ------- 17 * 2010/08/28 (1.0.0) 18 * - First Release 19 * 20 * TODO (updated 2010/08/22) 21 * ------------------------- 22 * 23 ************************************************************************************* 24 * 25 * This file is part of GeSHi. 26 * 27 * GeSHi is free software; you can redistribute it and/or modify 28 * it under the terms of the GNU General Public License as published by 29 * the Free Software Foundation; either version 2 of the License, or 30 * (at your option) any later version. 31 * 32 * GeSHi is distributed in the hope that it will be useful, 33 * but WITHOUT ANY WARRANTY; without even the implied warranty of 34 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 35 * GNU General Public License for more details. 36 * 37 * You should have received a copy of the GNU General Public License 38 * along with GeSHi; if not, write to the Free Software 39 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 40 * 41 ************************************************************************************/ 42 43$language_data = array ( 44 'LANG_NAME' => 'SPARK', 45 'COMMENT_SINGLE' => array(1 => '--', 2 => '--#'), 46 'COMMENT_MULTI' => array('/*' => '*/'), 47 'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE, 48 'QUOTEMARKS' => array('"'), 49 'ESCAPE_CHAR' => '\\', 50 'KEYWORDS' => array( 51 1 => array( 52 'begin', 'declare', 'do', 'else', 'elsif', 'exception', 'for', 'if', 53 'is', 'loop', 'while', 'then', 'end', 'select', 'case', 'until', 54 'goto', 'return' 55 ), 56 2 => array( 57 'abs', 'and', 'at', 'mod', 'not', 'or', 'rem', 'xor' 58 ), 59 3 => array( 60 'abort', 'abstract', 'accept', 'access', 'aliased', 'all', 'array', 61 'body', 'constant', 'delay', 'delta', 'digits', 'entry', 'exit', 62 'function', 'generic', 'in', 'interface', 'limited', 'new', 'null', 63 'of', 'others', 'out', 'overriding', 'package', 'pragma', 'private', 64 'procedure', 'protected', 'raise', 'range', 'record', 'renames', 65 'requeue', 'reverse', 'separate', 'subtype', 'synchronized', 66 'tagged', 'task', 'terminate', 'type', 'use', 'when', 'with' 67 ) 68 ), 69 'SYMBOLS' => array( 70 '(', ')' 71 ), 72 'CASE_SENSITIVE' => array( 73 GESHI_COMMENTS => false, 74 1 => false, 75 2 => false, 76 3 => false, 77 ), 78 'STYLES' => array( 79 'KEYWORDS' => array( 80 1 => 'color: #00007f;', 81 2 => 'color: #0000ff;', 82 3 => 'color: #46aa03; font-weight:bold;', 83 ), 84 'BRACKETS' => array( 85 0 => 'color: #66cc66;' 86 ), 87 'COMMENTS' => array( 88 1 => 'color: #adadad; font-style: italic;', 89 2 => 'color: #adadad; font-style: italic; font-weight: bold;' 90 ), 91 'ESCAPE_CHAR' => array( 92 0 => 'color: #000099; font-weight: bold;' 93 ), 94 'STRINGS' => array( 95 0 => 'color: #7f007f;' 96 ), 97 'NUMBERS' => array( 98 0 => 'color: #ff0000;' 99 ), 100 'METHODS' => array( 101 1 => 'color: #202020;' 102 ), 103 'SYMBOLS' => array( 104 0 => 'color: #66cc66;' 105 ), 106 'REGEXPS' => array( 107 ), 108 'SCRIPT' => array( 109 ) 110 ), 111 'URLS' => array( 112 1 => '', 113 2 => '', 114 3 => '' 115 ), 116 'OOLANG' => true, 117 'OBJECT_SPLITTERS' => array( 118 1 => '.' 119 ), 120 'REGEXPS' => array( 121 ), 122 'STRICT_MODE_APPLIES' => GESHI_NEVER, 123 'SCRIPT_DELIMITERS' => array( 124 ), 125 'HIGHLIGHT_STRICT_BLOCK' => array( 126 ) 127); 128