topic Re: Run Time Breakpoint for Simple Code in Intel® Fortran Compiler

Run Time Breakpoint for Simple Code

preshenne — Thu, 13 Jan 2022 05:03:48 GMT

Migrating to 2021.4 from Intel Fortran circa 2015. Very simple code now generating a runtime breakpoint at a simple read statement:

Debug Assertion Failed!

Program: C:\IFortran\HWG\HNEWWING\x64\Debug\HNEWWING.exe
File: minkernel\crts\ucrt\inc\corecrt_internal_string_templates.h
Line: 218

Expression: (L"Buffer is too small" && 0)

For information on how your program can cause an assertion
failure, see the Visual C++ documentation on asserts.

(Press Retry to debug the application)
HNEWWING.exe has triggered a breakpoint.

Code:

WRITE(*,'(A\)') ' ENTER INPUT GEOMETRY filename.ext '
READ(*,'(A)') FNMI
WRITE(*,'(A\)') ' ENTER OUTPUT GEOMETRY filename (NO .EXT) '
READ(*,'(A)') FNMOO

Fails at first READ

Clueless as to why this fails now. I must have something wrong in the new environment

Re: Run Time Breakpoint for Simple Code

DavidWhite — Thu, 13 Jan 2022 05:45:00 GMT

Can you please supply the rest of the code, e.g. definitions of variables in use.

Re: Run Time Breakpoint for Simple Code

preshenne — Thu, 13 Jan 2022 13:19:12 GMT

Hi David -

Thanks for the quick reply. I have attached the six routines that are the entire program. If you would like a sample input file, I can send one of those too. My breakpoint comes before that even gets opened. It comes on the file name read.

Thanks for your help.

Pres Henne

Re: Run Time Breakpoint for Simple Code

mecej4 — Thu, 13 Jan 2022 14:31:43 GMT

You did not provide the include file BAS.CMN. Yes, the input data files should be provided, since without them the program cannot be run.

Two comments:

You use unit 5 to read from the data file. This may cause problems since unit 5 is typically connected to standard input (used to be card reader or terminal keyboard).
The argument to subroutine DATES should be CHARACTER(8). In the caller, however, the actual argument CREATD has the implicit type REAL.

Re: Run Time Breakpoint for Simple Code

preshenne — Thu, 13 Jan 2022 14:50:52 GMT

Hi mecej4 -

Thanks for the note.

The "BAS.CMN" file is here:

COMMON/BAS/ X(601,203),Y(601,203),Z(601,203),NC,NS,TITLE(20),
1 SRO2,CR,XR,YR,ZR,BO2,CREATD
CHARACTER*4 TITLE
CHARACTER*8 CREATD

I have attached a sample input file..."TEST3C.TXT"

Thanks for your help.

Pres Henne

Re: Run Time Breakpoint for Simple Code

preshenne — Thu, 13 Jan 2022 15:05:26 GMT

Keyboard entries to run:

"TEST3C.TXT"

"TEST3C"

"TEST INTEL"

"Y"

"1"

"129"

Re: Run Time Breakpoint for Simple Code

mecej4 — Thu, 13 Jan 2022 15:16:07 GMT

I see that this is a QuickWin program, which I am not familiar with. Someone else will probably help you.

After changing IFWIN to DFWIN, etc., in the USE statements, I built and ran the program with CVF 6.6, and it ran to completion, producing a HWG file.

With the Intel compiler, however, the program closed the window and crashed as soon as I entered the name of the input data file. Is that what you experienced, too?

Re: Run Time Breakpoint for Simple Code

preshenne — Thu, 13 Jan 2022 15:23:31 GMT

Yes - that is the same crash. Thank you for doing that.

If you debug that crash, do you get to "C++ assertion" verbage? Why would I be invoking C++? I wouldn't know a C++ if it walked up and bit me.!

I wonder if something has changed in the fortran standard for the "A" format??

Pres Henne

Re: Run Time Breakpoint for Simple Code

mecej4 — Thu, 13 Jan 2022 21:43:39 GMT

The Fortran compiler generates code that uses some of the same runtime routines as the Visual C compiler. The compiler developers are best equipped to debug the code produced by their compiler at the assembler or C runtime level.

I attach a Zip file with a character I/O version of your program. It runs normally when compiled with the Intel compiler (with one bug if compiled into a 32-bit EXE, an error occurs when a STOP statement is executed).

Since both the character I/O version runs fine with CVF and Ifort, and the Quickwin version runs fine with CVF, I suspect a bug in the Quick Windows library of Ifort.

Re: Run Time Breakpoint for Simple Code

IanH — Thu, 13 Jan 2022 21:06:30 GMT

https://community.intel.com/t5/Intel-Fortran-Compiler/READ-a-error/td-p/1340829 may be relevant.

Re: Run Time Breakpoint for Simple Code

preshenne — Fri, 14 Jan 2022 03:28:28 GMT

Wow -thank you for the note IanH. Its the same error, and remains unfixed in Intel Fortran Classic 2021.4 and subs. This renders these compilers unusable. They should be recalled. What was the testing protocol (or lack thereof) that missed this simple READ error??? Maybe its time to move away from Intel Fortran Compilers.

Re: Run Time Breakpoint for Simple Code

preshenne — Mon, 17 Jan 2022 14:20:27 GMT

Unfortunately, this problem and :

https://community.intel.com/t5/Intel-Fortran-Compiler/READ-a-error/td-p/1340829

referenced in this string are the same problem and are unresolved. No communication from Intel. Very disappointing.

Re: Run Time Breakpoint for Simple Code

Steve_Lionel — Mon, 17 Jan 2022 18:30:02 GMT

Intel did respond. Solved: Re: READ(*,'(a)') error - Intel Communities

Re: Run Time Breakpoint for Simple Code

preshenne — Tue, 18 Jan 2022 05:54:13 GMT

I stand corrected. Someone from Intel said: "This issue was escalated to compiler engineering for a fix. I can't say how soon it will be fixed. " a month ago.

Still no fix that I can tell.

Re: Run Time Breakpoint for Simple Code

Steve_Lionel — Tue, 18 Jan 2022 14:43:45 GMT

Unfortunately, fixes take a long time to appear, for various reasons. If you have paid support, you could ask for a "hotfix" replacement QuickWin library.