107 lines
3.6 KiB
C
107 lines
3.6 KiB
C
|
|
#ifdef _MSC_VER
|
|
# include <intrin.h>
|
|
|
|
#define COUNT_LEADING_ZEROS_NEED_CLZ_TAB
|
|
|
|
# if defined( _WIN64 )
|
|
|
|
# pragma intrinsic(_BitScanForward64)
|
|
# pragma intrinsic(_BitScanReverse64)
|
|
# pragma intrinsic(_umul128)
|
|
# pragma intrinsic(_byteswap_uint64)
|
|
|
|
# define count_leading_zeros(c,x) \
|
|
do { unsigned long _z; \
|
|
ASSERT ((x) != 0); \
|
|
_BitScanReverse64(&_z, (x)); \
|
|
c = 63 - _z; \
|
|
} while (0)
|
|
# define count_trailing_zeros(c,x) \
|
|
do { unsigned long _z; \
|
|
ASSERT ((x) != 0); \
|
|
_BitScanForward64(&_z, (x)); \
|
|
c = _z; \
|
|
} while (0)
|
|
# define umul_ppmm(xh, xl, m0, m1) \
|
|
do { \
|
|
xl = _umul128( (m0), (m1), &xh); \
|
|
} while (0)
|
|
|
|
# if !defined( BSWAP_LIMB )
|
|
# define BSWAP_LIMB
|
|
# define BSWAP_LIMB(dst, src) dst = _byteswap_uint64(src)
|
|
# endif
|
|
|
|
# endif /* _WIN64 */
|
|
|
|
#endif /* _MSC_VER */
|
|
|
|
/* We need to put the the gcc inline asm for MinGW64 here as well */
|
|
|
|
/* longlong.h -- definitions for mixed size 32/64 bit arithmetic.
|
|
|
|
Copyright 1991, 1992, 1993, 1994, 1996, 1997, 1999, 2000, 2001, 2002, 2003,
|
|
2004, 2005 Free Software Foundation, Inc.
|
|
|
|
This file is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU Lesser General Public License as published by
|
|
the Free Software Foundation; either version 2.1 of the License, or (at your
|
|
option) any later version.
|
|
|
|
This file is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
|
|
License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
along with this file; see the file COPYING.LIB. If not, write to
|
|
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
|
|
MA 02110-1301, USA. */
|
|
|
|
#if defined (__GNUC__) || defined(INTEL_COMPILER)
|
|
|
|
#define add_ssaaaa(sh, sl, ah, al, bh, bl) \
|
|
__asm__ ("addq %5,%q1\n\tadcq %3,%q0" \
|
|
: "=r" (sh), "=&r" (sl) \
|
|
: "0" ((UDItype)(ah)), "rme" ((UDItype)(bh)), \
|
|
"%1" ((UDItype)(al)), "rme" ((UDItype)(bl)))
|
|
#define sub_ddmmss(sh, sl, ah, al, bh, bl) \
|
|
__asm__ ("subq %5,%q1\n\tsbbq %3,%q0" \
|
|
: "=r" (sh), "=&r" (sl) \
|
|
: "0" ((UDItype)(ah)), "rme" ((UDItype)(bh)), \
|
|
"1" ((UDItype)(al)), "rme" ((UDItype)(bl)))
|
|
#define umul_ppmm(w1, w0, u, v) \
|
|
__asm__ ("mulq %3" \
|
|
: "=a" (w0), "=d" (w1) \
|
|
: "%0" ((UDItype)(u)), "rm" ((UDItype)(v)))
|
|
#define udiv_qrnnd(q, r, n1, n0, dx) /* d renamed to dx avoiding "=d" */\
|
|
__asm__ ("divq %4" /* stringification in K&R C */ \
|
|
: "=a" (q), "=d" (r) \
|
|
: "0" ((UDItype)(n0)), "1" ((UDItype)(n1)), "rm" ((UDItype)(dx)))
|
|
/* bsrq destination must be a 64-bit register, hence UDItype for __cbtmp. */
|
|
#define count_leading_zeros(count, x) \
|
|
do { \
|
|
UDItype __cbtmp; \
|
|
ASSERT ((x) != 0); \
|
|
__asm__ ("bsrq %1,%0" : "=r" (__cbtmp) : "rm" ((UDItype)(x))); \
|
|
(count) = __cbtmp ^ 63; \
|
|
} while (0)
|
|
/* bsfq destination must be a 64-bit register, "%q0" forces this in case
|
|
count is only an int. */
|
|
#define count_trailing_zeros(count, x) \
|
|
do { \
|
|
ASSERT ((x) != 0); \
|
|
__asm__ ("bsfq %1,%q0" : "=r" (count) : "rm" ((UDItype)(x))); \
|
|
} while (0)
|
|
|
|
#if !defined(BSWAP_LIMB)
|
|
#define BSWAP_LIMB
|
|
#define BSWAP_LIMB(dst, src) \
|
|
do { \
|
|
__asm__ ("bswap %q0" : "=r" (dst) : "0" (src)); \
|
|
} while (0)
|
|
#endif
|
|
|
|
#endif
|