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: };