… | |
… | |
710 | |
710 | |
711 | /* if SvANY points to the head, we need to adjust the pointers, |
711 | /* if SvANY points to the head, we need to adjust the pointers, |
712 | * as the pointer for a still points to b, and maybe vice versa. |
712 | * as the pointer for a still points to b, and maybe vice versa. |
713 | */ |
713 | */ |
714 | U32 svany_in_head_set = (1 << SVt_NULL) | (1 << SVt_BIND) | (1 << SVt_IV) | (1 << SVt_RV); |
714 | U32 svany_in_head_set = (1 << SVt_NULL) | (1 << SVt_BIND) | (1 << SVt_IV) | (1 << SVt_RV); |
715 | #if NVSIZE <= IVSIZE && PERL_VERSION_ATLEAST(5,20,0) |
715 | #if NVSIZE <= IVSIZE && PERL_VERSION_ATLEAST(5,22,0) |
716 | svany_in_head_set |= 1 << SVt_NV; |
716 | svany_in_head_set |= 1 << SVt_NV; |
717 | #endif |
717 | #endif |
718 | |
718 | |
719 | #define svany_in_head(type) (svany_in_head_set & (1 << (type))) |
719 | #define svany_in_head(type) (svany_in_head_set & (1 << (type))) |
720 | |
720 | |