🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.fortran
Article #4579

Re: Structure and Data Statement Usage

#4579
From: Michael Lemke
Date: Fri, 08 Jan 1993 18:57
38 lines
1363 bytes
In article <7876@dove.nist.gov> fred@poly2.nist.gov (Frederick R. Phelan Jr.) writes:
>Heres a small code prototype of my problem:
>
>      program test_35
>
>      structure /geom/
>        integer ngprops
>      end structure
>      record /geom/ g1,g2
>
>c     uncomment these for compiler havoc
>c      data g1.ngprops /3/
>c      data g2.ngprops /5/
>
>c     these are ok when uncommented
>c     g1.ngprops=3
>c     g2.ngprops=5
>
[experiments deleted]
>
>How can you use structure variables in data statements?

You can't.  Sorry.

>
>PS: This is on a Silicon Graphics machine.
>
>PPS: Anyone care to comment on how common f77 extensions
>     like structures have become on other platforms? 

As far as I know STRUCTURE in the form you use it here is a VMS
invention, which is also found on Suns.  Cray doesn't have it.

Michael
-- 
Michael Lemke
Astronomy, UT Austin, Texas
(michael@io.as.utexas.edu or UTSPAN::UTADNX::IO::MICHAEL [SPAN])
Technical Details
Message-ID: <1993Jan8.185745.8391@chpc.utexas.edu>
Path: arc1-ca.pugleaf.net!sparky!uunet!cs.utexas.edu!hermes.chpc.utexas.edu!michael
References: <7876@dove.nist.gov>

Show Full Headers
Complete Article Headers
Newsgroups: comp.lang.fortran
Path: arc1-ca.pugleaf.net!sparky!uunet!cs.utexas.edu!hermes.chpc.utexas.edu!michael
From: michael@chpc.utexas.edu (Michael Lemke)
Subject: Re: Structure and Data Statement Usage
Message-ID: <1993Jan8.185745.8391@chpc.utexas.edu>
Organization: The University of Texas System - CHPC
References: <7876@dove.nist.gov>
Date: Fri, 8 Jan 93 18:57:45 GMT
Lines: 38