X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;f=src%2Fcalc%2Fbin.h;fp=src%2Fcalc%2Fbin.h;h=ab79f21206cdb9783b9bba512ea31826cd854ee3;hb=10e51aad0515e80adeb96a47776a2d80e62a98bc;hp=772bd9863d52955753d331bf6ebdd8ce76a7bf93;hpb=585ba48b2f2f3e7413fae1d8bef93523c13f253e;p=m6w6%2Fext-psi diff --git a/src/calc/bin.h b/src/calc/bin.h index 772bd98..ab79f21 100644 --- a/src/calc/bin.h +++ b/src/calc/bin.h @@ -65,14 +65,20 @@ static inline token_t psi_calc_bin_lshift(token_t t1, impl_val *v1, token_t t2, i1.u64 = v1->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i1.u64 = v1->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i1.u64 = v1->u128; break; +#endif + case PSI_T_FLOAT: i1.u64 = v1->fval; break; @@ -118,12 +124,18 @@ static inline token_t psi_calc_bin_lshift(token_t t1, impl_val *v1, token_t t2, case PSI_T_UINT64: i2.u64 = v2->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i2.u64 = v2->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i2.u64 = v2->u128; break; +#endif + case PSI_T_FLOAT: i2.u64 = v2->fval; break; @@ -182,14 +194,20 @@ static inline token_t psi_calc_bin_rshift(token_t t1, impl_val *v1, token_t t2, i1.u64 = v1->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i1.u64 = v1->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i1.u64 = v1->u128; break; +#endif + case PSI_T_FLOAT: i1.u64 = v1->fval; break; @@ -235,12 +253,18 @@ static inline token_t psi_calc_bin_rshift(token_t t1, impl_val *v1, token_t t2, case PSI_T_UINT64: i2.u64 = v2->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i2.u64 = v2->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i2.u64 = v2->u128; break; +#endif + case PSI_T_FLOAT: i2.u64 = v2->fval; break; @@ -299,14 +323,20 @@ static inline token_t psi_calc_bin_and(token_t t1, impl_val *v1, token_t t2, imp i1.u64 = v1->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i1.u64 = v1->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i1.u64 = v1->u128; break; +#endif + case PSI_T_FLOAT: i1.u64 = v1->fval; break; @@ -352,12 +382,18 @@ static inline token_t psi_calc_bin_and(token_t t1, impl_val *v1, token_t t2, imp case PSI_T_UINT64: i2.u64 = v2->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i2.u64 = v2->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i2.u64 = v2->u128; break; +#endif + case PSI_T_FLOAT: i2.u64 = v2->fval; break; @@ -416,14 +452,20 @@ static inline token_t psi_calc_bin_xor(token_t t1, impl_val *v1, token_t t2, imp i1.u64 = v1->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i1.u64 = v1->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i1.u64 = v1->u128; break; +#endif + case PSI_T_FLOAT: i1.u64 = v1->fval; break; @@ -469,12 +511,18 @@ static inline token_t psi_calc_bin_xor(token_t t1, impl_val *v1, token_t t2, imp case PSI_T_UINT64: i2.u64 = v2->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i2.u64 = v2->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i2.u64 = v2->u128; break; +#endif + case PSI_T_FLOAT: i2.u64 = v2->fval; break; @@ -533,14 +581,20 @@ static inline token_t psi_calc_bin_or(token_t t1, impl_val *v1, token_t t2, impl i1.u64 = v1->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i1.u64 = v1->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i1.u64 = v1->u128; break; +#endif + case PSI_T_FLOAT: i1.u64 = v1->fval; break; @@ -586,12 +640,18 @@ static inline token_t psi_calc_bin_or(token_t t1, impl_val *v1, token_t t2, impl case PSI_T_UINT64: i2.u64 = v2->u64; break; +#if HAVE_INT128 case PSI_T_INT128: i2.u64 = v2->i128; break; +#endif + +#if HAVE_UINT128 case PSI_T_UINT128: i2.u64 = v2->u128; break; +#endif + case PSI_T_FLOAT: i2.u64 = v2->fval; break;