shithub: 9ficl

ref: 7d02e382d314d5bdde7978ccb7a64ea9201d03db
dir: 9ficl/test/prefix.fr

View raw version 
: 0x  { | old-base -- n }
    base @ to old-base
    16 base !
    0 0 parse-word >number 2drop drop
    old-base base !
;