* g++.old-deja/g++.eh/badalloc1.C: New test.

From-SVN: r34430

gcc/testsuite/ChangeLog

+2000-06-06  Nathan Sidwell  <nathan@codesourcery.com>
+
+	* g++.old-deja/g++.eh/badalloc1.C: New test.
+
 2000-06-05  Richard Henderson  <rth@cygnus.com>
 
 	* gcc.c-torture/execute/20000605-1.c: New test.

gcc/testsuite/g++.old-deja/g++.eh/badalloc1.C

+// Copyright (C) 2000 Free Software Foundation, Inc.
+// Contributed by Nathan Sidwell 6 June 2000 <nathan@codesourcery.com>
+
+// Check we can throw a bad_alloc exception when malloc dies
+
+static __SIZE_TYPE__ arena[100000]; // so things can initialize
+static int fail;
+static unsigned pos;
+
+extern "C" void *malloc (__SIZE_TYPE__ size)
+{
+  unsigned *p = &arena[pos];
+
+  if (fail)
+    return 0;
+  
+  arena[pos] = size;
+  size = (size + 4 * sizeof (__SIZE_TYPE__) - 1)
+         / sizeof (__SIZE_TYPE__) & ~3; // Yes, this is a hack
+  pos += size + 4;
+  return p + 4;
+}
+extern "C" void free (void *)
+{
+  
+}
+extern "C" void *realloc (void *p, __SIZE_TYPE__ size)
+{
+  void *r = malloc (size);
+  unsigned int oldSize;
+  
+  if (r && p)
+    {
+      oldSize = ((__SIZE_TYPE__ *)p)[-4];
+      if (oldSize < size)
+        size = oldSize;
+      while (size--)
+        ((char *)r)[size] = ((char *)p)[size];
+    }
+  free (p);
+  return r;
+}
+
+void fn_throw() throw(int)
+{
+  throw 1;
+}
+
+void fn_rethrow() throw(int)
+{
+  try{fn_throw();}
+  catch(int a){
+    throw;}
+}
+
+void fn_catchthrow() throw(int)
+{
+  try{fn_throw();}
+  catch(int a){
+    throw a + 1;}
+}
+
+int main()
+{
+  fail = 1;
+
+  try{fn_throw();}
+  catch(int a){}
+
+  try{fn_rethrow();}
+  catch(int a){}
+
+  try{fn_catchthrow();}
+  catch(int a){}
+  
+  return 0;
+}