* runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.

From-SVN: r104909

* runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
From-SVN: r104909
bb13c350 · Jakub Jelinek · Jakub Jelinek · 01406f86 · bb13c350 · bb13c350
Commit bb13c350 authored Oct 03, 2005 by Jakub Jelinek Committed by Jakub Jelinek Oct 03, 2005
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

libgfortran/ChangeLog
+4 -0

libgfortran/runtime/memory.c
+1 -1

No files found.
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
+2005-10-03  Jakub Jelinek  <jakub@redhat.com>
+
+	* runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
+
 2005-10-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>

 	PR libfortran/19308

--- a/libgfortran/runtime/memory.c
+++ b/libgfortran/runtime/memory.c
@@ -182,7 +182,7 @@ allocate_size (void **mem, size_t size, GFC_INTEGER_4 * stat)
  if (!mem)
    runtime_error ("Internal: NULL mem pointer in ALLOCATE.");

-  newmem = malloc (size);
+  newmem = malloc (size ? size : 1);
  if (!newmem)
    {
      if (stat)