[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference turris::fortran

Title:Digital Fortran
Notice:Read notes 1.* for important information
Moderator:QUARK::LIONEL
Created:Thu Jun 01 1995
Last Modified:Fri Jun 06 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:1333
Total number of notes:6734

1182.0. "dfvv - intfunarg error on LOC" by CSC32::J_HENSON (Don't get even, get ahead!) Tue Feb 18 1997 15:45

DFVV V6.4-165, ovms v6.2

Can someone explain why this code generates a

%fort-e-intfunarg,...

error?

I can't find any reference to an intrinsic function named LOC.

If I remove the implicit none statement, it compiles cleanly.

Thanks,

Jerry

==============================================================================

	program main
	implicit none
	external ss$_normal
	integer*4	xloc,loc
	xloc = loc(ss$_normal)
	end
T.RTitleUserPersonal
Name		DateLines
1182.1Are you sure it's not %loc?HYDRA::NEWMANChuck Newman, 508/467-5499 (DTN 297), MRO1-3/F26Tue Feb 18 1997 16:476
	program main
	implicit none
	external ss$_normal
	integer*4	xloc
	xloc = %loc(ss$_normal)
	end
1182.2QUARK::LIONELFree advice is worth every centTue Feb 18 1997 20:384
    LOC is a synonym for %LOC - we added it for UNIX compatibility.
    I'll take a look at it.
    
    			Steve
1182.3QUARK::LIONELFree advice is worth every centWed Feb 19 1997 11:373
It's a bug.  Use %LOC instead as a workaround.  Fixed in edit level 189.

				Steve