summaryrefslogtreecommitdiffstats
path: root/libgfortran/io/unix.c
diff options
context:
space:
mode:
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>2010-05-07 15:55:59 +0000
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>2010-05-07 15:55:59 +0000
commit5e62a3ccccbc506f5bb931cd1c523b3f3f8e52c7 (patch)
treebbdaaba9870daa7c26073e634bce50437a73cd07 /libgfortran/io/unix.c
parenteb4ef3d174e02aef6597790662ecfceed210cbb1 (diff)
downloadppe42-gcc-5e62a3ccccbc506f5bb931cd1c523b3f3f8e52c7.tar.gz
ppe42-gcc-5e62a3ccccbc506f5bb931cd1c523b3f3f8e52c7.zip
Remove free_mem
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@159160 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/unix.c')
-rw-r--r--libgfortran/io/unix.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c
index 9ab5bcdbc56..f0cd3b9b16c 100644
--- a/libgfortran/io/unix.c
+++ b/libgfortran/io/unix.c
@@ -3,7 +3,7 @@
Contributed by Andy Vaught
F2003 I/O support contributed by Jerry DeLisle
-This file is part of the GNU Fortran 95 runtime library (libgfortran).
+This file is part of the GNU Fortran runtime library (libgfortran).
Libgfortran is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@@ -351,7 +351,7 @@ raw_close (unix_stream * s)
retval = close (s->fd);
else
retval = 0;
- free_mem (s);
+ free (s);
return retval;
}
@@ -564,7 +564,7 @@ buf_close (unix_stream * s)
{
if (buf_flush (s) != 0)
return -1;
- free_mem (s->buffer);
+ free (s->buffer);
return raw_close (s);
}
@@ -739,7 +739,7 @@ static int
mem_close (unix_stream * s)
{
if (s != NULL)
- free_mem (s);
+ free (s);
return 0;
}
@@ -937,7 +937,7 @@ tempfile (st_parameter_open *opp)
#endif /* HAVE_MKSTEMP */
if (fd < 0)
- free_mem (template);
+ free (template);
else
{
opp->file = template;
@@ -1395,7 +1395,7 @@ retry:
__gthread_mutex_lock (&unit_lock);
__gthread_mutex_unlock (&u->lock);
if (predec_waiting_locked (u) == 0)
- free_mem (u);
+ free (u);
goto retry;
}
@@ -1460,7 +1460,7 @@ flush_all_units (void)
__gthread_mutex_lock (&unit_lock);
__gthread_mutex_unlock (&u->lock);
if (predec_waiting_locked (u) == 0)
- free_mem (u);
+ free (u);
}
}
while (1);
OpenPOWER on IntegriCloud