|
|
1.1 root 1: /*
2: * set flag to initialize fortran-66 mods
3: * @(#)libI66.c 1.4
4: * usage: f77 ... -lI66 ...
5: */
6:
7: #include "fiodefs.h"
8:
9: struct ioiflg ioiflg_ = {
10: 0, /* open files at beginning */
11: 1, /* carriage control on all units */
12: 1, /* blanks are zero on input; 0 => 0.0 on output */
13: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.