gcc/testsuite/gm2/pim/fail/inserttok.def

   1 DEFINITION MODULE inserttok ;
   2
   3 (* Just filling the token buffer up *)
   4 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
   5 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
   6 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
   7 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
   8 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
   9 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
  10 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
  11 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
  12 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
  13 VAR VAR VAR VAR VAR VAR VAR VAR VAR VAR
  14 VAR VAR VAR VAR VAR VAR VAR VAR VAR
  15
  16 (* Intentional misspelled VAR keyword *)
  17 PROCEDURE whatever (VAT s: ARRAY OF CHAR) : CARDINAL;
  18
  19 END inserttok.