1 /* BEGIN INCLUDE FILE linus_lila_tokens.incl.pl1 */
 2 
 3 
 4 /****^  HISTORY COMMENTS:
 5   1) change(86-04-23,Dupuis), approve(86-05-23,MCR7188), audit(86-07-23,GWMay),
 6      install(86-07-29,MR12.0-1106):
 7      This comment is to cover the 12/27/84 Mathew Pierret change.
 8                                                    END HISTORY COMMENTS */
 9 
10 /* DESCRIPTION:
11 
12    linus_lila_tokens contains the values of the tokens in the lila
13    editor.  This structure is used in linus_lila_tokens.cds so that
14    token values are referenced through cells in the linus_lila_tokens
15    object segment, for example, linus_lila_tokens$from, rather than
16    directly referenceing the token value, for example, "from".
17    This is so that token values can easily be replaced, say from English
18    language tokens to French tokens.
19 */
20 
21 /* HISTORY:
22 Written by Mathew Pierret, 12/27/84.
23 Modified:
24 */
25 
26 /* format: style2,ind3 */
27      dcl     (
28              LINUS_LILA_TOKENS_VERSION_1
29                                     init ("LLTokn 1"),
30              LINUS_LILA_TOKENS_LANGUAGE_ENGLISH
31                                     init ("English ")
32              )                      char (8) aligned internal static options (constant);
33 
34      dcl     1 linus_lila_tokens    aligned based,
35                2 version            char (8) aligned,
36                2 language           char (8) aligned,
37                2 first_chars        char (32) varying,
38                2 differ             char (32) varying,
39                2 dup                char (32) varying,
40                2 from               char (32) varying,
41                2 inter              char (32) varying,
42                2 select             char (32) varying,
43                2 union              char (32) varying,
44                2 unique             char (32) varying,
45                2 where              char (32) varying;
46 
47 /* END INCLUDE FILE linus_lila_tokens.incl.pl1 */