culp
return ((((va >> shr | ((shl < len) ? *(culp)p2 << shl : 0)) ^
*(culp)p1) & ((1L << len) - 1)) != 0);
if (*(culp)p1 != *(culp)p2)
return (((*(culp)p1 ^ *(culp)p2)
va = *(culp)p2;
vb = *(culp)p2;
if (*(culp)p1 != (va >> shr | vb << shl))