(padded-total) ( row col -- str n format )

Vocabulary

benchmark.pidigits

Inputs

row	an object
col	an object

Outputs

str	an object
n	an object
format	an object

Definition

USING: math math.parser sequences ;

IN: benchmark.pidigits

:: (padded-total) ( row col -- str n format )
    "" row col + "%" "s\t:%d\n" 10 col - number>string glue ;