PROGRAM TEST
REAL(8),POINTER :: Table(:)
REAL(8) tbl_tmp(99)
ALLOCATE(Table(3))
tbl_tmp = 1.0
Table = tbl_tmp
......
WRITE(*,*) "Something here"
END PROGRAM TEST
当我尝试使用英特尔Fortran 2017编译器编译/运行旧代码时，我遇到了问题。上面的代码就是一个例子。我在旧的fortran来源中有这种情况。我知道代码写得不正确，但整个程序很大，所以我不想修改源代码。
以上示例在IVF2013中成功编译并运行，但在使用IVF2017时出现运行时错误。
ERROR: Unhandled exception at 0x77799AAA (ntdll.dll) in test1.exe: 0xC0000374: A heap has been corrupted (parameters: 0x777D58E8).
是否有任何IVF2017的编译器选项可以模仿IVF2013能够使用IVF2017成功运行上述代码？我真的不知道这里有什么问题，希望有人能给我这个见解。