dim s1 as string * 9999999
dim s2 as zstring * 9999999
dim s3 as wstring * 9999999

#print -------
type UDT
	i(0 to 9999999) as integer
end type
dim x as UDT

#print -------
dim array1(0 to 9999999) as byte
dim array2(0 to 9999999) as integer
