VEX/test: Remove various files.

Either boring, or not suitable for integration into the testsuite
or redundant.

diff --git a/VEX/test/fp1.c b/VEX/test/fp1.c
deleted file mode 100644 (file)
index 3f3aca3..0000000
--- a/VEX/test/fp1.c
+++ /dev/null
@@ -1,17 +0,0 @@
-
-#include <stdio.h>
-
-double a[10];
-
-int main ( void ) 
-{
-  int i;
-  double s;
-  for (i = 0; i < 10; i++)
-    a[i] = 11.11 * i;
-  s = 0.0;
-  for (i = 0; i < 10; i++)
-    s += a[i];
-  printf("result = %f\n", s);
-  return 0;
-}

diff --git a/VEX/test/fp1.s b/VEX/test/fp1.s
deleted file mode 100644 (file)
index 8d3d9fd..0000000
--- a/VEX/test/fp1.s
+++ /dev/null
@@ -1,52 +0,0 @@
-       .file   "fp1.c"
-       .version        "01.01"
-gcc2_compiled.:
-       .section        .rodata.str1.1,"aMS",@progbits,1
-.LC2:
-       .string "result = %f\n"
-       .section        .rodata.cst8,"aM",@progbits,8
-       .align 8
-.LC0:
-       .long   0xeb851eb8,0x40263851
-.text
-       .align 4
-.globl main
-       .type    main,@function
-main:
-       pushl   %ebp
-       movl    %esp, %ebp
-       subl    $8, %esp
-       movl    $0, %eax
-       movl    $a, %edx
-       fldl    .LC0
-       .p2align 2
-.L21:
-       fld     %st(0)
-       pushl   %eax
-       fimull  (%esp)
-       popl    %eax
-       fstpl   (%edx,%eax,8)
-       incl    %eax
-       cmpl    $9, %eax
-       jle     .L21
-       fstp    %st(0)
-       fldz
-       movl    $0, %eax
-       movl    $a, %edx
-       .p2align 2
-.L26:
-       faddl   (%edx,%eax,8)
-       incl    %eax
-       cmpl    $9, %eax
-       jle     .L26
-       subl    $12, %esp
-       fstpl   (%esp)
-       pushl   $.LC2
-       call    printf
-       movl    $0, %eax
-       leave
-       ret
-.Lfe1:
-       .size    main,.Lfe1-main
-       .comm   a,80,32
-       .ident  "GCC: (GNU) 2.96 20000731 (Red Hat Linux 7.3 2.96-110)"

diff --git a/VEX/test/fpconst.c b/VEX/test/fpconst.c
deleted file mode 100644 (file)
index c6ebdc3..0000000
--- a/VEX/test/fpconst.c
+++ /dev/null
@@ -1,77 +0,0 @@
-
-#include <stdio.h>
-#include <stdlib.h>
-
-void do_fld1 ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fld1");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldl2t ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldl2t");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldl2e ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldl2e");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldpi ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldpi");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldlg2 ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldlg2");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldln2 ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldln2");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-void do_fldz ( void* p )
-{
-   asm __volatile__("fninit");
-   asm __volatile__("fldz");
-   asm __volatile__("fstpl (%0)" : : "r" (p) : "memory" );
-}
-
-typedef  unsigned char  UChar;
-
-void foo ( void (*f)(void*), char* name )
-{
-  int i;
-  UChar* b = malloc(8);
-  f(b);
-  printf("%s IRConst_F64i(0x", name);
-  for (i = 7; i >= 0; i--)
-    printf("%02x", (int)b[i]);
-  printf(")\n");
-}
-
-int main ( void )
-{
-  foo( do_fld1,   "fld1  ");
-  foo( do_fldl2t, "fldl2t");
-  foo( do_fldl2e, "fldl2e");
-  foo( do_fldpi,  "fldpi ");
-  foo( do_fldlg2, "fldlg2");
-  foo( do_fldln2, "fldln2");
-  foo( do_fldz,   "fldz  ");
-  return 0;
-}

