ack/lang/fortran/index

393 lines
14 KiB
Plaintext
Raw Permalink Normal View History

1991-10-07 16:35:03 +00:00
====== index for f2c ============
FILES:
f2c.h Include file necessary for compiling output of the converter.
See the second NOTE below.
f2c.1 Man page for f2c.
f2c.1t Source for f2c.1 (to be processed by troff -man or nroff -man).
libf77 Library of non I/O support routines the generated C may need.
Fortran main programs result in a C function named MAIN__ that
is meant to be invoked by the main() in libf77.
libi77 Library of Fortran I/O routines the generated C may need.
Note that some vendors (e.g., BSD, Sun and MIPS) provide a
libF77 and libI77 that are incompatible with f2c -- they
provide some differently named routines or routines with the
names that f2c expects, but with different calling sequences.
On such systems, the recommended procedure is to merge
libf77 and libi77 into a single library, say libf2c, to install
it where you can access it by specifying -lf2c , and to adjust
the definition of link_msg in sysdep.c appropriately.
f2c.ps Postscript for a technical report on f2c. After you strip the
mail header, the first line should be "%!PS".
fixes The complete change log, reporting bug fixes and other changes.
(Some recent change-log entries are given below).
fc A shell script that uses f2c and imitates much of the behavior
of commonly found f77 commands. You will almost certainly
need to adjust some of the shell-variable assignments to make
this script work on your system.
SUBDIRECTORY:
f2c/src Source for the converter itself, including a file of checksums
and source for a program to compute the checksums (to verify
correct transmission of the source), is available: ask netlib to
send all from f2c/src
If the checksums show damage to just a few source files, or if
the change log file (see "fixes" below) reports corrections to
some source files, you can request those files individually
"from f2c/src". For example, to get defs.h and xsum0.out, you
would ask netlib to
send defs.h xsum0.out from f2c/src
"all from f2c/src" is 649642 bytes long.
Tip: if asked to send over 99,000 bytes in one request, netlib
breaks the shipment into 1000 line pieces and sends each piece
separately (since otherwise some mailers might gag). To avoid
the hassle of reassembling the pieces, try to keep each request
under 99,000 bytes long. The final number in each line of
xsum0.out gives the length of each file in f2c/src. For
example,
send exec.c expr.c from f2c/src
send format.c format_data.c from f2c/src
will give you slightly less hassle than
send exec.c expr.c format.c format_data.c from f2c/src
If you have trouble generating gram.c, you can ask netlib to
send gram.c from f2c/src
Then `xsum gram.c` should report
gram.c efa337b3 57282
NOTE: For now, you may exercise f2c by sending netlib a message whose
first line is "execute f2c" and whose remaining lines are
the Fortran 77 source that you wish to have converted.
Return mail brings you the resulting C, with f2c's error
messages between #ifdef uNdEfInEd and #endif at the end.
(To understand line numbers in the error messages, regard
the "execute f2c" line as line 0. It is stripped away by
the netlib software before f2c sees your Fortran input.)
Options described in the man page may be transmitted to
netlib by having the first line of input be a comment
whose first 6 characters are "c$f2c " and whose remaining
characters are the desired options, e.g., "c$f2c -R -u".
This scheme may change -- ask netlib to
send index from f2c
if you do not get the behavior you expect.
During the initial experimental period, incoming Fortran
will be saved in a file. Don't send any secrets!
BUGS: Please send bug reports (including the shortest example
you can find that illustrates the bug) to research!dmg
or dmg@research.att.com . You might first check whether
the bug goes away when you turn optimization off.
NOTE: f2c.h defines several types, e.g., real, integer, doublereal.
The definitions in f2c.h are suitable for most machines, but if
your machine has sizeof(double) > 2*sizeof(long), you may need
to adjust f2c.h appropriately. f2c assumes
sizeof(doublecomplex) = 2*sizeof(doublereal)
sizeof(doublereal) = sizeof(complex)
sizeof(doublereal) = 2*sizeof(real)
sizeof(real) = sizeof(integer)
sizeof(real) = sizeof(logical)
sizeof(real) = 2*sizeof(shortint)
EQUIVALENCEs may not be translated correctly if these
assumptions are violated.
There exists a C compiler that objects to the lines
typedef VOID C_f; /* complex function */
typedef VOID H_f; /* character function */
typedef VOID Z_f; /* double complex function */
in f2c.h . If yours is such a compiler, do two things:
1. Complain to your vendor about this compiler bug.
2. Find the line
#define VOID void
in f2c.h and change it to
#define VOID int
(For readability, the f2c.h lines shown above have had two
tabs inserted before their first character.)
FTP: All the material described above is now available by ftp from
research.att.com (login: netlib; Password: your E-mail address;
cd f2c). You must uncompress the .Z files once you have a
copy of them, e.g., by
uncompress *.Z
-----------------
Recent change log (partial)
-----------------
Tue Jan 15 12:00:24 EST 1991:
Fix bug when two equivalence groups are merged, the second with
nonzero offset, and the result is then merged into a common block.
Example:
INTEGER W(3), X(3), Y(3), Z(3)
COMMON /ZOT/ Z
EQUIVALENCE (W(1),X(1)), (X(2),Y(1)), (Z(3),X(1))
***** W WAS GIVEN THE WRONG OFFSET
Recognize Fortran 90's optional NML= in NAMELIST READs and WRITEs.
(Currently NML= and FMT= are treated as synonyms -- there's no
error message if, e.g., NML= specifies a format.)
libi77: minor adjustment to allow internal READs from character
string constants in read-only memory.
Wed Jan 23 00:38:48 EST 1991:
Allow hex, octal, and binary constants to have the qualifying letter
(z, x, o, or b) either before or after the quoted string containing the
digits. For now this change will not be reflected in f2c.ps .
Tue Jan 29 16:23:45 EST 1991:
Arrange for character-valued statement functions to give results of
the right length (that of the statement function's name).
Wed Jan 30 07:05:32 EST 1991:
More tweaks for character-valued statement functions: an error
check and an adjustment so a right-hand side of nonconstant length
(e.g., a substring) is handled right.
Thu Jan 31 13:53:44 EST 1991:
Add a test after the cleanup call generated for I/O statements with
ERR= or END= clauses to catch the unlikely event that the cleanup
routine encounters an error.
Tue Feb 5 01:39:36 EST 1991:
Change Mktemp to mktmp (for the benefit of systems so brain-damaged
that they do not distinguish case in external names -- and that for
some reason want to load mktemp). Try to get xsum0.out right this
time (it somehow didn't get updated on 4 Feb. 1991).
Add note to libi77/README about adjusting the interpretation of
RECL= specifiers in OPENs for direct unformatted I/O.
Thu Feb 7 17:24:42 EST 1991:
New option -r casts values of REAL functions, including intrinsics,
to REAL. This only matters for unportable code like
real r
r = asin(1.)
if (r .eq. asin(1.)) ...
[The behavior of such code varies with the Fortran compiler used --
and sometimes is affected by compiler options.] For now, the man page
at the end of f2c.ps is the only part of f2c.ps that reflects this new
option.
Fri Feb 8 18:12:51 EST 1991:
Cast pointer differences passed as arguments to the appropriate type.
This matters, e.g., with MSDOS compilers that yield a long pointer
difference but have int == short.
Disallow nonpositive dimensions.
Fri Feb 15 12:24:15 EST 1991:
Change %d to %ld in sprintf call in putpower in putpcc.c.
Free more memory (e.g. allowing translation of larger Fortran
files under MS-DOS).
Recognize READ (character expression)
as formatted I/O with the format given by the character expression.
Update year in Notice.
Mon Mar 4 15:19:42 EST 1991:
Fix bug in passing the real part of a complex argument to an intrinsic
function. Omit unneeded parentheses in nested calls to intrinsics.
Example:
subroutine foo(x, y)
complex y
x = exp(sin(real(y))) + exp(imag(y))
end
Fri Mar 8 15:05:42 EST 1991:
Fix a comment in expr.c; omit safstrncpy.c (which had bugs in
cases not used by f2c).
Wed Mar 13 02:27:23 EST 1991:
Initialize firstmemblock->next in mem_init in mem.c . [On most
systems it was fortuituously 0, but with System V, -lmalloc could
trip on this missed initialization.]
Wed Mar 13 11:47:42 EST 1991:
Fix a reference to freed memory.
Wed Mar 27 00:42:19 EST 1991:
Fix a memory fault caused by such illegal Fortran as
function foo
x = 3
logical foo ! declaration among executables
foo=.false. ! used to suffer memory fault
end
Fri Apr 5 08:30:31 EST 1991:
Fix loss of % in some format expressions, e.g.
write(*,'(1h%)')
Fix botch introduced 27 March 1991 that caused subroutines with
multiple entry points to have extraneous declarations of ret_val.
Fri Apr 5 12:44:02 EST 1991
Try again to omit extraneous ret_val declarations -- this morning's
fix was sometimes wrong.
Mon Apr 8 13:47:06 EDT 1991:
Arrange for s_rnge to have the right prototype under -A -C .
Wed Apr 17 13:36:03 EDT 1991:
New fatal error message for apparent invocation of a recursive
statement function.
Thu Apr 25 15:13:37 EDT 1991:
F2c and libi77 adjusted so NAMELIST works with -i2. (I forgot
about -i2 when adding NAMELIST.) This required a change to f2c.h
(that only affects NAMELIST I/O under -i2.) Man-page description of
-i2 adjusted to reflect that -i2 stores array lengths in short ints.
Fri Apr 26 02:54:41 EDT 1991:
Libi77: fix some bugs in NAMELIST reading of multi-dimensional arrays
(file rsne.c).
Tue May 7 09:04:48 EDT 1991:
gram.c added to f2c/src (for folks who have trouble generating it. It
is not in "all from f2c", nor in the list of current timestamps below.)
Thu May 9 02:13:51 EDT 1991:
Omit a trailing space in expr.c (could cause a false xsum value if
a mailer drops the trailing blank).
Thu May 16 13:14:59 EDT 1991:
libi77: increase LEFBL in lio.h to overcome a NeXT bug.
Tweak for compilers that recognize "nested" comments: inside comments,
turn /* into /+ (as well as */ into +/).
Sat May 25 11:44:25 EDT 1991:
libf77: s_rnge: declare line long int rather than int.
Fri May 31 07:51:50 EDT 1991:
libf77: system_: officially return status.
Mon Jun 17 16:52:53 EDT 1991:
Minor tweaks: omit unnecessary declaration of strcmp (that caused
trouble on a system where strcmp was a macro) from misc.c; add
SHELL = /bin/sh to makefiles.
Fix a dereference of null when a CHARACTER*(*) declaration appears
(illegally) after DATA. Complain only once per subroutine about
declarations appearing after DATA.
Mon Jul 1 00:28:13 EDT 1991:
Add test and error message for illegal use of subroutine names, e.g.
SUBROUTINE ZAP(A)
ZAP = A
END
Mon Jul 8 21:49:20 EDT 1991:
Issue a warning about things like
integer i
i = 'abc'
(which is treated as i = ichar('a')). [It might be nice to treat 'abc'
as an integer initialized (in a DATA statement) with 'abc', but
other matters have higher priority.]
Render
i = ichar('A')
as
i = 'A';
rather than
i = 65;
(which assumes ASCII).
Fri Jul 12 07:41:30 EDT 1991:
Note added to README about erroneous definitions of __STDC__ .
Sat Jul 13 13:38:54 EDT 1991:
Fix bugs in double type convesions of complex values, e.g.
sngl(real(...)) or dble(real(...)) (where ... is complex).
Mon Jul 15 13:21:42 EDT 1991:
Fix bug introduced 8 July 1991 that caused erroneous warnings
"ichar([first char. of] char. string) assumed for conversion to numeric"
when a subroutine had an array of character strings as an argument.
Wed Aug 28 01:12:17 EDT 1991:
Omit an unused function in format.c, an unused variable in proc.c .
Under -r8, promote complex to double complex (as the man page claims).
Fri Aug 30 17:19:17 EDT 1991:
f2c.ps updated: slightly expand description of intrinsics and,or,xor,
not; add mention of intrinsics lshift, rshift; add note about f2c
accepting Fortran 90 inline comments (starting with !); update Cobalt
Blue address.
Tue Sep 17 07:17:33 EDT 1991:
libI77: err.c and open.c modified to use modes "rb" and "wb"
when (f)opening unformatted files; README updated to point out
that it may be necessary to change these modes to "r" and "w"
on some non-ANSI systems.
Current timestamps of files in "all from f2c/src", sorted by time,
appear below (mm/dd/year hh:mm:ss). To bring your source up to date,
obtain source files with a timestamp later than the time shown in your
version.c. Note that the time shown in the current version.c is the
timestamp of the source module that immediately follows version.c below:
8/28/1991 0:29:01 xsum0.out
8/28/1991 0:23:26 version.c
8/28/1991 0:07:02 main.c
8/28/1991 0:07:01 gram.dcl
8/28/1991 0:07:01 expr.c
8/28/1991 0:07:00 defs.h
8/13/1991 9:06:09 format.c
8/13/1991 9:04:25 proc.c
7/13/1991 12:58:37 putpcc.c
7/12/1991 7:25:33 README
7/05/1991 7:16:57 intr.c
6/17/1991 16:43:01 gram.head
6/06/1991 0:41:56 makefile
6/05/1991 8:34:09 misc.c
5/16/1991 13:06:06 p1output.c
4/25/1991 13:20:26 f2c.1
4/25/1991 12:56:19 f2c.h
4/25/1991 12:51:27 f2c.1t
4/25/1991 12:10:22 io.c
4/05/1991 7:43:45 mem.c
3/13/1991 11:18:09 output.c
3/08/1991 10:14:45 niceprintf.c
2/15/1991 12:08:26 Notice
2/08/1991 11:29:18 gram.exec
2/08/1991 11:29:18 malloc.c
2/05/1991 0:52:39 exec.c
1/22/1991 19:25:10 lex.c
1/15/1991 1:21:00 equiv.c
12/16/1990 16:46:20 xsum.c
12/07/1990 17:37:08 names.c
11/30/1990 9:47:48 data.c
7/26/1990 10:54:47 parse_args.c
7/26/1990 10:44:26 parse.h
6/19/1990 0:18:23 formatdata.c
5/11/1990 14:17:04 error.c
4/23/1990 17:35:47 sysdep.h
4/23/1990 16:37:50 sysdep.c
4/18/1990 12:25:19 init.c
4/18/1990 12:25:19 pread.c
4/18/1990 12:25:18 cds.c
4/10/1990 0:00:38 put.c
4/06/1990 0:00:57 gram.io
4/05/1990 23:40:09 gram.expr
3/27/1990 16:39:18 names.h
3/27/1990 10:05:15 p1defs.h
3/27/1990 10:05:14 defines.h
2/25/1990 9:04:30 vax.c
2/16/1990 10:37:27 tokens
2/14/1990 2:00:20 format.h
2/14/1990 1:38:46 output.h
2/14/1990 0:54:06 iob.h
2/03/1990 0:58:26 niceprintf.h
1/29/1990 13:26:52 memset.c
1/11/1990 18:02:51 ftypes.h
1/07/1990 1:20:01 usignal.h
11/27/1989 8:27:37 machdefs.h
7/01/1989 11:59:44 pccdefs.h