Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
Announcements
FPGA community forums and blogs on community.intel.com are migrating to the new Altera Community and are read-only. For urgent support needs during this transition, please visit the FPGA Design Resources page or contact an Altera Authorized Distributor.
29280 Discussions

Checking values of the function returning the link to a file

postaquestion
Novice
404 Views

At work with a debugger it is impossible to check values of the function
returning the link to a file of variables of any type.

The example belowmentions the link to a file is returned with function TEST1. If to stop at debugging in the given function value of her cannot be checked. It is desirable to correct this position.


MODULE NNN
CONTAINS
FUNCTION TEST1(C)
REAL*8, POINTER :: TEST1(:)
REAL*8 C(:)
INTEGER IKL
IKL=SIZE(C)-10
ALLOCATE (TEST1(IKL))
TEST1=10
END FUNCTION TEST1
END MODULE NNN
PROGRAM TEST
USE NNN
REAL*8 , POINTER :: TTT(:)
REAL*8 , POINTER :: RRR(:)
ALLOCATE (RRR(100))
RRR=100.D00
TTT=> TEST1(RRR)
END PROGRAM

0 Kudos
0 Replies
Reply