* gcc.c-torture/execute/980701-1.c: New test.

From-SVN: r20860

gcc/testsuite/ChangeLog

+Wed Jul  1 00:52:51 1998  Jeffrey A Law  (law@cygnus.com)
+
+	* gcc.c-torture/execute/980701-1.c: New test.
+
 Tue Jun 30 11:51:42 1998  Klaus-Georg Adams  <Klaus-Georg.Adams@chemie.uni-ka
 rlsruhe.de>
 

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

+ns_name_skip (unsigned char **x, unsigned char *y)
+{
+  *x = 0;
+  return 0;
+}
+
+unsigned char a[2];
+
+int dn_skipname(unsigned char *ptr, unsigned char *eom) {
+    unsigned char *saveptr = ptr;
+
+    if (ns_name_skip(&ptr, eom) == -1)
+	        return (-1);
+    return (ptr - saveptr);
+}
+
+main()
+{
+  if (dn_skipname (&a[0], &a[1]) == 0)
+    abort ();
+  exit (0);
+}