-- File: CESDictDataDefs.Mesa
-- Last Edit: S.Umehara for OIS to CES conversion, 7-Jun-84 2:56:48 PDT
DIRECTORY
CharDefs USING [Char, Code];
CESDictDataDefs: DEFINITIONS =
BEGIN
OPEN CharDefs;
-- TYPEs
Jtext: TYPE = MACHINE DEPENDENT RECORD [
jchr: ARRAY [0..25] OF CARDINAL];
KanjiCodeset: TYPE = {OIS, CES}; -- CES position was replaced from JDS
KanaCodeset: TYPE = {PhonicCodes, unused1};
Entry: TYPE = MACHINE DEPENDENT RECORD [
kana: PACKED ARRAY [0..13] OF Code,
kanji: ARRAY [0..6] OF Char,
pos: [0..377B],
cat: [0..377B],
freq: [0..377B],
notdel: BOOLEAN ← TRUE,
notMarked: BOOLEAN ← TRUE,
kanjiCodeSet: KanjiCodeset ← CES,
kanaCodeSet: KanaCodeset ← PhonicCodes,
logicalDict: [0..15] ← 0B];
-- Variable declarations
DictWordsPerEntry: CARDINAL = 16;
DictBytesPerEntry: CARDINAL = 32;
CESDEL: Char = [41B, 174B]; -- heavy center dot character: [20B, 364B]/OIS
CESCR: Char = [0, 15B];
CESSPACE: Char = [0, 40B];
CESMARK: Char = [41B, 172B]; -- BlackStar: [20B, 363B]/OIS
END.
LOG
Nagata: OISDictDataDefs.Mesa, December 14, 1981 9:35 AM