New test from PR 17544

From-SVN: r22719

gcc/testsuite/gcc.c-torture/ChangeLog

 Thu Oct  1 17:15:26 1998  Nick Clifton  <nickc@cygnus.com>
 
-	* compile/981001-1.c (main): New test.
+	* compile/981001-1.c: New test.
+	* execute/981001-1.c: New test.
 	
 Wed Aug 26 16:10:00 1997  J"orn Rennecke <amylaar@cygnus.co.uk>
 

gcc/testsuite/gcc.c-torture/execute/981001-1.c

+#define NG   0x100L
+
+unsigned long flg = 0;
+
+long sub (int n)
+{
+  int a, b ;
+
+  if (n >= 2)
+    {
+      if (n % 2 == 0)
+	{
+	  a = sub (n / 2);
+	  
+	  return (a + 2 * sub (n / 2 - 1)) * a;
+	}
+      else
+	{
+	  a = sub (n / 2 + 1);
+	  b = sub (n / 2);
+	  
+	  return a * a + b * b;
+	}
+    }
+  else 
+    return (long) n;
+}
+
+int main (void)
+{
+  if (sub (30) != 832040L)
+    flg |= NG;
+
+  if (flg)
+    abort ();
+  
+  exit (0);
+}