diff --git a/VEX/test/fpgames.s b/VEX/test/fpgames.s
deleted file mode 100644 (file)
index 222f33b..0000000
--- a/VEX/test/fpgames.s
+++ /dev/null
@@ -1,103 +0,0 @@
-       .file   "fpgames.c"
-       .version        "01.01"
-gcc2_compiled.:
-       .section        .rodata.str1.1,"aMS",@progbits,1
-.LC0:
-       .string "%02x "
-.LC1:
-       .string "\n"
-.text
-       .align 4
-.globl show
-       .type    show,@function
-show:
-       pushl   %ebp
-       movl    %esp, %ebp
-       pushl   %ebx
-       subl    $4, %esp
-       movl    $0, %ebx
-       .p2align 2
-.L21:
-       subl    $8, %esp
-       movzbl  st(%ebx), %eax
-       pushl   %eax
-       pushl   $.LC0
-       call    printf
-       addl    $16, %esp
-       testl   %ebx, %ebx
-       jle     .L20
-       movl    %ebx, %eax
-       andl    $3, %eax
-       cmpl    $3, %eax
-       jne     .L20
-       subl    $12, %esp
-       pushl   $.LC1
-       call    printf
-       addl    $16, %esp
-.L20:
-       incl    %ebx
-       cmpl    $27, %ebx
-       jle     .L21
-       movl    $0, %ebx
-       .p2align 2
-.L27:
-       subl    $8, %esp
-       movzbl  st+28(%ebx), %eax
-       pushl   %eax
-       pushl   $.LC0
-       call    printf
-       addl    $16, %esp
-       testl   %ebx, %ebx
-       jle     .L26
-       movl    $10, %edx
-       movl    %ebx, %eax
-       movl    %edx, %ecx
-       cltd
-       idivl   %ecx
-       cmpl    $9, %edx
-       jne     .L26
-       subl    $12, %esp
-       pushl   $.LC1
-       call    printf
-       addl    $16, %esp
-.L26:
-       incl    %ebx
-       cmpl    $79, %ebx
-       jle     .L27
-       subl    $12, %esp
-       pushl   $.LC1
-       call    printf
-       movl    -4(%ebp), %ebx
-       leave
-       ret
-.Lfe1:
-       .size    show,.Lfe1-show
-       .section        .rodata.str1.1,"aMS",@progbits,1
-.LC2:
-       .string "\n\n"
-.text
-       .align 4
-.globl main
-       .type    main,@function
-main:
-       pushl   %ebp
-       movl    %esp, %ebp
-       subl    $8, %esp
-#APP
-       finit ; fnsave st
-#NO_APP
-       call    show
-       subl    $12, %esp
-       pushl   $.LC2
-       call    printf
-#APP
-       fld1 ; fnsave st
-#NO_APP
-       call    show
-       movl    $0, %eax
-       leave
-       ret
-.Lfe2:
-       .size    main,.Lfe2-main
-       .comm   st,108,32
-       .ident  "GCC: (GNU) 2.96 20000731 (Red Hat Linux 7.3 2.96-110)"

diff --git a/VEX/test/fpspeed.c b/VEX/test/fpspeed.c
deleted file mode 100644 (file)
index 83996ea..0000000
--- a/VEX/test/fpspeed.c
+++ /dev/null
@@ -1,29 +0,0 @@
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <math.h>
-
-int main ( void )
-{
-   int i, j;
-   double s, r;
-   s = 0.0;
-   double* a1 = malloc(1000 * sizeof(double));
-   double* a2 = malloc(1000 * sizeof(double));
-   for (i = 0; i < 1000; i++) {
-     a1[i] = s; 
-     s += 0.3374893482232;
-     a2[i] = s;
-   }
-
-   s = 0.0;
-   r = 0.0;
-   for (j = 0; j < 5000; j++) {
-      for (i = 0; i < 1000; i++) {
-         s += (a1[i] - a2[i]) * (a1[i] + a2[i]) - sqrt(r + 1.0);
-         r += 0.001;
-      }
-   }
-   printf("s = %f, r = %f\n", s, r );
-   return 0;
-}

