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