update-string ( str reverse -- str )

Vocabulary

rosetta-code.animation

Inputs

str	an object
reverse	an object

Outputs

str

an object

Definition

USING: kernel sequences ;

IN: rosetta-code.animation

: update-string ( str reverse -- str )
    [ unclip-last prefix ] [ unclip suffix ] if ;