(-) ( brainfuck n -- brainfuck )

Vocabulary

brainfuck.private

Inputs

brainfuck	an object
n	an object

Outputs

brainfuck

an object

Definition

USING: kernel math ;

IN: brainfuck.private

: (-) ( brainfuck n -- brainfuck )
    [ get-memory ] dip - 255 bitand set-memory ;