pprint-slot ( slot-spec -- )


Vocabulary
see.private

Inputs
slot-specan object


Outputs
None

Definition
USING: kernel sequences ;

IN: see.private

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