graphviz.notation: missed a create -> create-word
parent
90111600b9
commit
0f105e399e
|
@ -22,7 +22,7 @@ IN: graphviz.notation
|
||||||
: =attr-generic ( name -- generic )
|
: =attr-generic ( name -- generic )
|
||||||
"=" prepend "graphviz.notation" 2dup lookup-word
|
"=" prepend "graphviz.notation" 2dup lookup-word
|
||||||
[ 2nip ] [
|
[ 2nip ] [
|
||||||
create dup
|
create-word dup
|
||||||
1 <standard-combination>
|
1 <standard-combination>
|
||||||
( graphviz-obj val -- graphviz-obj' )
|
( graphviz-obj val -- graphviz-obj' )
|
||||||
define-generic
|
define-generic
|
||||||
|
|
Loading…
Reference in New Issue