xml.tokenize: slight fix to reduce number of namespace lookups.
parent
c2a015cc40
commit
695ce57b25
|
|
@ -130,7 +130,7 @@ HINTS: next* { spot } ;
|
||||||
accum parse-entity
|
accum parse-entity
|
||||||
quot accum spot (parse-char)
|
quot accum spot (parse-char)
|
||||||
] }
|
] }
|
||||||
{ [ char CHAR: % eq? in-dtd? get and ] [
|
{ [ char CHAR: % eq? [ in-dtd? get ] [ f ] if ] [
|
||||||
accum parse-pe
|
accum parse-pe
|
||||||
quot accum spot (parse-char)
|
quot accum spot (parse-char)
|
||||||
] }
|
] }
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue