man(1) Manual page archive


     TRANSLATE(2)                                         TRANSLATE(2)

     NAME
          translate: opendict, opendicts, mkdictname - translation
          dictionaries

     SYNOPSIS
          include "translate.m";
          translate := load Translate Translate->PATH;

          Dict: adt {
              new:    fn(): ref Dict;
              add:    fn(d: self ref Dict, file: string): string;
              xlate:  fn(d: self ref Dict, s: string): string;
              xlaten: fn(d: self ref Dict, s: string, note: string): string;
          };

          init:       fn();
          opendict:   fn(file: string): (ref Dict, string);
          opendicts:  fn(files: list of string): (ref Dict, string);
          mkdictname: fn(locale, app: string): string;

     DESCRIPTION
          The Translate module provides access to the translation dic-
          tionaries defined by translate(6), intended for the transla-
          tion of text from one natural language to another.

          Init should be called before using any of these functions.

          Opendict opens a dictionary file (of the format defined
          below) and returns a tuple: a reference to a Dict that rep-
          resents it and a diagnostic string (which is nil if no error
          occurred).  Opendicts is similar, but loads each of the
          files in turn into the same Dict, producing a composite dic-
          tionary in which translations in later files can override
          translations in earlier ones; the diagnostic string sum-
          marises all errors (if any).

          Mkdictname returns the conventional name of a dictionary
          file given locale and application names.  The locale is nor-
          mally nil to use the current locale, which is formed by
          binding the desired locale directory (or directories) onto
          /lib/locale.

          Dict.new returns an empty dictionary.  Dict.add loads the
          given dictionary file into an existing dictionary, returning
          a non-nil diagnostic string on error.  Translations are made
          by Dict.xlate and Dict.xlaten: they look for a string s (eg,
          text in one language), optionally qualified by a note, and
          return the corresponding translation text from the dictio-
          nary.  If no such translation exists, they return the origi-
          nal text s.

     TRANSLATE(2)                                         TRANSLATE(2)

     EXAMPLE
          The following shows one possible style of use:

          include "translate.m";
              translate: Translate;
              Dict: import translate;

          dict: ref Dict;

          X(s: string): string
          {
              if(dict == nil)
                  return s;
              return dict.xlate(s);
          }

          init(ctxt: ref Draw->Context, args: list of string)
          {
              ...
              translate = load Translate Translate->PATH;
              if(translate != nil){
                  translate->init();
                  (dict, nil) = translate->opendict(
                              translate->mkdictname("", "vmail"));
              }
              ...
              optioncfg := array [] of {
                  "frame .op -relief flat -borderwidth 8",
                  "frame .op.lbs",
                  "label .op.lbs.a -text {" +
                      X("Voice Mail Active") + ":}",
                  "label .op.lbs.g -text {" +
                      X("Answer Calls With") + ":}",
                  "label .op.lbs.r -text {" +
                      X("Rings before Answering") + ":}",
                  "label .op.lbs.l -text {" +
                      X("Length of Incoming Messages") + ":}}",
                  ...
              };
              ...
              wmlib->tkcmds(top, optioncfg);
          }

          The intermediate function X is defined to allow the program
          to be used (albeit with text in English) even when the
          Translate module cannot be loaded.

     FILES
          /locale/locale/dict/app

     SOURCE
          /appl/lib/translate.b

     TRANSLATE(2)                                         TRANSLATE(2)

     SEE ALSO
          translate(6)