set-nibble ( value n byte -- byte' ) (original) (raw)

set-nibble ( value n byte -- byte' )

Vocabulary
nibble-arrays.private

Inputs

value an object
n an object
byte an object

Outputs

byte' an object

Definition

USING: math ;

IN: nibble-arrays.private

:: set-nibble ( value n byte -- byte' )
byte nibble n shift bitnot bitand value n shift bitor ;
inline