Lines Matching refs:iNode

34 proc rtree_nodedepth {db zTab iNode} {  argument
37   set ii $iNode
55 proc rtree_node {db zTab iNode {iPrec 6}} {
58     SELECT rtreenode($nDim, data) FROM ${zTab}_node WHERE nodeno = $iNode
108 proc rtree_node_check {db zTab iNode iDepth} {
109   if {[info exists ::checked($iNode)]} { error "Second ref to $iNode" }
110   set ::checked($iNode) 1
112   set node [rtree_node $db $zTab $iNode]
113   if {$iNode!=1 && [llength $node]==0} { error "No such node: $iNode" }
115   if {$iNode != 1 && [llength $node]<[rtree_mincells $db $zTab]} {
116     puts "Node $iNode: Has only [llength $node] cells"
119   if {$iNode == 1 && [llength $node]==1 && [rtree_depth $db $zTab]>0} {
121     puts "Node $iNode: Has only 1 child (tree depth is $depth)"
132         puts "Node $iNode: Cell is: {$cell}, should be {$shouldbe}"
147     if {$mapping != $iNode} {
148       puts "Node $iNode: $mapping_table entry for cell $rowid is $mapping"
153   set ret [list $iNode]
176 proc rtree_nodetreedump {db zTab zIndent iDepth iNode} {  argument
178   set node [rtree_node $db $zTab $iNode 1]
179   append ret [format "%-3d %s%s\n" $iNode $zIndent $node]