From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Fri, 22 Dec 2006 20:52:35 +0000 Subject: 20060303-partial --- module/translate.m | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 module/translate.m (limited to 'module/translate.m') diff --git a/module/translate.m b/module/translate.m new file mode 100644 index 00000000..786fb8ee --- /dev/null +++ b/module/translate.m @@ -0,0 +1,30 @@ +# +# Copyright © 2000 Vita Nuova Limited +# +Translate: module +{ + PATH: con "/dis/lib/translate.dis"; + + Dict: adt { + texts: array of list of ref Phrase; + notes: array of list of ref Phrase; + + new: fn(): ref Dict; + add: fn(d: self ref Dict, file: string): string; + xlate: fn(d: self ref Dict, nil: string): string; + xlaten: fn(d: self ref Dict, nil: string, note: string): string; + }; + + Phrase: adt { + key: string; + text: string; # nil for a note + hash: int; + n: int; + note: int; + }; + + init: fn(); + opendict: fn(file: string): (ref Dict, string); + opendicts: fn(files: list of string): (ref Dict, string); + mkdictname: fn(locale, app: string): string; +}; -- cgit v1.2.3