00001 <?php
00002 $BEAUT_PATH = realpath(".")."/syntax_highlight/php";
00003 if (!isset ($BEAUT_PATH)) return;
00004 require_once("$BEAUT_PATH/Beautifier/HFile.php");
00005 class HFile_rebol extends HFile{
00006 function HFile_rebol(){
00007 $this->HFile();
00008
00009
00010
00011
00012
00013
00014 $this->nocase = "1";
00015 $this->notrim = "0";
00016 $this->perl = "0";
00017
00018
00019
00020 $this->colours = array("blue", "purple", "gray");
00021 $this->quotecolour = "blue";
00022 $this->blockcommentcolour = "green";
00023 $this->linecommentcolour = "green";
00024
00025
00026
00027 $this->indent = array("[");
00028 $this->unindent = array("]");
00029
00030
00031
00032 $this->stringchars = array("\"", "'");
00033 $this->delimiters = array("~", "@", "%", "^", "&", "*", "(", ")", "+", "=", "|", "\\", "/", "{", "}", "[", "]", ":", ";", "\"", "'", "<", ">", " ", ",", " ", ".");
00034 $this->escchar = "";
00035
00036
00037
00038 $this->linecommenton = array(";");
00039 $this->blockcommenton = array("");
00040 $this->blockcommentoff = array("");
00041
00042
00043
00044 $this->keywords = array(
00045 "about" => "1",
00046 "absolute" => "1",
00047 "add" => "1",
00048 "alias" => "1",
00049 "all" => "1",
00050 "and" => "1",
00051 "any" => "1",
00052 "append" => "1",
00053 "arccosine" => "1",
00054 "arcsine" => "1",
00055 "arctangent" => "1",
00056 "array" => "1",
00057 "ask" => "1",
00058 "at" => "1",
00059 "back" => "1",
00060 "break" => "1",
00061 "bind" => "1",
00062 "catch" => "1",
00063 "change" => "1",
00064 "change-dir" => "1",
00065 "charset" => "1",
00066 "checksum" => "1",
00067 "clear" => "1",
00068 "close" => "1",
00069 "comment" => "1",
00070 "complement" => "1",
00071 "compress" => "1",
00072 "confirm" => "1",
00073 "copy" => "1",
00074 "cosine" => "1",
00075 "debase" => "1",
00076 "decompress" => "1",
00077 "dehex" => "1",
00078 "delete" => "1",
00079 "detab" => "1",
00080 "disarm" => "1",
00081 "divide" => "1",
00082 "do" => "1",
00083 "echo" => "1",
00084 "either" => "1",
00085 "enbase" => "1",
00086 "entab" => "1",
00087 "exit" => "1",
00088 "exp" => "1",
00089 "false" => "1",
00090 "fifth" => "1",
00091 "find" => "1",
00092 "first" => "1",
00093 "for" => "1",
00094 "forall" => "1",
00095 "foreach" => "1",
00096 "form" => "1",
00097 "forskip" => "1",
00098 "fourth" => "1",
00099 "func" => "1",
00100 "function" => "1",
00101 "get" => "1",
00102 "halt" => "1",
00103 "head" => "1",
00104 "help" => "1",
00105 "if" => "1",
00106 "in" => "1",
00107 "input" => "1",
00108 "insert" => "1",
00109 "intersect" => "1",
00110 "join" => "1",
00111 "last" => "1",
00112 "less" => "1",
00113 "third" => "1",
00114 "throw" => "1",
00115 "to-binary" => "1",
00116 "to-bitset" => "1",
00117 "to-block" => "1",
00118 "to-char" => "1",
00119 "to-date" => "1",
00120 "to-decimal" => "1",
00121 "to-email" => "1",
00122 "to-file" => "1",
00123 "to-get-word" => "1",
00124 "to-hash" => "1",
00125 "to-hex" => "1",
00126 "to-idate" => "1",
00127 "to-integer" => "1",
00128 "to-issue" => "1",
00129 "to-list" => "1",
00130 "to-lit-word" => "1",
00131 "to-logic" => "1",
00132 "to-money" => "1",
00133 "to-none" => "1",
00134 "to-paren" => "1",
00135 "to-refinement" => "1",
00136 "to-set-path" => "1",
00137 "to-set-word" => "1",
00138 "to-string" => "1",
00139 "to-tag" => "1",
00140 "to-time" => "1",
00141 "to-tuple" => "1",
00142 "to-url" => "1",
00143 "to-word" => "1",
00144 "trace" => "1",
00145 "trim" => "1",
00146 "true" => "1",
00147 "try" => "1",
00148 "union" => "1",
00149 "unset" => "1",
00150 "until" => "1",
00151 "update" => "1",
00152 "uppercase" => "1",
00153 "usage" => "1",
00154 "use" => "1",
00155 "wait" => "1",
00156 "what" => "1",
00157 "what-dir" => "1",
00158 "while" => "1",
00159 "write" => "1",
00160 "xor" => "1",
00161 "yes" => "1",
00162 "any-block!" => "2",
00163 "any-function!" => "2",
00164 "any-string!" => "2",
00165 "any-type!" => "2",
00166 "any-word!" => "2",
00167 "binary!" => "2",
00168 "bitset!" => "2",
00169 "block!" => "2",
00170 "char!" => "2",
00171 "datatype!" => "2",
00172 "date!" => "2",
00173 "decimal!" => "2",
00174 "email!" => "2",
00175 "error!" => "2",
00176 "file!" => "2",
00177 "function!" => "2",
00178 "get-word!" => "2",
00179 "hash!" => "2",
00180 "integer!" => "2",
00181 "issue!" => "2",
00182 "time!" => "2",
00183 "tuple!" => "2",
00184 "url!" => "2",
00185 "word!" => "2",
00186 "any-block?" => "3",
00187 "any-function?" => "3",
00188 "any-string?" => "3",
00189 "any-type?" => "3",
00190 "any-word?" => "3",
00191 "binary?" => "3",
00192 "bitset?" => "3",
00193 "block?" => "3",
00194 "char?" => "3",
00195 "datatype?" => "3",
00196 "date?" => "3",
00197 "decimal?" => "3",
00198 "dir?" => "3",
00199 "email?" => "3",
00200 "empty?" => "3",
00201 "equal?" => "3",
00202 "error?" => "3",
00203 "even?" => "3",
00204 "exists?" => "3",
00205 "file?" => "3",
00206 "found?" => "3",
00207 "function?" => "3",
00208 "get-word?" => "3",
00209 "greater?" => "3",
00210 "greater-or-equal?" => "3",
00211 "hash?" => "3",
00212 "head?" => "3",
00213 "index?" => "3",
00214 "info?" => "3",
00215 "input?" => "3",
00216 "integer?" => "3",
00217 "issue?" => "3",
00218 "length?" => "3",
00219 "time?" => "3",
00220 "tuple?" => "3",
00221 "type?" => "3",
00222 "unset?" => "3",
00223 "url?" => "3",
00224 "value?" => "3",
00225 "word?" => "3",
00226 "zero?" => "3");
00227
00228
00229
00230
00231
00232
00233
00234
00235 $this->linkscripts = array(
00236 "1" => "donothing",
00237 "2" => "donothing",
00238 "3" => "donothing");
00239 }
00240
00241
00242 function donothing($keywordin)
00243 {
00244 return $keywordin;
00245 }
00246
00247 }?>