VF6.6C optimization problem

[jzlam]

I migrated from VF 6.5 to 6.6C and I have next program

program aa
integer*4 ix,iy,iret
interface
integer*4 function itst(ix,iy)
integer*4 ix,iy
end function
end interface

ix=1
iy=2
iret=itst(ix,iy)

end program aa

in other file is routine (must be in other file)

recursive integer*4 function itst(ix,iy)
use dfwinty
use user32
use test
integer*4 ix,iy,iret
type (T_RECT) rect
type (T_POINT) point
point.x=ix
point.y=iy
rect.bottom=1

iret=ptinrect(rect,point)
itst=iret
return
end

when I turn on optimizations (do not matter which) then on line

rect.bottom=1 is changed also point.y to 1. It seems that point and rect.right and bottom share the same memory.

Does anybody know how to solve this problem

Thanks Jakub Zlamal