Lines Matching defs:Serialize
480 return [eval [list Serialize:$node(node:nodeType)] $args]
2595 # dom::tcl::Serialize:documentFragment --
2606 proc dom::tcl::Serialize:documentFragment {token args} {
2610 return [eval [list Serialize:node $token] $args]
2613 return [eval Serialize:document [list $token] $args]
2621 # dom::tcl::Serialize:document --
2632 proc dom::tcl::Serialize:document {token args} {
2648 # Bug fix: can't use Serialize:attributeList for XML declaration,
2654 append result <?xml[Serialize:XMLDecl version $node(document:xmldecl)][Serialize:XMLDecl encoding $node(document:xmldecl)][Serialize:XMLDecl standalone $node(document:xmldecl)]?>\n
2674 append result <!DOCTYPE\ $docelName[Serialize:ExternalID $doctype(doctype:externalid)][expr {[string length $doctype(doctype:internaldtd)] ? " \[[string trim $doctype(doctype:internaldtd) \{\} ]\]" : {}}]>\n
2681 append result [eval Serialize:[node cget $child -nodeType] [list $child] $args]
2689 # dom::tcl::Serialize:ExternalID --
2699 proc dom::tcl::Serialize:ExternalID id {
2720 # dom::tcl::Serialize:XMLDecl --
2732 proc dom::tcl::Serialize:XMLDecl {attr attrList} {
2743 # dom::tcl::Serialize:node --
2755 proc dom::tcl::Serialize:node {token args} {
2774 append result [eval [list Serialize:$child(node:nodeType) $childToken] [array get opts]]
2780 # dom::tcl::Serialize:element --
2791 proc dom::tcl::Serialize:element {token args} {
2802 append result [eval Serialize:Indent [array get opts]]
2840 append result [Serialize:attributeList [array get $node(element:attributeList)]]
2854 append result [eval Serialize:node [list $token] [array get opts]]
2856 append result [eval Serialize:Indent [array get opts]]
2944 # dom::tcl::Serialize:textNode --
2956 proc dom::tcl::Serialize:textNode {token args} {
2960 return [Serialize:CDATASection $node(node:nodeValue)]
2961 } elseif {[Serialize:ExceedsThreshold $node(node:nodeValue)]} {
2962 return [Serialize:CDATASection $node(node:nodeValue)]
2968 # dom::tcl::Serialize:ExceedsThreshold --
2979 proc dom::tcl::Serialize:ExceedsThreshold {text} {
2983 # dom::tcl::Serialize:CDATASection --
2993 proc dom::tcl::Serialize:CDATASection {text} {
3001 # dom::tcl::Serialize:processingInstruction --
3012 proc dom::tcl::Serialize:processingInstruction {token args} {
3015 return "[eval Serialize:Indent $args]<?$node(node:nodeName)[expr {$node(node:nodeValue) == "" ? "" : " $node(node:nodeValue)"}]?>"
3018 # dom::tcl::Serialize:comment --
3029 proc dom::tcl::Serialize:comment {token args} {
3032 return [eval Serialize:Indent $args]<!--$node(node:nodeValue)-->
3035 # dom::tcl::Serialize:entityReference --
3046 proc dom::tcl::Serialize:entityReference {token args} {
3077 # dom::tcl::Serialize:attributeList --
3087 proc dom::tcl::Serialize:attributeList {l} {
3122 # dom::tcl::Serialize:Indent --
3132 proc dom::tcl::Serialize:Indent args {