]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/testsuite/gcc.c-torture/compile/990517-1.c
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / testsuite / gcc.c-torture / compile / 990517-1.c
diff --git a/gcc/testsuite/gcc.c-torture/compile/990517-1.c b/gcc/testsuite/gcc.c-torture/compile/990517-1.c
deleted file mode 100644 (file)
index c738d4b..0000000
+++ /dev/null
@@ -1,30 +0,0 @@
-/* Extracted from the sdm module in perl.  */
-typedef struct {
-       char *dptr;
-       int dsize;
-} datum;
-extern long sdbm_hash  (char *, int)  ;
-extern void  sdbm__putpair   (char *, datum, datum)  ;
-void
-sdbm__splpage (char *pag, char *New, long int sbit)
-{
-       datum key;
-       datum val;
-       register int n;
-       register int off = 1024 ;
-       char cur[1024 ];
-       register short *ino = (short *) cur;
-       (void) memcpy(cur, pag, 1024 );
-       (void) ({ void *__s = ( pag ); __builtin_memset ( __s , '\0',     1024   ) ; __s; });
-       (void) ({ void *__s = ( New ); __builtin_memset ( __s , '\0',     1024   ) ; __s; });
-       n = ino[0];
-       for (ino++; n > 0; ino += 2) {
-               key.dptr = cur + ino[0]; 
-               key.dsize = off - ino[0];
-               val.dptr = cur + ino[1];
-               val.dsize = ino[0] - ino[1];
-               (void) sdbm__putpair ((sdbm_hash(( key ).dptr, ( key ).dsize)  & sbit) ? New : pag, key, val);
-               off = ino[1];
-               n -= 2;
-       }
-}