/* testing file by Hussam Mousa
multiple lin
comment */

function CheckOutput (in : Integer x , real z	;	out : boolean YEPPES)

 x:= 9 + 17.4 - x;

 y <= true or false

[]

 y < not y and false

 CHAR p= 'l           // wrong characters

 hussam and _mohsen or 123mohammed     //two wrong identifiers

x=  / .4

x= 4. *  0.9

'\t' and '\n' '\\' '\0' '\''  '\"'

 m := '\m'     //wrong escape sequence

 if (x<>y) then 

   return 'c'>"xxxx"

else          //single line comment;;//09

 while   y = 5.3 mod 12 do 

 end'
no.problem

 of array[9]

 p = " this is a wrong string

(* unterminated string *)

 function foo()
"illegal escaPES \r \v \t \; "
this_is_a_very_long_identifier_which_took_me_a_long_time_to_write_and_I_think_will_crash_many_projects

'andthisshouldreportanderror'

this+is-ok