/[suikacvs]/markup/html/whatpm/Whatpm/HTML.pm.src
Suika

Diff of /markup/html/whatpm/Whatpm/HTML.pm.src

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.81 by wakaba, Tue Mar 4 14:51:54 2008 UTC revision 1.82 by wakaba, Wed Mar 5 02:55:08 2008 UTC
# Line 3666  sub _tree_construction_main ($) { Line 3666  sub _tree_construction_main ($) {
3666                  !!!cp ('t133');                  !!!cp ('t133');
3667                  ## As if </noscript>                  ## As if </noscript>
3668                  pop @{$self->{open_elements}};                  pop @{$self->{open_elements}};
3669                  !!!parse-error (type => 'in noscript:script');                  !!!parse-error (type => 'in noscript:/head');
3670                                    
3671                  ## Reprocess in the "in head" insertion mode...                  ## Reprocess in the "in head" insertion mode...
3672                  pop @{$self->{open_elements}};                  pop @{$self->{open_elements}};
# Line 3771  sub _tree_construction_main ($) { Line 3771  sub _tree_construction_main ($) {
3771    
3772                ## Reprocess in the "after head" insertion mode...                ## Reprocess in the "after head" insertion mode...
3773              } elsif ($self->{insertion_mode} == BEFORE_HEAD_IM) {              } elsif ($self->{insertion_mode} == BEFORE_HEAD_IM) {
3774    ## ISSUE: This case cannot be reached?
3775                !!!cp ('t148');                !!!cp ('t148');
3776                !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});                !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});
3777                ## Ignore the token ## ISSUE: An issue in the spec.                ## Ignore the token ## ISSUE: An issue in the spec.
# Line 3824  sub _tree_construction_main ($) { Line 3825  sub _tree_construction_main ($) {
3825                  } # INSCOPE                  } # INSCOPE
3826                    unless (defined $tn) {                    unless (defined $tn) {
3827                      !!!cp ('t153');                      !!!cp ('t153');
3828    ## TODO: This error type is wrong.
3829                      !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});                      !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});
3830                      ## Ignore the token                      ## Ignore the token
3831                      !!!next-token;                      !!!next-token;
# Line 4362  sub _tree_construction_main ($) { Line 4364  sub _tree_construction_main ($) {
4364                  } # INSCOPE                  } # INSCOPE
4365                  unless (defined $i) {                  unless (defined $i) {
4366                    !!!cp ('t216');                    !!!cp ('t216');
4367    ## TODO: This erorr type ios wrong.
4368                    !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});                    !!!parse-error (type => 'unmatched end tag:'.$token->{tag_name});
4369                    ## Ignore the token                    ## Ignore the token
4370                    !!!next-token;                    !!!next-token;
Legend:
Removed from v.1.81  
changed lines
  Added in v.1.82
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.24