write-whitespace ( last obj -- )

Vocabulary

modern.out

Inputs

last	an object
obj	an object

Outputs

None

Definition

USING: io kernel modern.slices ;

IN: modern.out

: write-whitespace ( last obj -- )
    swap [ swap slice-between ] [ slice-before ] if*
    trim-before-newline write ;