pprint-slot ( slot-spec -- )

Vocabulary

see.private

Inputs

slot-spec

an object

Outputs

None

Definition

USING: kernel sequences ;

IN: see.private

: pprint-slot ( slot-spec -- )
    unparse-slot dup length 1 = [ first ] when pprint-slot-name
    ;