OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

rdfmt.c (rd_I): Delete unused variable(s). 

* libI77/rdfmt.c (rd_I): Delete unused variable(s).
	* libU77/access_.c (G77_access_0): Likewise.
	* libU77/chdir_.c (G77_chdir_0): Likewise.
	* libU77/chmod_.c (G77_chmod_0): Likewise.
	* libU77/ctime_.c (G77_ctime_0): Likewise.
	* libU77/link_.c (G77_link_0): Likewise.
	* libU77/lstat_.c (G77_lstat_0): Likewise.
	* libU77/rename_.c (G77_rename_0): Likewise.
	* libU77/stat_.c (G77_stat_0): Likewise.
	* libU77/symlnk_.c (G77_symlnk_0): Likewise.
	* libU77/unlink_.c (G77_unlink_0): Likewise.

From-SVN: r54168
This commit is contained in:
Kaveh R. Ghazi 2002-06-02 12:59:22 +00:00 committed by Kaveh Ghazi
parent 03489df3db
commit 682413221b
12 changed files with 15 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
libf2c/ChangeLog
View File

@ -1,3 +1,17 @@
Sun Jun 2 08:58:05 2002 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* libI77/rdfmt.c (rd_I): Delete unused variable(s).
* libU77/access_.c (G77_access_0): Likewise.
* libU77/chdir_.c (G77_chdir_0): Likewise.
* libU77/chmod_.c (G77_chmod_0): Likewise.
* libU77/ctime_.c (G77_ctime_0): Likewise.
* libU77/link_.c (G77_link_0): Likewise.
* libU77/lstat_.c (G77_lstat_0): Likewise.
* libU77/rename_.c (G77_rename_0): Likewise.
* libU77/stat_.c (G77_stat_0): Likewise.
* libU77/symlnk_.c (G77_symlnk_0): Likewise.
* libU77/unlink_.c (G77_unlink_0): Likewise.
Sun Jun 2 08:55:20 2002 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* libI77/inquire.c (f_inqu): Avoid ambiguous else clauses.

2
libf2c/libI77/rdfmt.c
View File

@ -96,7 +96,7 @@ rd_Z (Uint * n, int w, ftnlen len)
static int
rd_I (Uint * n, int w, ftnlen len, register int base)
{
int bad, ch, sign;
int ch, sign;
longint x = 0;
if (w <= 0)

1
libf2c/libU77/access_.c
View File

@ -51,7 +51,6 @@ integer
G77_access_0 (const char *name, const char *mode, ftnlen Lname, ftnlen Lmode)
{
char *buff;
char *bp, *blast;
int amode, i;
buff = malloc (Lname + 1);

1
libf2c/libU77/chdir_.c
View File

@ -38,7 +38,6 @@ integer
G77_chdir_0 (const char *name, const ftnlen Lname)
{
char *buff;
char *bp, *blast;
int i;
buff = malloc (Lname + 1);

1
libf2c/libU77/chmod_.c
View File

@ -50,7 +50,6 @@ G77_chmod_0 ( /* const */ char *name, /* const */ char *mode,
const ftnlen Lname, const ftnlen Lmode)
{
char *buff;
char *bp, *blast;
int i;
ftnlen l, l2;
ftnlen six = 6;

1
libf2c/libU77/ctime_.c
View File

@ -42,7 +42,6 @@ Boston, MA 02111-1307, USA. */
/* Character */ void
G77_ctime_0 (char *chtime, const ftnlen Lchtime, longint * xstime)
{
int i, l;
int s_copy ();
time_t stime = *xstime;

1
libf2c/libU77/link_.c
View File

@ -42,7 +42,6 @@ G77_link_0 (const char *path1, const char *path2, const ftnlen Lpath1,
{
#if defined (HAVE_LINK)
char *buff1, *buff2;
char *bp, *blast;
int i;
buff1 = malloc (Lpath1 + 1);

1
libf2c/libU77/lstat_.c
View File

@ -37,7 +37,6 @@ G77_lstat_0 (const char *name, integer statb[13], const ftnlen Lname)
{
#if HAVE_LSTAT
char *buff;
char *bp, *blast;
int err;
struct stat buf;

1
libf2c/libU77/rename_.c
View File

@ -36,7 +36,6 @@ G77_rename_0 (const char *path1, const char *path2, const ftnlen Lpath1,
const ftnlen Lpath2)
{
char *buff1, *buff2;
char *bp, *blast;
int i;
buff1 = malloc (Lpath1 + 1);

1
libf2c/libU77/stat_.c
View File

@ -33,7 +33,6 @@ integer
G77_stat_0 (const char *name, integer statb[13], const ftnlen Lname)
{
char *buff;
char *bp, *blast;
int err;
struct stat buf;

1
libf2c/libU77/symlnk_.c
View File

@ -41,7 +41,6 @@ G77_symlnk_0 (const char *path1, const char *path2, const ftnlen Lpath1,
{
#if HAVE_SYMLINK
char *buff1, *buff2;
char *bp, *blast;
int i;
buff1 = (char *) malloc (Lpath1 + 1);

1
libf2c/libU77/unlink_.c
View File

@ -39,7 +39,6 @@ integer
G77_unlink_0 (const char *str, const ftnlen Lstr)
{
char *buff;
char *bp, *blast;
int i;
buff = malloc (Lstr + 1);