1 /* BEGIN INCLUDE FILE  ... probe_lang_types.incl.pl1
 2 
 3    JRD 26 June 79
 4    MBW 31 July 1981 to add algol68 */
 5 
 6 
 7 /****^  HISTORY COMMENTS:
 8   1) change(88-09-20,WAAnderson), approve(88-09-20,MCR7952),
 9      audit(88-09-30,JRGray), install(88-10-24,MR12.2-1184):
10      Added C Language type.
11                                                    END HISTORY COMMENTS */
12 
13 
14 /*   Modified June 83 JMAthane to add PASCAL language type */
15 /*   Modified April 88 Hinatsu to add C language type */
16 
17      dcl     (UNKNOWN_lang_type     init (1),
18              OTHER_lang_type        init (2),
19              PL1_lang_type          init (3),
20              FORTRAN_lang_type      init (4),
21              COBOL_lang_type        init (5),
22              ALM_lang_type          init (6),
23              ALGOL68_lang_type      init (7),
24              PASCAL_lang_type       init (8),
25              C_lang_type            init (9)) fixed bin internal static options (constant);
26 
27      dcl     official_language_names (9) char (32) internal static options (constant) init
28                                     ("Unknown", "other", "PL/I", "FORTRAN", "COBOL", "ALM", "Algol 68", "Pascal", "C");
29 
30      dcl     palatable_language_names (9) char (32) internal static options (constant) init
31                                     ("Unknown", "Other", "pl1", "fortran", "cobol", "alm", "algol68", "pascal", "c");
32 
33 /* END INCLUDE FILE ... probe_lang_types.incl.pl1 */