write-csexp ( obj -- )

Vocabulary

csexp

Inputs

obj

an object

Outputs

None

Definition

IN: csexp

GENERIC: write-csexp ( obj -- )

Methods

USING: csexp io sequences ;

M: sequence write-csexp
    40 write1 [ write-csexp ] each 41 write1 ;


USING: csexp io kernel math.parser sequences strings ;

M: string write-csexp
    dup length number>string write 58 write1 write ;