Path: utzoo!attcan!uunet!mcsun!hp4nl!charon!dik
From: dik@cwi.nl (Dik T. Winter)
Newsgroups: comp.lang.fortran
Subject: Re: Externals and Block Data
Message-ID: <2490@charon.cwi.nl>
Date: 7 Nov 90 01:59:36 GMT
References: <28325@shamash.cdc.com>
Sender: news@cwi.nl
Organization: CWI, Amsterdam
Lines: 20

In article <28325@shamash.cdc.com> ddh@dash.udev.cdc.com (Dan Horsfall) writes:
About a scheme that forces loading of a block data subprogram with most
linker/compiler versions.  But:
 >       SUBROUTINE INIT            <- the called routine need not have an
 >  [ or SUBROUTINE INIT() ]           argument, but could have one for 
 >  [ or SUBROUTINE INIT( BD ) ]       cosmetics, depending on your style
 >                                     requirements and compiler.
By all means: include the argument (although it is not used).  Without
argument it will fail on a number of platforms.  (Those where the linker
checks for argument conformance and argument count.  They do exist.)

I can still imagine platforms where this will fail:
1.  The compiler may decide a different naming convention targeted to the
    linker for the different types of subprograms.
2.  The compiler may decide not to include an entry point in the object code
    for a BLOCK DATA subprogram.
Both can constitute a valid implementation of Fortran 77.
--
dik t. winter, cwi, amsterdam, nederland
dik@cwi.nl