aboutsummaryrefslogtreecommitdiff
path: root/devel/f77flow
diff options
context:
space:
mode:
authorEric Anholt <anholt@FreeBSD.org>2003-05-12 22:02:30 +0000
committerEric Anholt <anholt@FreeBSD.org>2003-05-12 22:02:30 +0000
commitae24aeb56451a938876d9980ab71dba66d34f6dc (patch)
tree3d0a9bf11d3715f5f83d0c5f6356f28dc0bdf816 /devel/f77flow
parent04a9b5021fdb1ff4205de9348921702f481fe8b1 (diff)
downloadports-ae24aeb56451a938876d9980ab71dba66d34f6dc.tar.gz
ports-ae24aeb56451a938876d9980ab71dba66d34f6dc.zip
Fix with newer gcc by fixing usage of exit(3).
Notes
Notes: svn path=/head/; revision=80855
Diffstat (limited to 'devel/f77flow')
-rw-r--r--devel/f77flow/Makefile1
-rw-r--r--devel/f77flow/files/patch-ab36
2 files changed, 32 insertions, 5 deletions
diff --git a/devel/f77flow/Makefile b/devel/f77flow/Makefile
index dd50a880aa53..57eb73af748b 100644
--- a/devel/f77flow/Makefile
+++ b/devel/f77flow/Makefile
@@ -7,6 +7,7 @@
PORTNAME= f77flow
PORTVERSION= 0.12
+PORTREVISION= 1
CATEGORIES= devel
MASTER_SITES= ${MASTER_SITE_SUNSITE}
MASTER_SITE_SUBDIR= devel/lang/fortran
diff --git a/devel/f77flow/files/patch-ab b/devel/f77flow/files/patch-ab
index 3ad8b57600f5..21e557a666d2 100644
--- a/devel/f77flow/files/patch-ab
+++ b/devel/f77flow/files/patch-ab
@@ -1,6 +1,14 @@
--- flow.c.orig Wed Feb 19 08:45:20 1997
-+++ flow.c Sun Mar 31 15:47:22 2002
-@@ -66,7 +66,7 @@
++++ flow.c Sun May 11 22:14:03 2003
+@@ -20,6 +20,7 @@
+ /* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
+ /*************************************************************************/
+
++#include <stdlib.h>
+ #include <stdio.h>
+ #include <ctype.h>
+ #include <string.h>
+@@ -66,7 +67,7 @@
FILE *CallFile=NULL;
FILE *SubFile=NULL;
@@ -9,7 +17,7 @@
char S_OUT[]="FLOW.SUBS"; /* file name where to print subroutines */
char C_OUT[]="FLOW.CALL"; /* file name where to print call's */
-@@ -89,7 +89,7 @@
+@@ -89,7 +90,7 @@
/* begin of main */
@@ -18,7 +26,7 @@
{
int k,d,i;
-@@ -100,6 +100,8 @@
+@@ -100,6 +101,8 @@
long int Count_Lines=0;
char PRG_Name[60];
@@ -27,7 +35,16 @@
for (k=0; k<NO_SUB+1; k++) Subroutine[k].Call=0;
for (k=0; k<NO_CALL; k++) Call[k].Call=0;
Program.Call=0;
-@@ -303,6 +305,8 @@
+@@ -181,7 +184,7 @@
+ /* An Error occured */
+ printf("\nError with option -r");
+ printf("\nMissing Name for starting SUBROUTINE");
+- exit;
++ exit(2);
+ }
+
+ O_NEWSTART=1;
+@@ -303,6 +306,8 @@
if (No_Main==0) Output_Result();
if (O_OutFile) fclose(OUTFILE);
@@ -36,3 +53,12 @@
}
+@@ -584,7 +589,7 @@
+ printf(" -W: A warning is given if a code line exceeds the\n");
+ printf(" length of 72 characters\n");
+ printf("\nFor further information see manual page flow(1).\n\n");
+- exit();
++ exit(2);
+ }
+
+