my( $loWord, $hiWord ) = ( $n & 0xffff, $n >> 16 );