Lines Matching defs:XPath
234 # Creates node(s) in the given document given an XPath expression
242 return [XPath:CreateNode [lindex $args 0] [lindex $args 1]]
462 # Returns nodeset in the given document matching an XPath expression
470 return [XPath:SelectNode [lindex $args 0] [lindex $args 1]]
1491 # Creates node(s) in this document given an XPath expression.
1500 return [XPath:CreateNode $token [lindex $args 0]]
1506 # Returns nodeset in this document matching an XPath expression.
1515 return [XPath:SelectNode $token [lindex $args 0]]
1520 # Returns string value of a node, as defined by XPath Rec.
3417 # DEPRECATED: This is obsoleted by XPath.
3492 # XPath support
3496 # dom::tcl::XPath:CreateNode --
3498 # Given an XPath expression, create the node
3511 proc dom::tcl::XPath:CreateNode {node path} {
3669 # dom::tcl::XPath:SelectNode --
3671 # Match nodes with an XPath location path
3680 proc dom::tcl::XPath:SelectNode {ctxt path} {
3707 return [XPath:SelectNode:Rel $ctxt $spath]
3710 # dom::tcl::XPath:SelectNode:Rel --
3712 # Match nodes with an XPath location path
3721 proc dom::tcl::XPath:SelectNode:Rel {ctxt spath} {
3733 foreach node [XPath:SN:GetElementTypeNodes $ctxt] {
3739 if {[XPath:SN:ApplyNodeTest $node [lindex $step 1]]} {
3748 if {[XPath:SN:ApplyNodeTest $node [lindex $step 1]]} {
3751 eval lappend result [XPath:SN:DescendAndTest [node children $node] [lindex $step 1]]
3757 eval lappend result [XPath:SN:DescendAndTest [node children $node] [lindex $step 1]]
3788 set result [XPath:ApplyPredicates $result [lindex $step 2]]
3791 return [XPath:SelectNode:Rel $result [lrange $spath 1 end]]
3794 # dom::tcl::XPath:SN:GetElementTypeNodes --
3804 proc dom::tcl::XPath:SN:GetElementTypeNodes nodeset {
3818 # dom::tcl::XPath:SN:ApplyNodeTest --
3829 proc dom::tcl::XPath:SN:ApplyNodeTest {node test} {
3868 # dom::tcl::XPath:SN:DescendAndTest --
3880 proc dom::tcl::XPath:SN:DescendAndTest {nodeset test} {
3884 if {[XPath:SN:ApplyNodeTest $node $test]} {
3890 eval lappend result [XPath:SN:DescendAndTest [node children $node] $test]
3898 # dom::tcl::XPath:ApplyPredicates --
3909 proc dom::tcl::XPath:ApplyPredicates {ctxt preds} {
3915 if {![XPath:ApplyPredicate $node $predicate]} {
3928 # dom::tcl::XPath:ApplyPredicate --
3939 proc dom::tcl::XPath:ApplyPredicate {node pred} {
3953 set operand1 [XPath:Pred:ResolveExpr $node [lindex $pred 1]]
3954 set operand2 [XPath:Pred:ResolveExpr $node [lindex $pred 2]]
3959 return [XPath:Pred:CompareLiterals [lindex $pred 0] [lindex $operand1 1] [lindex $operand2 1]]
3966 return [XPath:Pred:CompareNumbers [lindex $pred 0] [lindex $operand1 1] [lindex $operand2 1]]
3984 return [XPath:Pred:CompareLiterals [lindex $pred 0] $value [lindex $operand2 1]]
3991 return [XPath:Pred:CompareLiterals [lindex $pred 0] $value [lindex $operand1 1]]
4009 set nodeset [XPath:SelectNode:Rel $node [lindex $pred 1]]
4018 # dom::tcl::XPath:Pred:Compare --
4020 proc dom::tcl::XPath:Pred:CompareLiterals {op operand1 operand2} {
4050 # dom::tcl::XPath:Pred:ResolveExpr --
4052 proc dom::tcl::XPath:Pred:ResolveExpr {node expr} {
4056 return [list node [XPath:SelectNode:Rel $node [lindex $expr 1]]]