Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!uwm.edu!linac!mp.cs.niu.edu!ux1.cso.uiuc.edu!news.iastate.edu!IASTATE.EDU!keinert
From: keinert@IASTATE.EDU (Keinert Fritz)
Newsgroups: comp.lang.fortran
Subject: pointers in MIPS Fortran?
Message-ID: <1991May15.162734@IASTATE.EDU>
Date: 15 May 91 21:27:34 GMT
Sender: news@news.iastate.edu (USENET News System)
Reply-To: keinert@IASTATE.EDU (Keinert Fritz)
Organization: Iowa State University
Lines: 30

I ran across a piece of Fortran code that uses pointers. It compiles
on the DEC f77 version 2.1 compiler (for MIPS-based DEC 2100), but
I could not find any documentation in the DEC f77 manual, nor in the
DEC VAX Fortran manual.

The declaration

	pointer (p, real)

or
	real x
	pointer  (p, x)

makes p a pointer to a real variable. You can do things like

	p = x

(p is now pointing to x),

	x = p

(assign to x the value of whatever p is pointing to), and so on.

Does anybody know where this is documented?

--
Fritz Keinert                             phone:  (515) 294-5128
Department of Mathematics                 fax:    (515) 294-5454
Iowa State University                     e-mail: keinert@iastate.edu
Ames, IA 50011