=comment ( 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#: =comment 1 ( graphviz-obj val -- graphviz-obj' )

Methods

USING: accessors graphviz.attributes graphviz.notation present ;

M: edge-attributes =comment present >>comment ;


USING: accessors graphviz graphviz.notation kernel present ;

M: edge =comment present over attributes>> comment<< ;


USING: accessors graphviz.attributes graphviz.notation present ;

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


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

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


USING: accessors graphviz.attributes graphviz.notation present ;

M: node-attributes =comment present >>comment ;


USING: accessors graphviz graphviz.notation kernel present ;

M: node =comment present over attributes>> comment<< ;


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

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