Mercurial Mercurial > matiec / file revision
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
tests/syntax/enumeration/enumerationvalue.txt
author Mario de Sousa <msousa@fe.up.pt>
Wed, 13 Feb 2019 14:40:26 +0000
changeset 1087 d9e47e018320
parent 109 3af0b849b9c6
permissions -rwxr-xr-x
add default NULL value to references (as suggested by anonymous in issue 62)
(Not really needed, but it is good practise...) 



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

TYPE
 enum_type01 : (XXXX, enum_v2) := XXXX;
END_TYPE

TYPE
 enum_type02 : (enum_v1, XXXX) := XXXX;
END_TYPE

TYPE
 enum_type03 : (XXXX) := XXXX;
END_TYPE




function foo : int
 var_input
  a_1, b_1: int;
 end_var
 var
  c_1, d_1: enum_type00;
(*
  enum_v1 : enum_type00;
*)
 end_var
  c_1 := enum_type00#XXXX;
  c_1 := XXXX;
  c_1 := enum_v1;
(*
  enum_v1 := enum_v1;
*)
end_function
matiec