1 /* BEGIN INCLUDE FILE ... probe_operators.incl.pl1 */
 2 
 3 
 4 
 5 /****^  HISTORY COMMENTS:
 6   1) change(88-09-20,WAAnderson), approve(88-09-20,MCR7952),
 7      audit(88-09-30,JRGray), install(88-10-24,MR12.2-1184):
 8      Added new C operators.
 9                                                    END HISTORY COMMENTS */
10 
11 
12 /* These are the operator.types for each defined operator */
13 /* Modified June 83 JMAthane for PASCAL_ARROW new operator */
14 /* Added PASCAL_RANGE and PASCAL_ASSIGN 07/26/83 S. Herbst */
15 /* Modified April 88 Hinatsu Addition of C types */
16 
17      dcl     (PLUS                  init ("400001"b3), MINUS init ("400002"b3),
18              TIMES                  init ("400003"b3), SLASH init ("400004"b3),
19              OR_BAR                 init ("400005"b3), NOT_SIGN init ("400006"b3),
20              LESS_THAN              init ("400007"b3), GREATER_THAN init ("400010"b3),
21              EQUALS                 init ("400011"b3), NOT_EQUALS init ("400012"b3),
22              NOT_GREATER_THAN       init ("400013"b3), NOT_LESS_THAN init ("400014"b3),
23              PERIOD                 init ("400015"b3), COLON init ("400016"b3),
24              AMPERSAND              init ("400017"b3), PERCENT init ("400020"b3),
25              DOLLAR_SIGN            init ("400021"b3), LEFT_BRACKET init ("400022"b3),
26              RIGHT_BRACKET          init ("400023"b3), ARROW init ("400024"b3),
27              COMMA                  init ("400025"b3), QUESTION_MARK init ("400026"b3),
28              PASCAL_ARROW           init ("400027"b3), PASCAL_RANGE init ("400030"b3),
29              PASCAL_ASSIGN          init ("400031"b3),
30 
31 /* Additons to support C types */
32              C_LEFT_SHIFT           init ("400032"b3), C_RIGHT_SHIFT init ("400033"b3),
33 
34 /* operator 28 are left for future expansion */
35 
36              LEFT_PAREN             init ("400035"b3), RIGHT_PAREN init ("400036"b3),
37              C_EQUAL                init ("400037"b3), C_NOT_EQUAL init ("400040"b3),
38              SEMI_COLON             init ("400041"b3), NEW_LINE init ("400042"b3),
39              C_INDIRECTION          init ("400034"b3)
40 
41              )                      bit (18) aligned internal static options (constant);
42 
43      dcl     OPERATOR_VALUES        (0:34) char (4) varying internal static options (constant) init
44                                     ("????", "+", "-", "*", "/", "|", "^", "<",
45                                     ">", "=", "^=", "<=", ">=", ".", ":", "&",
46                                     "%", "$", "[", "]", "->", ",", "?", "^",
47                                     "..", ":=", "<<", ">>", "*", "(", ")",
48                                     "==", "!=", ";","
49 ");
50 
51 /* END INCLUDE FILE ... probe_operators.incl.pl1 */