All pastes #274143 Raw Edit

Someone

public text v1 · immutable
·published 2006-12-10 13:34 UTC
rendered paste body
here 0 ,
: withdraw ( n -- old-n )
    [ dup literal ] tuck @ swap - tuck swap ! ;
: deposit ( n -- n+old )
    [ dup literal ] tuck @ + tuck swap ! ;
drop