diff options
| author | Richard Henderson <rth@redhat.com> | 2004-12-06 16:01:01 -0800 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 2004-12-06 16:01:01 -0800 |
| commit | f21edfd62d267934ad7e9475976719bc41ee7dc3 (patch) | |
| tree | 379c730c455320b1f8101e6a2c9d24435a6e33b3 /libgfortran/runtime/memory.c | |
| parent | 9f91e6cc1610417926374738af0e102187723d59 (diff) | |
| download | gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.zip gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.tar.gz gcc-f21edfd62d267934ad7e9475976719bc41ee7dc3.tar.bz2 | |
c99_functions.c, [...]: Whitespace fixes.
* intrinsics/c99_functions.c, intrinsics/eoshift0.c,
intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
intrinsics/spread_generic.c, intrinsics/stat.c,
intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
intrinsics/transpose_generic.c, intrinsics/unlink.c,
intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
io/write.c, runtime/environ.c, runtime/error.c,
runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
runtime/memory.c, runtime/pause.c, runtime/stop.c,
runtime/string.c: Whitespace fixes.
From-SVN: r91794
Diffstat (limited to 'libgfortran/runtime/memory.c')
| -rw-r--r-- | libgfortran/runtime/memory.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/libgfortran/runtime/memory.c b/libgfortran/runtime/memory.c index 5b14600..2280848 100644 --- a/libgfortran/runtime/memory.c +++ b/libgfortran/runtime/memory.c @@ -65,7 +65,6 @@ static malloc_t mem_root; void memory_init (void) { - /* The root should never be used directly, so don't set the magic. */ mem_root.magic = 0; mem_root.next = &mem_root; @@ -111,7 +110,6 @@ get_mem (size_t n) void free_mem (void *p) { - free (p); } @@ -250,7 +248,6 @@ allocate_size (void **mem, size_t size, GFC_INTEGER_4 * stat) void allocate (void **mem, GFC_INTEGER_4 size, GFC_INTEGER_4 * stat) { - if (size < 0) { runtime_error ("Attempt to allocate negative amount of memory. " @@ -265,7 +262,6 @@ allocate (void **mem, GFC_INTEGER_4 size, GFC_INTEGER_4 * stat) void allocate64 (void **mem, GFC_INTEGER_8 size, GFC_INTEGER_4 * stat) { - if (size < 0) { runtime_error @@ -283,7 +279,6 @@ allocate64 (void **mem, GFC_INTEGER_8 size, GFC_INTEGER_4 * stat) void deallocate (void **mem, GFC_INTEGER_4 * stat) { - if (!mem) runtime_error ("Internal: NULL mem pointer in ALLOCATE."); @@ -309,4 +304,3 @@ deallocate (void **mem, GFC_INTEGER_4 * stat) if (stat) *stat = 0; } - |