Fix with newer gcc by fixing usage of exit(3).

This commit is contained in:
Eric Anholt 2003-05-12 22:02:30 +00:00
parent 04a9b5021f
commit ae24aeb564
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=80855
2 changed files with 32 additions and 5 deletions

View file

@ -7,6 +7,7 @@
PORTNAME= f77flow
PORTVERSION= 0.12
PORTREVISION= 1
CATEGORIES= devel
MASTER_SITES= ${MASTER_SITE_SUNSITE}
MASTER_SITE_SUBDIR= devel/lang/fortran

View file

@ -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);
}