reactos/subsystems/win32/win32k/include/floatobj.h

   1 #pragma once
   2
   3 #if defined(_M_IX86)
   4
   5 FORCEINLINE
   6 BOOL
   7 _FLOATOBJ_Equal(FLOATOBJ *pf1, FLOATOBJ *pf2)
   8 {
   9         EFLOAT_S *pef1 = (EFLOAT_S*)pf1;
  10         EFLOAT_S *pef2 = (EFLOAT_S*)pf2;
  11         return (pef1->lMant == pef2->lMant && pef1->lExp == pef2->lExp);
  12 }
  13
  14 FORCEINLINE
  15 LONG
  16 _FLOATOBJ_GetLong(FLOATOBJ *pf)
  17 {
  18         EFLOAT_S *pef = (EFLOAT_S*)pf;
  19         return pef->lMant >> (32 - pef->lExp);
  20 }
  21
  22 FORCEINLINE
  23 LONG
  24 _FLOATOBJ_GetFix(FLOATOBJ *pf)
  25 {
  26         EFLOAT_S *pef = (EFLOAT_S*)pf;
  27         LONG Shift = (28 - pef->lExp);
  28         return (Shift >= 0 ? pef->lMant >> Shift : pef->lMant << -Shift);
  29 }
  30
  31 FORCEINLINE
  32 BOOL
  33 _FLOATOBJ_IsLong(FLOATOBJ *pf)
  34 {
  35         EFLOAT_S *pef = (EFLOAT_S*)pf;
  36         ULONG Shift = 32 - pef->lExp;
  37         if (Shift > 31) return FALSE;
  38         return (((pef->lMant >> Shift) << Shift) == pef->lMant);
  39 }
  40
  41 FORCEINLINE
  42 BOOL
  43 _FLOATOBJ_Equal0(FLOATOBJ *pf)
  44 {
  45         EFLOAT_S *pef = (EFLOAT_S*)pf;
  46         return (pef->lMant == 0 && pef->lExp == 0);
  47 }
  48
  49 FORCEINLINE
  50 BOOL
  51 _FLOATOBJ_Equal1(FLOATOBJ *pf)
  52 {
  53         EFLOAT_S *pef = (EFLOAT_S*)pf;
  54         return (pef->lMant == 0x40000000 && pef->lExp == 2);
  55 }
  56
  57 extern const FLOATOBJ gef0;
  58 extern const FLOATOBJ gef1;
  59 extern const FLOATOBJ gef16;
  60
  61 #define FLOATOBJ_0 {0x00000000, 0x00000000}
  62 #define FLOATOBJ_1 {0x40000000, 0x00000002}
  63 #define FLOATOBJ_16 {0x40000000, 0x00000006}
  64 #define FLOATOBJ_1_16 {0x40000000, 0xfffffffe}
  65
  66 #define FLOATOBJ_Set0(fo) (fo)->ul1 = 0; (fo)->ul2 = 0;
  67 #define FLOATOBJ_Set1(fo) (fo)->ul1 = 0x40000000; (fo)->ul2 = 2;
  68
  69 #else
  70
  71 #define _FLOATOBJ_Equal(pf,pf1) (*(pf) == *(pf1))
  72 #define _FLOATOBJ_GetLong(pf) ((LONG)*(pf))
  73 #define _FLOATOBJ_IsLong(pf) ((FLOAT)((LONG)*(pf)) == *(pf))
  74 #define _FLOATOBJ_Equal0(pf) (*(pf) == 0.)
  75 #define _FLOATOBJ_Equal1(pf) (*(pf) == 1.)
  76 #define _FLOATOBJ_GetFix(pf) ((LONG)(*(pf) * 16.))
  77
  78 #define FLOATOBJ_0 0.
  79 #define FLOATOBJ_1 1.
  80 #define FLOATOBJ_16 16.
  81 #define FLOATOBJ_1_16 (1./16.)
  82
  83 #define gef0 FLOATOBJ_0
  84 #define gef1 FLOATOBJ_1
  85 #define gef16 FLOATOBJ_16
  86
  87 #define FLOATOBJ_Set0(fo) *(fo) = 0;
  88 #define FLOATOBJ_Set1(fo) *(fo) = 1;
  89
  90 #endif