diff options
author | obrien <obrien@FreeBSD.org> | 2000-08-27 06:16:37 +0000 |
---|---|---|
committer | obrien <obrien@FreeBSD.org> | 2000-08-27 06:16:37 +0000 |
commit | ea728599392a805f3dfef8d138c0c89d80849a09 (patch) | |
tree | cd26bead0ba0fac5ff6eaf823d4ef72c9d542c41 /lang/ratfor/files | |
parent | ba3f4c168bdcec8c57c710d39e08ba5911f1df12 (diff) | |
download | FreeBSD-ports-ea728599392a805f3dfef8d138c0c89d80849a09.zip FreeBSD-ports-ea728599392a805f3dfef8d138c0c89d80849a09.tar.gz |
The Ratfor FORTRAN pre-processor described in the "SOFTWARE TOOLS" book.
Diffstat (limited to 'lang/ratfor/files')
-rw-r--r-- | lang/ratfor/files/patch-rat4.c | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/lang/ratfor/files/patch-rat4.c b/lang/ratfor/files/patch-rat4.c new file mode 100644 index 0000000..cac0679 --- /dev/null +++ b/lang/ratfor/files/patch-rat4.c @@ -0,0 +1,21 @@ +--- rat4.c.orig Wed Mar 20 16:58:50 1996 ++++ rat4.c Sat Aug 26 22:58:11 2000 +@@ -36,2 +36,3 @@ + #include <stdio.h> ++#include <unistd.h> + +@@ -162,3 +163,3 @@ + +- while ((c=our_getopt(argc, argv, "Chn:o:6:")) != EOF) ++ while ((c=getopt(argc, argv, "Chl:n:o:6:")) != EOF) + switch (c) { +@@ -193,6 +194,6 @@ + */ +- if (optind77 >= argc) ++ if (optind >= argc) + infile[0] = stdin; +- else if ((infile[0] = fopen(argv[optind77], "r")) == NULL) +- error("cannot read %s\n", argv[optind77]); ++ else if ((infile[0] = fopen(argv[optind], "r")) == NULL) ++ error("cannot read %s\n", argv[optind]); + |