1

(* Test whether the keyword XXXX may be used as an identifier for:

     2

 * enumeration value

     3

 *

     4

 * The XXXX names in the following code are merely a placeholder.

     5

 * They will be replaced by several identifiers before actual testing

     6

 * of the compiler.

     7

 *)

     8

     9

(* The identifiers that will replace the XXXX

    10

 * must be placed on a line starting with #

    11

 * All identifiers preceded by # are ignored!

    12

 * The identifier list must be placed inside an IEC 61131-3 comment.

    13

 *)

    14

(*

    15

#IL_operators ANDN CAL CALC CALCN CD CLK CU IN JMP JMPC JMPCN LD LDN ORN PT PV R R1 RET RETC RETCN S S1 ST STN XORN

    16

#SFC_qualifiers D DS L N P #R #S SD SL

    17

     NOTE: R and S are identical to IL operators!!

    18

#Task_initialisers PRIORITY SINGLE INTERVAL

    19

*)

    20

    21

    22

    23

    24

TYPE

    25

 enum_type00 : (enum_v1, XXXX, enum_v2) := XXXX;

    26

END_TYPE

    27

    28

TYPE

    29

 enum_type01 : (XXXX, enum_v2) := XXXX;

    30

END_TYPE

    31

    32

TYPE

    33

 enum_type02 : (enum_v1, XXXX) := XXXX;

    34

END_TYPE

    35

    36

TYPE

    37

 enum_type03 : (XXXX) := XXXX;

    38

END_TYPE

    39

    40

    41

    42

    43

function foo : int

    44

 var_input

    45

  a_1, b_1: int;

    46

 end_var

    47

 var

    48

  c_1, d_1: enum_type00;

    49

 end_var

    50

  c_1 := enum_type00#XXXX;

    51

  c_1 := XXXX;

    52

end_function

    53

    54

    55

    56

(* Checking whether the use of XXXX will confuse any other

    57

 * normal and correct IL or ST code.

    58

 *)

    59

{#include "basic_code.test" }

    60