| 1270 |
|
|
| 1271 |
redo A; |
redo A; |
| 1272 |
} else { |
} else { |
| 1273 |
if ($self->{nc} == 0x003D) { # = |
if ($self->{nc} == 0x003D or $self->{nc} == 0x003C) { # =, < |
| 1274 |
!!!cp (93); |
!!!cp (93); |
| 1275 |
## XML5: Not a parse error. |
## XML5: Not a parse error. |
| 1276 |
!!!parse-error (type => 'bad attribute value'); |
!!!parse-error (type => 'bad attribute value'); |
| 1573 |
0x0022 => 1, # " |
0x0022 => 1, # " |
| 1574 |
0x0027 => 1, # ' |
0x0027 => 1, # ' |
| 1575 |
0x003D => 1, # = |
0x003D => 1, # = |
| 1576 |
|
0x003C => 1, # < |
| 1577 |
}->{$self->{nc}}) { |
}->{$self->{nc}}) { |
| 1578 |
!!!cp (115); |
!!!cp (115); |
| 1579 |
## XML5: Not a parse error. |
## XML5: Not a parse error. |
| 2119 |
redo A; |
redo A; |
| 2120 |
} else { |
} else { |
| 2121 |
!!!cp (154); |
!!!cp (154); |
|
## XML5: Not a parse error. |
|
|
!!!parse-error (type => 'dash in comment', |
|
|
line => $self->{line_prev}, |
|
|
column => $self->{column_prev}); |
|
| 2122 |
$self->{ct}->{data} .= '--' . chr ($self->{nc}); # comment |
$self->{ct}->{data} .= '--' . chr ($self->{nc}); # comment |
| 2123 |
$self->{state} = COMMENT_STATE; |
$self->{state} = COMMENT_STATE; |
| 2124 |
!!!next-input-character; |
!!!next-input-character; |