Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

obsolete file (Mac OS 9 / MPW) 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9599 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Damien Doligez 2010-01-29 08:14:38 +00:00
parent 2834a9aff3
commit 25070460f2
1 changed files with 0 additions and 121 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

121
tools/keywords.r
View File

@ -1,121 +0,0 @@
/***********************************************************************/
/* */
/* Objective Caml */
/* */
/* Damien Doligez, projet Para, INRIA Rocquencourt */
/* */
/* Copyright 1996 Institut National de Recherche en Informatique et */
/* en Automatique. All rights reserved. This file is distributed */
/* under the terms of the GNU Library General Public License, with */
/* the special exception on linking described in file ../LICENSE. */
/* */
/***********************************************************************/
/* $Id$ */
type 'Odds' {
longint; /* resource ID of corresponding 'Sods' */
longint = $$CountOf (suffixes);
wide array suffixes { pstring; };
};
type 'Sods' {
longint = 0xA5666D66;
pstring; /* default token breaks */
longint = $$CountOf (keywords);
wide array keywords {
pstring; /* the keyword itself */
longint /* the keyword type */
case=0,
caseWord=1,
noCase=2,
noCaseWord=3,
line=4,
mystery=0xB,
opening=0x10000,
closing=0x20000,
openingFill=0x50000,
closingFill=0x60000,
quote=0x80000;
literal longint; /* scoping parameter */
longint /* color */
red=0,
blue=1,
bluegreen=2,
bluepurple=3,
grey=4,
darkgreen=7,
black=255;
};
};
resource 'Odds' (26087, "O'Caml") {
26087,
{ ".ml", ".mli", ".mll", ".mly", ".mlp" }
};
resource 'Sods' (26087, "O'Caml Keywords") {
"\t\r\n ~!$%^&*()/-+=<>,[]{};",
{
"(*", openingFill, '(**)', red,
"*)", closingFill, '(**)', red,
"\"", quote, 0, grey,
#define KEY caseWord, 0, blue
"and", KEY,
"as", KEY,
"assert", KEY,
"begin", KEY,
"class", KEY,
"constraint", KEY,
"do", KEY,
"done", KEY,
"downto", KEY,
"else", KEY,
"end", KEY,
"exception", KEY,
"external", KEY,
"false", KEY,
"for", KEY,
"fun", KEY,
"function", KEY,
"functor", KEY,
"if", KEY,
"in", KEY,
"include", KEY,
"inherit", KEY,
"initializer", KEY,
"lazy", KEY,
"let", KEY,
"match", KEY,
"method", KEY,
"module", KEY,
"mutable", KEY,
"new", KEY,
"object", KEY,
"of", KEY,
"open", KEY,
"or", KEY,
"parser", KEY,
"private", KEY,
"rec", KEY,
"sig", KEY,
"struct", KEY,
"then", KEY,
"to", KEY,
"true", KEY,
"try", KEY,
"type", KEY,
"val", KEY,
"virtual", KEY,
"when", KEY,
"while", KEY,
"with", KEY,
"mod", KEY,
"land", KEY,
"lor", KEY,
"lxor", KEY,
"lsl", KEY,
"lsr", KEY,
"asr", KEY,
}
};