=labeljust ( graphviz-obj val -- graphviz-obj' )

Vocabulary

graphviz.notation

Inputs

graphviz-obj	an object
val	an object

Outputs

graphviz-obj'

an object

Definition

IN: graphviz.notation

GENERIC#: =labeljust 1 ( graphviz-obj val -- graphviz-obj' )

Methods

USING: accessors graphviz.attributes graphviz.notation present ;

M: graph-attributes =labeljust present >>labeljust ;


USING: accessors graphviz graphviz.attributes graphviz.notation
kernel present ;

M: graph =labeljust
    <graph-attributes> swap present >>labeljust add ;


USING: accessors graphviz graphviz.attributes graphviz.notation
kernel present ;

M: subgraph =labeljust
    <graph-attributes> swap present >>labeljust add ;