diff --git a/VEX/test/mmxtest.c b/VEX/test/mmxtest.c
deleted file mode 100644 (file)
index e1ca547..0000000
--- a/VEX/test/mmxtest.c
+++ /dev/null
@@ -1,605 +0,0 @@
-
-#include <stdio.h>
-#include <stdlib.h>
-
-#define HAVE_SSE2 1
-
-/* DO NOT COMPILE WITH -O/-O2/-O3 !  GENERATES INVALID ASSEMBLY. */
-
-
-/*   mmx.h
-
-   MultiMedia eXtensions GCC interface library for IA32.
-
-   To use this library, simply include this header file
-   and compile with GCC.  You MUST have inlining enabled
-   in order for mmx_ok() to work; this can be done by
-   simply using -O on the GCC command line.
-
-   Compiling with -DMMX_TRACE will cause detailed trace
-   output to be sent to stderr for each mmx operation.
-   This adds lots of code, and obviously slows execution to
-   a crawl, but can be very useful for debugging.
-
-   THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY
-   EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT
-   LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY
-   AND FITNESS FOR ANY PARTICULAR PURPOSE.
-
-   June 11, 1998 by H. Dietz and R. Fisher
-*/
-
-
-/*   The type of an value that fits in an MMX register
-   (note that long long constant values MUST be suffixed
-    by LL and unsigned long long values by ULL, lest
-    they be truncated by the compiler)
-*/
-typedef   union {
-   long long            q;   /* Quadword (64-bit) value */
-   unsigned long long   uq;   /* Unsigned Quadword */
-   int                  d[2];   /* 2 Doubleword (32-bit) values */
-   unsigned int         ud[2];   /* 2 Unsigned Doubleword */
-   short                w[4];   /* 4 Word (16-bit) values */
-   unsigned short       uw[4];   /* 4 Unsigned Word */
-   char                 b[8];   /* 8 Byte (8-bit) values */
-   unsigned char        ub[8];   /* 8 Unsigned Byte */
-} mmx_t;
-
-
-/*   Function to test if mmx instructions are supported...
-*/
-inline extern int
-mmx_ok(void)
-{
-   /* Returns 1 if mmx instructions are ok,
-      0 if hardware does not support mmx
-   */
-   register int ok = 0;
-
-   __asm__ __volatile__ (
-      /* Get CPU version information */
-      "movl $1, %%eax\n\t"
-      "cpuid\n\t"
-      "movl %%edx, %0"
-      : "=a" (ok)
-      : /* no input */
-   );
-   return((ok & 0x800000) == 0x800000);
-}
-
-
-/*   Helper functions for the instruction macros that follow...
-   (note that memory-to-register, m2r, instructions are nearly
-    as efficient as register-to-register, r2r, instructions;
-    however, memory-to-memory instructions are really simulated
-    as a convenience, and are only 1/3 as efficient)
-*/
-#ifdef   MMX_TRACE
-
-/*   Include the stuff for printing a trace to stderr...
-*/
-
-#include <stdio.h>
-
-#define   mmx_m2r(op, mem, reg) \
-   { \
-      mmx_t mmx_trace; \
-      mmx_trace = (mem); \
-      fprintf(stderr, #op "_m2r(" #mem "=0x%016llx, ", mmx_trace.q); \
-      __asm__ __volatile__ ("movq %%" #reg ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #reg "=0x%016llx) => ", mmx_trace.q); \
-      __asm__ __volatile__ (#op " %0, %%" #reg \
-                  : /* nothing */ \
-                  : "X" (mem)); \
-      __asm__ __volatile__ ("movq %%" #reg ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #reg "=0x%016llx\n", mmx_trace.q); \
-   }
-
-#define   mmx_r2m(op, reg, mem) \
-   { \
-      mmx_t mmx_trace; \
-      __asm__ __volatile__ ("movq %%" #reg ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #op "_r2m(" #reg "=0x%016llx, ", mmx_trace.q); \
-      mmx_trace = (mem); \
-      fprintf(stderr, #mem "=0x%016llx) => ", mmx_trace.q); \
-      __asm__ __volatile__ (#op " %%" #reg ", %0" \
-                  : "=X" (mem) \
-                  : /* nothing */ ); \
-      mmx_trace = (mem); \
-      fprintf(stderr, #mem "=0x%016llx\n", mmx_trace.q); \
-   }
-
-#define   mmx_r2r(op, regs, regd) \
-   { \
-      mmx_t mmx_trace; \
-      __asm__ __volatile__ ("movq %%" #regs ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #op "_r2r(" #regs "=0x%016llx, ", mmx_trace.q); \
-      __asm__ __volatile__ ("movq %%" #regd ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #regd "=0x%016llx) => ", mmx_trace.q); \
-      __asm__ __volatile__ (#op " %" #regs ", %" #regd); \
-      __asm__ __volatile__ ("movq %%" #regd ", %0" \
-                  : "=X" (mmx_trace) \
-                  : /* nothing */ ); \
-      fprintf(stderr, #regd "=0x%016llx\n", mmx_trace.q); \
-   }
-
-#define   mmx_m2m(op, mems, memd) \
-   { \
-      mmx_t mmx_trace; \
-      mmx_trace = (mems); \
-      fprintf(stderr, #op "_m2m(" #mems "=0x%016llx, ", mmx_trace.q); \
-      mmx_trace = (memd); \
-      fprintf(stderr, #memd "=0x%016llx) => ", mmx_trace.q); \
-      __asm__ __volatile__ ("movq %0, %%mm0\n\t" \
-                  #op " %1, %%mm0\n\t" \
-                  "movq %%mm0, %0" \
-                  : "=X" (memd) \
-                  : "X" (mems)); \
-      mmx_trace = (memd); \
-      fprintf(stderr, #memd "=0x%016llx\n", mmx_trace.q); \
-   }
-
-#else
-
-/*   These macros are a lot simpler without the tracing...
-*/
-
-#define   mmx_m2r(op, mem, reg) \
-   __asm__ __volatile__ (#op " %0, %%" #reg \
-               : /* nothing */ \
-               : "X" (mem))
-
-#define   mmx_r2m(op, reg, mem) \
-   __asm__ __volatile__ (#op " %%" #reg ", %0" \
-               : "=X" (mem) \
-               : /* nothing */ )
-
-#define   mmx_r2r(op, regs, regd) \
-   __asm__ __volatile__ (#op " %" #regs ", %" #regd)
-
-#define   mmx_m2m(op, mems, memd) \
-   __asm__ __volatile__ ("movq %0, %%mm0\n\t" \
-               #op " %1, %%mm0\n\t" \
-               "movq %%mm0, %0" \
-               : "=X" (memd) \
-               : "X" (mems))
-
-#endif
-
-
-/*   1x64 MOVe Quadword
-   (this is both a load and a store...
-    in fact, it is the only way to store)
-*/
-#define   movq_m2r(var, reg)     mmx_m2r(movq, var, reg)
-#define   movq_r2m(reg, var)     mmx_r2m(movq, reg, var)
-#define   movq_r2r(regs, regd)   mmx_r2r(movq, regs, regd)
-#define   movq(vars, vard) \
-   __asm__ __volatile__ ("movq %1, %%mm0\n\t" \
-               "movq %%mm0, %0" \
-               : "=X" (vard) \
-               : "X" (vars))
-
-
-/*   1x64 MOVe Doubleword
-   (like movq, this is both load and store...
-    but is most useful for moving things between
-    mmx registers and ordinary registers)
-*/
-#define   movd_m2r(var, reg)     mmx_m2r(movd, var, reg)
-#define   movd_r2m(reg, var)     mmx_r2m(movd, reg, var)
-#define   movd_r2r(regs, regd)   mmx_r2r(movd, regs, regd)
-#define   movd(vars, vard) \
-   __asm__ __volatile__ ("movd %1, %%mm0\n\t" \
-               "movd %%mm0, %0" \
-               : "=X" (vard) \
-               : "X" (vars))
-
-
-/*   2x32, 4x16, and 8x8 Parallel ADDs
-*/
-#define   paddd_m2r(var, reg)     mmx_m2r(paddd, var, reg)
-#define   paddd_r2r(regs, regd)   mmx_r2r(paddd, regs, regd)
-#define   paddd(vars, vard)       mmx_m2m(paddd, vars, vard)
-
-#define   paddw_m2r(var, reg)     mmx_m2r(paddw, var, reg)
-#define   paddw_r2r(regs, regd)   mmx_r2r(paddw, regs, regd)
-#define   paddw(vars, vard)       mmx_m2m(paddw, vars, vard)
-
-#define   paddb_m2r(var, reg)     mmx_m2r(paddb, var, reg)
-#define   paddb_r2r(regs, regd)   mmx_r2r(paddb, regs, regd)
-#define   paddb(vars, vard)       mmx_m2m(paddb, vars, vard)
-
-
-/*   4x16 and 8x8 Parallel ADDs using Saturation arithmetic
-*/
-#define   paddsw_m2r(var, reg)     mmx_m2r(paddsw, var, reg)
-#define   paddsw_r2r(regs, regd)   mmx_r2r(paddsw, regs, regd)
-#define   paddsw(vars, vard)       mmx_m2m(paddsw, vars, vard)
-
-#define   paddsb_m2r(var, reg)     mmx_m2r(paddsb, var, reg)
-#define   paddsb_r2r(regs, regd)   mmx_r2r(paddsb, regs, regd)
-#define   paddsb(vars, vard)       mmx_m2m(paddsb, vars, vard)
-
-
-/*   4x16 and 8x8 Parallel ADDs using Unsigned Saturation arithmetic
-*/
-#define   paddusw_m2r(var, reg)     mmx_m2r(paddusw, var, reg)
-#define   paddusw_r2r(regs, regd)   mmx_r2r(paddusw, regs, regd)
-#define   paddusw(vars, vard)       mmx_m2m(paddusw, vars, vard)
-
-#define   paddusb_m2r(var, reg)     mmx_m2r(paddusb, var, reg)
-#define   paddusb_r2r(regs, regd)   mmx_r2r(paddusb, regs, regd)
-#define   paddusb(vars, vard)       mmx_m2m(paddusb, vars, vard)
-
-
-/*   2x32, 4x16, and 8x8 Parallel SUBs
-*/
-#define   psubd_m2r(var, reg)     mmx_m2r(psubd, var, reg)
-#define   psubd_r2r(regs, regd)   mmx_r2r(psubd, regs, regd)
-#define   psubd(vars, vard)       mmx_m2m(psubd, vars, vard)
-
-#define   psubw_m2r(var, reg)     mmx_m2r(psubw, var, reg)
-#define   psubw_r2r(regs, regd)   mmx_r2r(psubw, regs, regd)
-#define   psubw(vars, vard)       mmx_m2m(psubw, vars, vard)
-
-#define   psubb_m2r(var, reg)     mmx_m2r(psubb, var, reg)
-#define   psubb_r2r(regs, regd)   mmx_r2r(psubb, regs, regd)
-#define   psubb(vars, vard)       mmx_m2m(psubb, vars, vard)
-
-
-/*   4x16 and 8x8 Parallel SUBs using Saturation arithmetic
-*/
-#define   psubsw_m2r(var, reg)     mmx_m2r(psubsw, var, reg)
-#define   psubsw_r2r(regs, regd)   mmx_r2r(psubsw, regs, regd)
-#define   psubsw(vars, vard)       mmx_m2m(psubsw, vars, vard)
-
-#define   psubsb_m2r(var, reg)     mmx_m2r(psubsb, var, reg)
-#define   psubsb_r2r(regs, regd)   mmx_r2r(psubsb, regs, regd)
-#define   psubsb(vars, vard)       mmx_m2m(psubsb, vars, vard)
-
-
-/*   4x16 and 8x8 Parallel SUBs using Unsigned Saturation arithmetic
-*/
-#define   psubusw_m2r(var, reg)     mmx_m2r(psubusw, var, reg)
-#define   psubusw_r2r(regs, regd)   mmx_r2r(psubusw, regs, regd)
-#define   psubusw(vars, vard)       mmx_m2m(psubusw, vars, vard)
-
-#define   psubusb_m2r(var, reg)     mmx_m2r(psubusb, var, reg)
-#define   psubusb_r2r(regs, regd)   mmx_r2r(psubusb, regs, regd)
-#define   psubusb(vars, vard)       mmx_m2m(psubusb, vars, vard)
-
-
-/*   4x16 Parallel MULs giving Low 4x16 portions of results
-*/
-#define   pmullw_m2r(var, reg)     mmx_m2r(pmullw, var, reg)
-#define   pmullw_r2r(regs, regd)   mmx_r2r(pmullw, regs, regd)
-#define   pmullw(vars, vard)       mmx_m2m(pmullw, vars, vard)
-
-
-/*   4x16 Parallel MULs giving High 4x16 portions of results
-*/
-#define   pmulhw_m2r(var, reg)     mmx_m2r(pmulhw, var, reg)
-#define   pmulhw_r2r(regs, regd)   mmx_r2r(pmulhw, regs, regd)
-#define   pmulhw(vars, vard)       mmx_m2m(pmulhw, vars, vard)
-
-
-/*   4x16->2x32 Parallel Mul-ADD
-   (muls like pmullw, then adds adjacent 16-bit fields
-    in the multiply result to make the final 2x32 result)
-*/
-#define   pmaddwd_m2r(var, reg)     mmx_m2r(pmaddwd, var, reg)
-#define   pmaddwd_r2r(regs, regd)   mmx_r2r(pmaddwd, regs, regd)
-#define   pmaddwd(vars, vard)       mmx_m2m(pmaddwd, vars, vard)
-
-
-/*   1x64 bitwise AND
-*/
-#define   pand_m2r(var, reg)     mmx_m2r(pand, var, reg)
-#define   pand_r2r(regs, regd)   mmx_r2r(pand, regs, regd)
-#define   pand(vars, vard)       mmx_m2m(pand, vars, vard)
-
-
-/*   1x64 bitwise AND with Not the destination
-*/
-#define   pandn_m2r(var, reg)     mmx_m2r(pandn, var, reg)
-#define   pandn_r2r(regs, regd)   mmx_r2r(pandn, regs, regd)
-#define   pandn(vars, vard)       mmx_m2m(pandn, vars, vard)
-
-
-/*   1x64 bitwise OR
-*/
-#define   por_m2r(var, reg)     mmx_m2r(por, var, reg)
-#define   por_r2r(regs, regd)   mmx_r2r(por, regs, regd)
-#define   por(vars, vard)       mmx_m2m(por, vars, vard)
-
-
-/*   1x64 bitwise eXclusive OR
-*/
-#define   pxor_m2r(var, reg)     mmx_m2r(pxor, var, reg)
-#define   pxor_r2r(regs, regd)   mmx_r2r(pxor, regs, regd)
-#define   pxor(vars, vard)       mmx_m2m(pxor, vars, vard)
-
-
-/*   2x32, 4x16, and 8x8 Parallel CoMPare for EQuality
-   (resulting fields are either 0 or -1)
-*/
-#define   pcmpeqd_m2r(var, reg)     mmx_m2r(pcmpeqd, var, reg)
-#define   pcmpeqd_r2r(regs, regd)   mmx_r2r(pcmpeqd, regs, regd)
-#define   pcmpeqd(vars, vard)       mmx_m2m(pcmpeqd, vars, vard)
-
-#define   pcmpeqw_m2r(var, reg)     mmx_m2r(pcmpeqw, var, reg)
-#define   pcmpeqw_r2r(regs, regd)   mmx_r2r(pcmpeqw, regs, regd)
-#define   pcmpeqw(vars, vard)       mmx_m2m(pcmpeqw, vars, vard)
-
-#define   pcmpeqb_m2r(var, reg)     mmx_m2r(pcmpeqb, var, reg)
-#define   pcmpeqb_r2r(regs, regd)   mmx_r2r(pcmpeqb, regs, regd)
-#define   pcmpeqb(vars, vard)       mmx_m2m(pcmpeqb, vars, vard)
-
-
-/*   2x32, 4x16, and 8x8 Parallel CoMPare for Greater Than
-   (resulting fields are either 0 or -1)
-*/
-#define   pcmpgtd_m2r(var, reg)   mmx_m2r(pcmpgtd, var, reg)
-#define   pcmpgtd_r2r(regs, regd)   mmx_r2r(pcmpgtd, regs, regd)
-#define   pcmpgtd(vars, vard)   mmx_m2m(pcmpgtd, vars, vard)
-
-#define   pcmpgtw_m2r(var, reg)   mmx_m2r(pcmpgtw, var, reg)
-#define   pcmpgtw_r2r(regs, regd)   mmx_r2r(pcmpgtw, regs, regd)
-#define   pcmpgtw(vars, vard)   mmx_m2m(pcmpgtw, vars, vard)
-
-#define   pcmpgtb_m2r(var, reg)   mmx_m2r(pcmpgtb, var, reg)
-#define   pcmpgtb_r2r(regs, regd)   mmx_r2r(pcmpgtb, regs, regd)
-#define   pcmpgtb(vars, vard)   mmx_m2m(pcmpgtb, vars, vard)
-
-
-/*   1x64, 2x32, and 4x16 Parallel Shift Left Logical
-*/
-#define   psllq_m2r(var, reg)   mmx_m2r(psllq, var, reg)
-#define   psllq_r2r(regs, regd)   mmx_r2r(psllq, regs, regd)
-#define   psllq(vars, vard)   mmx_m2m(psllq, vars, vard)
-
-#define   pslld_m2r(var, reg)   mmx_m2r(pslld, var, reg)
-#define   pslld_r2r(regs, regd)   mmx_r2r(pslld, regs, regd)
-#define   pslld(vars, vard)   mmx_m2m(pslld, vars, vard)
-
-#define   psllw_m2r(var, reg)   mmx_m2r(psllw, var, reg)
-#define   psllw_r2r(regs, regd)   mmx_r2r(psllw, regs, regd)
-#define   psllw(vars, vard)   mmx_m2m(psllw, vars, vard)
-
-
-/*   1x64, 2x32, and 4x16 Parallel Shift Right Logical
-*/
-#define   psrlq_m2r(var, reg)   mmx_m2r(psrlq, var, reg)
-#define   psrlq_r2r(regs, regd)   mmx_r2r(psrlq, regs, regd)
-#define   psrlq(vars, vard)   mmx_m2m(psrlq, vars, vard)
-
-#define   psrld_m2r(var, reg)   mmx_m2r(psrld, var, reg)
-#define   psrld_r2r(regs, regd)   mmx_r2r(psrld, regs, regd)
-#define   psrld(vars, vard)   mmx_m2m(psrld, vars, vard)
-
-#define   psrlw_m2r(var, reg)   mmx_m2r(psrlw, var, reg)
-#define   psrlw_r2r(regs, regd)   mmx_r2r(psrlw, regs, regd)
-#define   psrlw(vars, vard)   mmx_m2m(psrlw, vars, vard)
-
-
-/*   2x32 and 4x16 Parallel Shift Right Arithmetic
-*/
-#define   psrad_m2r(var, reg)   mmx_m2r(psrad, var, reg)
-#define   psrad_r2r(regs, regd)   mmx_r2r(psrad, regs, regd)
-#define   psrad(vars, vard)   mmx_m2m(psrad, vars, vard)
-
-#define   psraw_m2r(var, reg)   mmx_m2r(psraw, var, reg)
-#define   psraw_r2r(regs, regd)   mmx_r2r(psraw, regs, regd)
-#define   psraw(vars, vard)   mmx_m2m(psraw, vars, vard)
-
-
-/*   2x32->4x16 and 4x16->8x8 PACK and Signed Saturate
-   (packs source and dest fields into dest in that order)
-*/
-#define   packssdw_m2r(var, reg)   mmx_m2r(packssdw, var, reg)
-#define   packssdw_r2r(regs, regd) mmx_r2r(packssdw, regs, regd)
-#define   packssdw(vars, vard)   mmx_m2m(packssdw, vars, vard)
-
-#define   packsswb_m2r(var, reg)   mmx_m2r(packsswb, var, reg)
-#define   packsswb_r2r(regs, regd) mmx_r2r(packsswb, regs, regd)
-#define   packsswb(vars, vard)   mmx_m2m(packsswb, vars, vard)
-
-
-/*   4x16->8x8 PACK and Unsigned Saturate
-   (packs source and dest fields into dest in that order)
-*/
-#define   packuswb_m2r(var, reg)   mmx_m2r(packuswb, var, reg)
-#define   packuswb_r2r(regs, regd) mmx_r2r(packuswb, regs, regd)
-#define   packuswb(vars, vard)   mmx_m2m(packuswb, vars, vard)
-
-
-/*   2x32->1x64, 4x16->2x32, and 8x8->4x16 UNPaCK Low
-   (interleaves low half of dest with low half of source
-    as padding in each result field)
-*/
-#define   punpckldq_m2r(var, reg)   mmx_m2r(punpckldq, var, reg)
-#define   punpckldq_r2r(regs, regd) mmx_r2r(punpckldq, regs, regd)
-#define   punpckldq(vars, vard)   mmx_m2m(punpckldq, vars, vard)
-
-#define   punpcklwd_m2r(var, reg)   mmx_m2r(punpcklwd, var, reg)
-#define   punpcklwd_r2r(regs, regd) mmx_r2r(punpcklwd, regs, regd)
-#define   punpcklwd(vars, vard)   mmx_m2m(punpcklwd, vars, vard)
-
-#define   punpcklbw_m2r(var, reg)   mmx_m2r(punpcklbw, var, reg)
-#define   punpcklbw_r2r(regs, regd) mmx_r2r(punpcklbw, regs, regd)
-#define   punpcklbw(vars, vard)   mmx_m2m(punpcklbw, vars, vard)
-
-
-/*   2x32->1x64, 4x16->2x32, and 8x8->4x16 UNPaCK High
-   (interleaves high half of dest with high half of source
-    as padding in each result field)
-*/
-#define   punpckhdq_m2r(var, reg)   mmx_m2r(punpckhdq, var, reg)
-#define   punpckhdq_r2r(regs, regd) mmx_r2r(punpckhdq, regs, regd)
-#define   punpckhdq(vars, vard)   mmx_m2m(punpckhdq, vars, vard)
-
-#define   punpckhwd_m2r(var, reg)   mmx_m2r(punpckhwd, var, reg)
-#define   punpckhwd_r2r(regs, regd) mmx_r2r(punpckhwd, regs, regd)
-#define   punpckhwd(vars, vard)   mmx_m2m(punpckhwd, vars, vard)
-
-#define   punpckhbw_m2r(var, reg)   mmx_m2r(punpckhbw, var, reg)
-#define   punpckhbw_r2r(regs, regd) mmx_r2r(punpckhbw, regs, regd)
-#define   punpckhbw(vars, vard)   mmx_m2m(punpckhbw, vars, vard)
-
-
-/* 1x64 add/sub -- this is in sse2, not in mmx. */
-#define   paddq_m2r(var, reg)     mmx_m2r(paddq, var, reg)
-#define   paddq_r2r(regs, regd)   mmx_r2r(paddq, regs, regd)
-#define   paddq(vars, vard)       mmx_m2m(paddq, vars, vard)
-
-#define   psubq_m2r(var, reg)     mmx_m2r(psubq, var, reg)
-#define   psubq_r2r(regs, regd)   mmx_r2r(psubq, regs, regd)
-#define   psubq(vars, vard)       mmx_m2m(psubq, vars, vard)
-
-
-
-/*   Empty MMx State
-   (used to clean-up when going from mmx to float use
-    of the registers that are shared by both; note that
-    there is no float-to-mmx operation needed, because
-    only the float tag word info is corruptible)
-*/
-#ifdef   MMX_TRACE
-
-#define   emms() \
-   { \
-      fprintf(stderr, "emms()\n"); \
-      __asm__ __volatile__ ("emms"); \
-   }
-
-#else
-
-#define   emms()         __asm__ __volatile__ ("emms")
-
-#endif
-
-void mkRand( mmx_t* mm )
-{
-  mm->uw[0] = 0xFFFF & (random() >> 7);
-  mm->uw[1] = 0xFFFF & (random() >> 7);
-  mm->uw[2] = 0xFFFF & (random() >> 7);
-  mm->uw[3] = 0xFFFF & (random() >> 7);
-}
-
-
-
-int main( void )
-{
-  int i;
-  //   int rval;
-   mmx_t ma;
-   mmx_t mb;
-   mmx_t ma0, mb0;
-   movq_r2r(mm0, mm1);
-
-//   rval = mmx_ok();
-
-   /* Announce return value of mmx_ok() */
-//   printf("Value returned from init was %x.", rval);
-//   printf(" (Indicates MMX %s available)\n\n",(rval)? "is" : "not");
-//   fflush(stdout); fflush(stdout);
-
-//   if(rval)
-
-#define do_test(_name, _operation) \
-   for (i = 0; i < 25000; i++) {                                 \
-      mkRand(&ma);                                               \
-      mkRand(&mb);                                               \
-      ma0 = ma; mb0 = mb;                                        \
-      _operation;                                                \
-      fprintf(stdout, "%s ( %016llx, %016llx ) -> %016llx\n",    \
-                     _name, ma0.q, mb0.q, mb.q);                 \
-      fflush(stdout);                                            \
-   }
-
-
-   {
-     do_test("paddd", paddd(ma,mb));
-     do_test("paddw", paddw(ma,mb));
-     do_test("paddb", paddb(ma,mb));
-
-     do_test("paddsw", paddsw(ma,mb));
-     do_test("paddsb", paddsb(ma,mb));
-
-     do_test("paddusw", paddusw(ma,mb));
-     do_test("paddusb", paddusb(ma,mb));
-
-     do_test("psubd", psubd(ma,mb));
-     do_test("psubw", psubw(ma,mb));
-     do_test("psubb", psubb(ma,mb));
-
-     do_test("psubsw", psubsw(ma,mb));
-     do_test("psubsb", psubsb(ma,mb));
-
-     do_test("psubusw", psubusw(ma,mb));
-     do_test("psubusb", psubusb(ma,mb));
-
-     do_test("pmulhw", pmulhw(ma,mb));
-     do_test("pmullw", pmullw(ma,mb));
-
-     do_test("pmaddwd", pmaddwd(ma,mb));
-
-     do_test("pcmpeqd", pcmpeqd(ma,mb));
-     do_test("pcmpeqw", pcmpeqw(ma,mb));
-     do_test("pcmpeqb", pcmpeqb(ma,mb));
-
-     do_test("pcmpgtd", pcmpgtd(ma,mb));
-     do_test("pcmpgtw", pcmpgtw(ma,mb));
-     do_test("pcmpgtb", pcmpgtb(ma,mb));
-
-     do_test("packssdw", packssdw(ma,mb));
-     do_test("packsswb", packsswb(ma,mb));
-     do_test("packuswb", packuswb(ma,mb));
-
-     do_test("punpckhdq", punpckhdq(ma,mb));
-     do_test("punpckhwd", punpckhwd(ma,mb));
-     do_test("punpckhbw", punpckhbw(ma,mb));
-
-     do_test("punpckldq", punpckldq(ma,mb));
-     do_test("punpcklwd", punpcklwd(ma,mb));
-     do_test("punpcklbw", punpcklbw(ma,mb));
-
-     do_test("pand", pand(ma,mb));
-     do_test("pandn", pandn(ma,mb));
-     do_test("por", por(ma,mb));
-     do_test("pxor", pxor(ma,mb));
-
-     do_test("psllq", psllq(ma,mb));
-     do_test("pslld", pslld(ma,mb));
-     do_test("psllw", psllw(ma,mb));
-
-     do_test("psrlq", psrlq(ma,mb));
-     do_test("psrld", psrld(ma,mb));
-     do_test("psrlw", psrlw(ma,mb));
-
-     do_test("psrad", psrad(ma,mb));
-     do_test("psraw", psraw(ma,mb));
-
-#if HAVE_SSE2
-     do_test("paddq", paddq(ma,mb));
-     do_test("psubq", psubq(ma,mb));
-#endif
-
-     emms();
-   }
-
-   /* Clean-up and exit nicely */
-   exit(0);
-}

diff --git a/VEX/test/mxcsr.c b/VEX/test/mxcsr.c
deleted file mode 100644 (file)
index cc92f54..0000000
--- a/VEX/test/mxcsr.c
+++ /dev/null
@@ -1,45 +0,0 @@
-
-#include <stdio.h>
-
-void mxcsr_default ( void )
-{
-  asm(" pushl $0x1F80 ; ldmxcsr (%esp) ; addl $4, %esp");
-}
-
-void mxcsr_exns ( void )
-{
-  asm(" pushl $0x1F00 ; ldmxcsr (%esp) ; addl $4, %esp");
-}
-
-/* PIII doesn't have DAZ, so this segfaults (!) on PIII. */a
-void mxcsr_daz ( void )
-{
-  asm(" pushl $0x1FC0 ; ldmxcsr (%esp) ; addl $4, %esp");
-}
-
-void mxcsr_fz ( void )
-{
-  asm(" pushl $0x9F80 ; ldmxcsr (%esp) ; addl $4, %esp");
-}
-
-
-int main ( void )
-{
-   printf("default\n");
-   mxcsr_default();
-   printf("\n");
-
-   printf("exns\n");
-   mxcsr_exns();
-   printf("\n");
-
-   printf("daz\n");
-   mxcsr_daz();
-   printf("\n");
-
-   printf("fz\n");
-   mxcsr_fz();
-   printf("\n");
-
-   return 0;
-}

diff --git a/VEX/test/rounderr.c b/VEX/test/rounderr.c
deleted file mode 100644 (file)
index 0055a09..0000000
--- a/VEX/test/rounderr.c
+++ /dev/null
@@ -1,97 +0,0 @@
-
-/* peach (7400, altivec supported, 450MHz, gcc -O) 
-   m1 = 1.20000000000000018,  exp = 1.19999999999999996
-   m2 = 1.19999999999998885,  exp = 1.19999999999999996
-*/
-
-/* peach (7400, altivec supported, 450MHz, gcc) 
-   m1 = 1.20000000000000018,  exp = 1.19999999999999996
-   m2 = 1.19999999999998885,  exp = 1.19999999999999996
-*/
-
-/* phoenix, gcc -O
-   m1 = 1.19999999999999996,  exp = 1.19999999999999996
-   m2 = 1.19999999999999996,  exp = 1.19999999999999996
-*/
-
-/* phoenix, icc -O
-   m1 = 1.19999999999999996,  exp = 1.19999999999999996
-   m2 = 1.19999999999999996,  exp = 1.19999999999999996
-*/
-
-/* phoenix, gcc -O, iropt-level=2
-   m1 = 1.20000000000000040,  exp = 1.19999999999999996
-   m2 = 1.19999999999999440,  exp = 1.19999999999999996
-*/
-
-/* phoenix, gcc -O, iropt-level=1/0
-   m1 = 1.20000000000000018,  exp = 1.19999999999999996
-   m2 = 1.19999999999998885,  exp = 1.19999999999999996
-*/
-
-
-#include <stdlib.h>
-#include <stdio.h>
-#include <math.h>
-
-#define NNN 1000
-
-
-double
-my_mean1 (const double data[], size_t stride, const size_t size)
-{
-  /* Compute the arithmetic mean of a dataset using the recurrence relation
-     mean_(n) = mean(n-1) + (data[n] - mean(n-1))/(n+1)   */
-  long double mean = 0;
-  size_t i;
-
-  for (i = 0; i < size; i++)
-    {
-      mean += (data[i * stride] - mean) / (i + 1);
-    }
-  return mean;
-}
-
-double
-my_mean2 (const double data[], size_t stride, const size_t size)
-{
-  /* Compute the arithmetic mean of a dataset using the 
-     obvious scheme. */
-  int i;
-  long double sum = 0;
-  for (i = 0; i < size; i++)
-    sum += data[i * stride];
-  return sum / (double)size;
-}
-
-
-int main (void)
-{
-  int i;
-  const size_t nacc2 = NNN+1;
-  double numacc2[NNN+1] ;
-
-  numacc2[0] = 1.2 ;
- 
-  for (i = 1 ; i < NNN; i += 2) 
-     numacc2[i] = 1.1 ;
-
-  for (i = 1 ; i < NNN; i += 2) 
-      numacc2[i+1] = 1.3 ;
-
-#if 1
-  asm __volatile__("fninit");
-#endif
-
-  {
-    double m1 = my_mean1 (numacc2, 1, nacc2);
-    double m2 = my_mean2 (numacc2, 1, nacc2);
-    double expected_mean = 1.2;
-    printf("m1 = %19.17f,  exp = %19.17f\n", m1, expected_mean);
-    printf("m2 = %19.17f,  exp = %19.17f\n", m2, expected_mean);
-  }
-
-  return 0;
-}
-
-