toggle-bit ( ? n x -- y ) (original) (raw)

toggle-bit ( ? n x -- y )

Vocabulary
bit-arrays.private

Inputs

Outputs

Definition

USING: kernel math.bitwise ;

IN: bit-arrays.private

:: toggle-bit ( ? n x -- y )
x n ? [ set-bit ] [ clear-bit ] if ; inline