280 |
zwnj => "\x{200C}", |
zwnj => "\x{200C}", |
281 |
}; # $entity_char |
}; # $entity_char |
282 |
|
|
|
## TODO: Ensure that this table match to <http://html5.org/tools/web-apps-tracker?from=868&to=869>. |
|
|
## <http://lists.whatwg.org/pipermail/whatwg-whatwg.org/2006-December/thread.html#8562> |
|
283 |
my $c1_entity_char = { |
my $c1_entity_char = { |
284 |
128, 8364, |
0x80 => 0x20AC, |
285 |
129, 65533, |
0x81 => 0xFFFD, |
286 |
130, 8218, |
0x82 => 0x201A, |
287 |
131, 402, |
0x83 => 0x0192, |
288 |
132, 8222, |
0x84 => 0x201E, |
289 |
133, 8230, |
0x85 => 0x2026, |
290 |
134, 8224, |
0x86 => 0x2020, |
291 |
135, 8225, |
0x87 => 0x2021, |
292 |
136, 710, |
0x88 => 0x02C6, |
293 |
137, 8240, |
0x89 => 0x2030, |
294 |
138, 352, |
0x8A => 0x0160, |
295 |
139, 8249, |
0x8B => 0x2039, |
296 |
140, 338, |
0x8C => 0x0152, |
297 |
141, 65533, |
0x8D => 0xFFFD, |
298 |
142, 381, |
0x8E => 0x017D, |
299 |
143, 65533, |
0x8F => 0xFFFD, |
300 |
144, 65533, |
0x90 => 0xFFFD, |
301 |
145, 8216, |
0x91 => 0x2018, |
302 |
146, 8217, |
0x92 => 0x2019, |
303 |
147, 8220, |
0x93 => 0x201C, |
304 |
148, 8221, |
0x94 => 0x201D, |
305 |
149, 8226, |
0x95 => 0x2022, |
306 |
150, 8211, |
0x96 => 0x2013, |
307 |
151, 8212, |
0x97 => 0x2014, |
308 |
152, 732, |
0x98 => 0x02DC, |
309 |
153, 8482, |
0x99 => 0x2122, |
310 |
154, 353, |
0x9A => 0x0161, |
311 |
155, 8250, |
0x9B => 0x203A, |
312 |
156, 339, |
0x9C => 0x0153, |
313 |
157, 65533, |
0x9D => 0xFFFD, |
314 |
158, 382, |
0x9E => 0x017E, |
315 |
159, 376, |
0x9F => 0x0178, |
316 |
}; # $c1_entity_char |
}; # $c1_entity_char |
317 |
|
|
318 |
my $special_category = { |
my $special_category = { |
2735 |
$token->{tag_name} eq $tag_name) { |
$token->{tag_name} eq $tag_name) { |
2736 |
## Ignore the token |
## Ignore the token |
2737 |
} else { |
} else { |
2738 |
if ($token->{tag_name} eq 'textarea') { ## TODO: This is incorrect maybe |
if ($token->{tag_name} eq 'textarea') { |
|
## TODO: <http://html5.org/tools/web-apps-tracker?from=866&to=867> |
|
|
!!!parse-error (type => 'in CDATA:#'.$token->{type}); |
|
|
} else { |
|
2739 |
!!!parse-error (type => 'in RCDATA:#'.$token->{type}); |
!!!parse-error (type => 'in RCDATA:#'.$token->{type}); |
2740 |
|
} else { |
2741 |
|
!!!parse-error (type => 'in CDATA:#'.$token->{type}); |
2742 |
} |
} |
2743 |
## ISSUE: And ignore? |
## ISSUE: And ignore? |
2744 |
} |
} |