From 5c644ca58f0557ac17adc58e714bb5f76212eefc Mon Sep 17 00:00:00 2001
From: Harry Moffat <hkmoffa@sandia.gov>
Date: Mon, 21 Dec 2009 17:45:29 +0000
Subject: [PATCH] Adding parenthesis to reduce warnings

---
 ext/f2c_libs/dfe.c     | 4 ++--
 ext/f2c_libs/due.c     | 4 ++--
 ext/f2c_libs/endfile.c | 2 +-
 ext/f2c_libs/iio.c     | 4 ++--
 4 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/ext/f2c_libs/dfe.c b/ext/f2c_libs/dfe.c
index c6b10d0e9..cd2e673d6 100644
--- a/ext/f2c_libs/dfe.c
+++ b/ext/f2c_libs/dfe.c
@@ -101,7 +101,7 @@ integer s_rdfe(cilist *a)
 	int n;
 	if(!f__init) f_init();
 	f__reading=1;
-	if(n=c_dfe(a))return(n);
+	if((n=c_dfe(a))) return(n);
 	if(f__curunit->uwrt && f__nowreading(f__curunit))
 		err(a->cierr,errno,"read start");
 	f__getn = y_getc;
@@ -123,7 +123,7 @@ integer s_wdfe(cilist *a)
 	int n;
 	if(!f__init) f_init();
 	f__reading=0;
-	if(n=c_dfe(a)) return(n);
+	if((n=c_dfe(a))) return(n);
 	if(f__curunit->uwrt != 1 && f__nowwriting(f__curunit))
 		err(a->cierr,errno,"startwrt");
 	f__putn = x_putc;
diff --git a/ext/f2c_libs/due.c b/ext/f2c_libs/due.c
index a7f4cec46..e463448f8 100644
--- a/ext/f2c_libs/due.c
+++ b/ext/f2c_libs/due.c
@@ -37,7 +37,7 @@ integer s_rdue(cilist *a)
 {
 	int n;
 	f__reading=1;
-	if(n=c_due(a)) return(n);
+	if((n=c_due(a))) return(n);
 	if(f__curunit->uwrt && f__nowreading(f__curunit))
 		err(a->cierr,errno,"read start");
 	return(0);
@@ -50,7 +50,7 @@ integer s_wdue(cilist *a)
 {
 	int n;
 	f__reading=0;
-	if(n=c_due(a)) return(n);
+	if((n=c_due(a))) return(n);
 	if(f__curunit->uwrt != 1 && f__nowwriting(f__curunit))
 		err(a->cierr,errno,"write start");
 	return(0);
diff --git a/ext/f2c_libs/endfile.c b/ext/f2c_libs/endfile.c
index 04020d380..8d7b7ea33 100644
--- a/ext/f2c_libs/endfile.c
+++ b/ext/f2c_libs/endfile.c
@@ -43,7 +43,7 @@ integer f_end(alist *a)
 	if(b->ufd==NULL) {
 		char nbuf[10];
 		sprintf(nbuf,"fort.%ld",(long)a->aunit);
-		if (tf = FOPEN(nbuf, f__w_mode[0]))
+		if ((tf = FOPEN(nbuf, f__w_mode[0])))
 			fclose(tf);
 		return(0);
 		}
diff --git a/ext/f2c_libs/iio.c b/ext/f2c_libs/iio.c
index 8553efcf9..6641f6ead 100644
--- a/ext/f2c_libs/iio.c
+++ b/ext/f2c_libs/iio.c
@@ -88,7 +88,7 @@ integer s_rsfi(a) icilist *a;
 integer s_rsfi(icilist *a)
 #endif
 {	int n;
-	if(n=c_si(a)) return(n);
+	if((n=c_si(a))) return(n);
 	f__reading=1;
 	f__doed=rd_ed;
 	f__doned=rd_ned;
@@ -120,7 +120,7 @@ integer s_wsfi(a) icilist *a;
 integer s_wsfi(icilist *a)
 #endif
 {	int n;
-	if(n=c_si(a)) return(n);
+	if((n=c_si(a))) return(n);
 	f__reading=0;
 	f__doed=w_ed;
 	f__doned=w_ned;