Lines Matching defs:struct
13 # Otherwise the loading 'struct.tcl' may get into trouble
16 namespace eval ::struct {}
17 namespace eval ::struct::graph {}
26 namespace eval ::struct {}
27 namespace eval ::struct::graph {
102 # ::struct::graph::graph --
113 proc ::struct::graph::graph {{name ""}} {
126 namespace eval ::struct::graph::graph$name {
154 interp alias {} ::$name {} ::struct::graph::GraphProc $name
162 # ::struct::graph::GraphProc --
173 proc ::struct::graph::GraphProc {name {cmd ""} args} {
180 if { [llength [info commands ::struct::graph::_$cmd]] == 0 } {
186 eval [list ::struct::graph::_$cmd $name] $args
189 # ::struct::graph::_arc --
202 proc ::struct::graph::_arc {name cmd args} {
205 if { [llength [info commands ::struct::graph::__arc_$cmd]] == 0 } {
212 eval [list ::struct::graph::__arc_$cmd $name] $args
215 # ::struct::graph::__arc_delete --
226 proc ::struct::graph::__arc_delete {name args} {
234 upvar ::struct::graph::graph${name}::inArcs inArcs
235 upvar ::struct::graph::graph${name}::outArcs outArcs
236 upvar ::struct::graph::graph${name}::arcNodes arcNodes
243 unset ::struct::graph::graph${name}::arc$arc
257 # ::struct::graph::__arc_exists --
268 proc ::struct::graph::__arc_exists {name arc} {
269 return [info exists ::struct::graph::graph${name}::arcNodes($arc)]
272 # ::struct::graph::__arc_get --
285 proc ::struct::graph::__arc_get {name arc {flag -key} {key data}} {
290 upvar ::struct::graph::graph${name}::arc${arc} data
299 # ::struct::graph::__arc_getall --
310 proc ::struct::graph::__arc_getall {name arc args} {
319 upvar ::struct::graph::graph${name}::arc${arc} data
324 # ::struct::graph::__arc_keys --
335 proc ::struct::graph::__arc_keys {name arc args} {
344 upvar ::struct::graph::graph${name}::arc${arc} data
349 # ::struct::graph::__arc_keyexists --
362 proc ::struct::graph::__arc_keyexists {name arc {flag -key} {key data}} {
371 upvar ::struct::graph::graph${name}::arc${arc} data
376 # ::struct::graph::__arc_insert --
390 proc ::struct::graph::__arc_insert {name source target args} {
411 upvar ::struct::graph::graph${name}::inArcs inArcs
412 upvar ::struct::graph::graph${name}::outArcs outArcs
413 upvar ::struct::graph::graph${name}::arcNodes arcNodes
414 upvar ::struct::graph::graph${name}::arc${arc} data
427 # ::struct::graph::__arc_set --
439 proc ::struct::graph::__arc_set {name arc args} {
444 upvar ::struct::graph::graph${name}::arc$arc data
479 # ::struct::graph::__arc_append --
491 proc ::struct::graph::__arc_append {name arc args} {
496 upvar ::struct::graph::graph${name}::arc$arc data
517 # ::struct::graph::__arc_lappend --
529 proc ::struct::graph::__arc_lappend {name arc args} {
534 upvar ::struct::graph::graph${name}::arc$arc data
555 # ::struct::graph::__arc_source --
566 proc ::struct::graph::__arc_source {name arc} {
571 upvar ::struct::graph::graph${name}::arcNodes arcNodes
575 # ::struct::graph::__arc_target --
586 proc ::struct::graph::__arc_target {name arc} {
591 upvar ::struct::graph::graph${name}::arcNodes arcNodes
595 # ::struct::graph::__arc_unset --
607 proc ::struct::graph::__arc_unset {name arc {flag -key} {key data}} {
617 upvar ::struct::graph::graph${name}::arc${arc} data
624 # ::struct::graph::_arcs --
635 proc ::struct::graph::_arcs {name args} {
707 upvar ::struct::graph::graph${name}::inArcs inArcs
708 upvar ::struct::graph::graph${name}::outArcs outArcs
709 upvar ::struct::graph::graph${name}::arcNodes arcNodes
860 # ::struct::graph::_destroy --
870 proc ::struct::graph::_destroy {name} {
871 namespace delete ::struct::graph::graph$name
875 # ::struct::graph::__generateUniqueArcName --
885 proc ::struct::graph::__generateUniqueArcName {name} {
886 upvar ::struct::graph::graph${name}::nextUnusedArc nextUnusedArc
893 # ::struct::graph::__generateUniqueNodeName --
903 proc ::struct::graph::__generateUniqueNodeName {name} {
904 upvar ::struct::graph::graph${name}::nextUnusedNode nextUnusedNode
911 # ::struct::graph::_get --
923 proc ::struct::graph::_get {name {flag -key} {key data}} {
924 upvar ::struct::graph::graph${name}::graphData data
933 # ::struct::graph::_getall --
943 proc ::struct::graph::_getall {name args} {
948 upvar ::struct::graph::graph${name}::graphData data
952 # ::struct::graph::_keys --
962 proc ::struct::graph::_keys {name args} {
967 upvar ::struct::graph::graph${name}::graphData data
971 # ::struct::graph::_keyexists --
983 proc ::struct::graph::_keyexists {name {flag -key} {key data}} {
988 upvar ::struct::graph::graph${name}::graphData data
992 # ::struct::graph::_node --
1005 proc ::struct::graph::_node {name cmd args} {
1008 if { [llength [info commands ::struct::graph::__node_$cmd]] == 0 } {
1015 eval [list ::struct::graph::__node_$cmd $name] $args
1018 # ::struct::graph::__node_degree --
1031 proc ::struct::graph::__node_degree {name args} {
1066 upvar ::struct::graph::graph${name}::inArcs inArcs
1067 upvar ::struct::graph::graph${name}::outArcs outArcs
1101 # ::struct::graph::__node_delete --
1113 proc ::struct::graph::__node_delete {name args} {
1121 upvar ::struct::graph::graph${name}::inArcs inArcs
1122 upvar ::struct::graph::graph${name}::outArcs outArcs
1141 unset ::struct::graph::graph${name}::node$node
1147 # ::struct::graph::__node_exists --
1158 proc ::struct::graph::__node_exists {name node} {
1159 return [info exists ::struct::graph::graph${name}::inArcs($node)]
1162 # ::struct::graph::__node_get --
1175 proc ::struct::graph::__node_get {name node {flag -key} {key data}} {
1180 upvar ::struct::graph::graph${name}::node${node} data
1189 # ::struct::graph::__node_getall --
1200 proc ::struct::graph::__node_getall {name node args} {
1209 upvar ::struct::graph::graph${name}::node${node} data
1214 # ::struct::graph::__node_keys --
1225 proc ::struct::graph::__node_keys {name node args} {
1234 upvar ::struct::graph::graph${name}::node${node} data
1239 # ::struct::graph::__node_keyexists --
1252 proc ::struct::graph::__node_keyexists {name node {flag -key} {key data}} {
1261 upvar ::struct::graph::graph${name}::node${node} data
1266 # ::struct::graph::__node_insert --
1278 proc ::struct::graph::__node_insert {name args} {
1291 upvar ::struct::graph::graph${name}::inArcs inArcs
1292 upvar ::struct::graph::graph${name}::outArcs outArcs
1293 upvar ::struct::graph::graph${name}::node${node} data
1303 # ::struct::graph::__node_opposite --
1315 proc ::struct::graph::__node_opposite {name node arc} {
1324 upvar ::struct::graph::graph${name}::arcNodes arcNodes
1340 # ::struct::graph::__node_set --
1352 proc ::struct::graph::__node_set {name node args} {
1356 upvar ::struct::graph::graph${name}::node$node data
1391 # ::struct::graph::__node_append --
1403 proc ::struct::graph::__node_append {name node args} {
1407 upvar ::struct::graph::graph${name}::node$node data
1428 # ::struct::graph::__node_lappend --
1440 proc ::struct::graph::__node_lappend {name node args} {
1444 upvar ::struct::graph::graph${name}::node$node data
1465 # ::struct::graph::__node_unset --
1477 proc ::struct::graph::__node_unset {name node {flag -key} {key data}} {
1487 upvar ::struct::graph::graph${name}::node${node} data
1494 # ::struct::graph::_nodes --
1505 proc ::struct::graph::_nodes {name args} {
1577 upvar ::struct::graph::graph${name}::inArcs inArcs
1578 upvar ::struct::graph::graph${name}::outArcs outArcs
1579 upvar ::struct::graph::graph${name}::arcNodes arcNodes
1717 # ::struct::graph::_set --
1729 proc ::struct::graph::_set {name args} {
1730 upvar ::struct::graph::graph${name}::graphData data
1765 # ::struct::graph::_swap --
1777 proc ::struct::graph::_swap {name node1 node2} {
1792 upvar ::struct::graph::graph${name}::outArcs outArcs
1793 upvar ::struct::graph::graph${name}::inArcs inArcs
1794 upvar ::struct::graph::graph${name}::arcNodes arcNodes
1795 upvar ::struct::graph::graph${name}::node${node1} node1Vals
1796 upvar ::struct::graph::graph${name}::node${node2} node2Vals
1833 # ::struct::graph::_unset --
1845 proc ::struct::graph::_unset {name {flag -key} {key data}} {
1846 upvar ::struct::graph::graph${name}::graphData data
1860 # ::struct::graph::_walk --
1875 proc ::struct::graph::_walk {name node args} {
2116 # ::struct::graph::Union --
2127 proc ::struct::graph::Union {args} {
2149 namespace eval ::struct {
2154 package provide struct::graph 1.2.1