(<>) ( state -- state' )

Vocabulary

brain-flak.private

Inputs

state

an object

Outputs

state'

an object

Definition

USING: accessors kernel ;

IN: brain-flak.private

: (<>) ( state -- state' )
    dup [ active>> ] [ inactive>> ] bi
    [ >>inactive ] [ >>active ] bi* ;