storage>n ( string -- n )


Vocabulary
units.reduction

Definition
USING: continuations kernel splitting ;

IN: units.reduction

: storage>n ( string -- n )
[ "i" ?tail [ 10 2 (storage>n) ] [ 3 10 (storage>n) ] if ]
[ \ bad-storage-string boa rethrow ] recover ;