Lines Matching defs:parser
4 # These services include a XML document instance and DTD parser,
41 namespace export parser
45 # Counter for creating unique parser objects
80 # xml::parser --
82 # Creates XML parser object.
85 # args Unique name for parser object
108 proc xml::parser {args} {
115 set name parser[incr ParserCounter]
119 return -code error "unable to create parser object \"[namespace current]::$name\" command"
123 upvar \#0 [namespace current]::$name parser
125 array set parser [list name $name \
159 # parser parser object
166 proc xml::ParseCommand {parser method args} {
167 upvar \#0 [namespace current]::$parser state
179 ParseCommand_parse $parser [lindex $args 0]
185 ParseCommand_reset $parser
200 # object parser object
207 upvar \#0 [namespace current]::$object parser
228 [array get parser -*command] \
229 [array get parser -entityvariable] \
230 [array get parser -reportempty] \
232 -internaldtd [list $parser(internaldtd)]
239 # Used by parser to determine whether an element is empty.
444 # Initialize parser data
447 # object parser object
453 upvar \#0 [namespace current]::$object parser
455 array set parser [list \
485 # DTD parser for XML is wholly contained within the sgml.tcl package
490 # Entry point to the XML DTD parser.