(align) ( n m -- n' )

Vocabulary

bitstreams

Inputs

n	an object
m	an object

Outputs

n'

an object

Definition

USING: kernel math ;

IN: bitstreams

: (align) ( n m -- n' ) [ /mod 0 > [ 1 + ] when ] [ * ] bi ;
    inline