Eric Pouech : oleau32/tests: Convert I8Copy to existing integer test scheme.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: c53980950b22c908b1488479b103bfad2e8d6d0d
URL:    https://source.winehq.org/git/wine.git/?a=commit;h=c53980950b22c908b1488479b...

Author: Eric Pouech 
Date:   Fri Mar 11 09:06:22 2022 +0100

oleau32/tests: Convert I8Copy to existing integer test scheme.

Signed-off-by: Eric Pouech 
Signed-off-by: Alexandre Julliard

---

dlls/oleaut32/tests/vartype.c | 22 +---------------------
 1 file changed, 1 insertion(+), 21 deletions(-)

diff --git a/dlls/oleaut32/tests/vartype.c b/dlls/oleaut32/tests/vartype.c
index 220a5f59c9f..1f8cafc82b8 100644
--- a/dlls/oleaut32/tests/vartype.c
+++ b/dlls/oleaut32/tests/vartype.c
@@ -2057,33 +2057,13 @@ static void test_VarI8FromStr(void)

static void test_VarI8Copy(void)
 {
-  HRESULT hres;
-  VARIANTARG vSrc, vDst;
-  LONGLONG in = 1;
-
   if (!has_i8)
   {
     win_skip("I8 and UI8 data types are not available\n");
     return;
   }

-  VariantInit(&vSrc);
-  VariantInit(&vDst);
-  V_VT(&vSrc) = VT_I8;
-  V_I8(&vSrc) = in;
-  hres = VariantCopy(&vDst, &vSrc);
-  ok(hres == S_OK && V_VT(&vDst) == VT_I8 && V_I8(&vDst) == in,
-     "copy hres 0x%X, type %d, value (%x%08x) %x%08x\n",
-     hres, V_VT(&vDst), (UINT)(in >> 32), (UINT)in, (UINT)(V_I8(&vDst) >> 32), (UINT)V_I8(&vDst) );
-  V_VT(&vSrc) = VT_I8|VT_BYREF;
-  V_I8REF(&vSrc) = ∈
-  hres = VariantCopy(&vDst, &vSrc);
-  ok(hres == S_OK && V_VT(&vDst) == (VT_I8|VT_BYREF) && V_I8REF(&vDst) == &in,
-     "ref hres 0x%X, type %d, ref (%p) %p\n", hres, V_VT(&vDst), &in, V_I8REF(&vDst));
-  hres = VariantCopyInd(&vDst, &vSrc);
-  ok(hres == S_OK && V_VT(&vDst) == VT_I8 && V_I8(&vDst) == in,
-     "copy hres 0x%X, type %d, value (%x%08x) %x%08x\n",
-     hres, V_VT(&vDst), (UINT)(in >> 32), (UINT)in, (UINT)(V_I8(&vDst) >> 32), (UINT)V_I8(&vDst) );
+  COPYTEST(1ll, VT_I8, V_I8(&vSrc), V_I8(&vDst), V_I8REF(&vSrc), V_I8REF(&vDst), "%I64d");
 }

static void test_VarI8ChangeTypeEx(void)