1..94 # Running under perl version 5.008007 for linux # Current time local: Sat Jun 23 11:14:46 2007 # Current time GMT: Sat Jun 23 02:14:46 2007 # Using Test.pm version 1.25 not ok 1 # Test 1 got: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'HTML',\n 0\n ]\n ];\n" (t/HTML-tokenizer.t at line 137) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'html',\n undef,\n undef,\n 1\n ]\n ];\n" (Correct Doctype lowercase: ) # Lines 4-5 are changed: # - " qq'html',\n" # + " qq'HTML',\n" # - " undef,\n" # + " 0\n" # Lines 6-6 are missing: # - " undef,\n" # - " 1\n" # t/HTML-tokenizer.t line 137 is: ok $parser_dump, $expected_dump, not ok 2 # Test 2 got: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'HTML',\n 0\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #2) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'HTML',\n undef,\n undef,\n 1\n ]\n ];\n" (Correct Doctype uppercase: ) # Line 5 is changed: # - " undef,\n" # + " 0\n" # Lines 6-6 are missing: # - " undef,\n" # - " 1\n" not ok 3 # Test 3 got: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'HTML',\n 0\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #3) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'HtMl',\n undef,\n undef,\n 1\n ]\n ];\n" (Correct Doctype mixed case: ) # Lines 4-5 are changed: # - " qq'HtMl',\n" # + " qq'HTML',\n" # - " undef,\n" # + " 0\n" # Lines 6-6 are missing: # - " undef,\n" # - " 1\n" ok 4 not ok 5 # Test 5 got: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'FOO',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #5) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'foo',\n undef,\n undef,\n 1\n ]\n ];\n" (Doctype in error: ) # Line 4 is changed: # - " qq'foo',\n" # + " qq'FOO',\n" # Lines 5-5 are missing: # - " undef,\n" # - " undef,\n" ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 not ok 22 # Test 22 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Comment',\n qq'>'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #22) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'Comment',\n qq''\n ]\n ];\n" (Short comment: ) # Line 5 is changed: # - " qq''\n" # + " qq'>'\n" not ok 23 # Test 23 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Comment',\n qq'->'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #23) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'Comment',\n qq''\n ]\n ];\n" (Short comment two: ) # Line 5 is changed: # - " qq''\n" # + " qq'->'\n" ok 24 not ok 25 # Test 25 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Character',\n qq'&'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #25) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'&'\n ]\n ];\n" (Ampersand EOF: &) # Got 1 extra line at line 2: # + " qq'ParseError',\n" not ok 26 # Test 26 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Character',\n qq'&'\n ],\n qq'ParseError',\n [\n qq'Character',\n qq'&'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #26) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'&&'\n ]\n ];\n" (Ampersand ampersand EOF: &&) # Got 1 extra line at line 2: # + " qq'ParseError',\n" # Line 5 is changed: # - " qq'&&'\n" # + " qq'&'\n" # Got 5 extra lines at line 6: # + " ],\n" # + " qq'ParseError',\n" # + " [\n" # + " qq'Character',\n" # + " qq'&'\n" not ok 27 # Test 27 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Character',\n qq'& '\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #27) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'& '\n ]\n ];\n" (Ampersand space EOF: & ) # Got 1 extra line at line 2: # + " qq'ParseError',\n" ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 not ok 34 # Test 34 got: "$VAR1 = [\n [\n qq'Character',\n qq'I\\x{27}m '\n ],\n qq'ParseError',\n [\n qq'Character',\n qq'\\x{2209}'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #34) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'I\\x{27}m '\n ],\n qq'ParseError',\n [\n qq'Character',\n qq'\\x{AC}in'\n ]\n ];\n" (Entity without trailing semicolon (2): I'm ¬in) # Line 9 is changed: # - " qq'\\x{AC}in'\n" # + " qq'\\x{2209}'\n" ok 35 ok 36 ok 37 ok 38 not ok 39 # Test 39 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'StartTag',\n qq'h',\n {\n qq'a' => qq'\\x{AC}x'\n }\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #39) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'StartTag',\n qq'h',\n {\n qq'a' => qq'¬x'\n }\n ]\n ];\n" (Entity in attribute without semicolon ending in x: ) # Line 7 is changed: # - " qq'a' => qq'¬x'\n" # + " qq'a' => qq'\\x{AC}x'\n" not ok 40 # Test 40 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'StartTag',\n qq'h',\n {\n qq'a' => qq'\\x{AC}1'\n }\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #40) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'StartTag',\n qq'h',\n {\n qq'a' => qq'¬1'\n }\n ]\n ];\n" (Entity in attribute without semicolon ending in 1: ) # Line 7 is changed: # - " qq'a' => qq'¬1'\n" # + " qq'a' => qq'\\x{AC}1'\n" ok 41 not ok 42 # Test 42 got: "$VAR1 = [\n qq'ParseError',\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #42) # Expected: "$VAR1 = [\n qq'ParseError',\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'',\n undef,\n undef,\n 0\n ]\n ];\n" (DOCTYPE without name: ) # Line 7 is changed: # - " undef,\n" # + " 1\n" # Lines 8-8 are missing: # - " undef,\n" # - " 0\n" not ok 43 # Test 43 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'HTML',\n 0\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #43) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'html',\n undef,\n undef,\n 1\n ]\n ];\n" (DOCTYPE without space before name: ) # Lines 5-6 are changed: # - " qq'html',\n" # + " qq'HTML',\n" # - " undef,\n" # + " 0\n" # Lines 7-7 are missing: # - " undef,\n" # - " 1\n" not ok 44 # Test 44 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'FOO',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #44) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'foo',\n undef,\n undef,\n 1\n ]\n ];\n" (Incorrect DOCTYPE without a space before name: ) # Line 5 is changed: # - " qq'foo',\n" # + " qq'FOO',\n" # Lines 6-6 are missing: # - " undef,\n" # - " undef,\n" not ok 45 # Test 45 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'HTML',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #45) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'html',\n qq'-//W3C//DTD HTML Transitional 4.01//EN',\n undef,\n 1\n ]\n ];\n" (DOCTYPE with publicId: ) # Got 1 extra line at line 2: # + " qq'ParseError',\n" # Line 5 is changed: # - " qq'html',\n" # + " qq'HTML',\n" # Lines 6-6 are missing: # - " qq'-//W3C//DTD HTML Transitional 4.01//EN',\n" # - " undef,\n" not ok 46 # Test 46 got: "$VAR1 = [\n qq'ParseError',\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'HTML',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #46) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'html',\n undef,\n undef,\n 0\n ]\n ];\n" (DOCTYPE with EOF after PUBLIC: ) # Got 1 extra line at line 2: # + " qq'ParseError',\n" # Line 5 is changed: # - " qq'html',\n" # + " qq'HTML',\n" # Lines 6-6 are missing: # - " undef,\n" # - " qq'-//W3C//DTD HTML Transitional 4.01//EN',\n" not ok 50 # Test 50 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'HTML',\n 1\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #50) # Expected: "$VAR1 = [\n [\n qq'DOCTYPE',\n qq'html',\n qq'-//W3C//DTD HTML Transitional 4.01//EN',\n qq'-//W3C//DTD HTML Transitional 4.01//EN',\n 1\n ]\n ];\n" (DOCTYPE with publicId and systemId: ) # Got 1 extra line at line 2: # + " qq'ParseError',\n" # Line 5 is changed: # - " qq'html',\n" # + " qq'HTML',\n" # Lines 6-6 are missing: # - " qq'-//W3C//DTD HTML Transitional 4.01//EN',\n" # - " qq'-//W3C//DTD HTML Transitional 4.01//EN',\n" not ok 51 # Test 51 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'HTML',\n 0\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #51) # Expected: "$VAR1 = [\n qq'ParseError',\n [\n qq'DOCTYPE',\n qq'html',\n undef,\n undef,\n 0\n ]\n ];\n" (Incomplete doctype: ) # Got 1 extra line at line 2: # + " qq'ParseError',\n" # Line 5 is changed: # - " qq'abar'\n ],\n [\n qq'EndTag',\n qq'baz'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #75) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'bar'\n ],\n [\n qq'EndTag',\n qq'baz'\n ]\n ];\n" (End tag with incorrect name in RCDATA or CDATA: bar) # Got 1 extra line at line 2: # + " qq'ParseError',\n" not ok 76 # Test 76 got: "$VAR1 = [\n qq'ParseError',\n [\n qq'Character',\n qq'bar'\n ],\n [\n qq'EndTag',\n qq'baz'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #76) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'bar'\n ],\n [\n qq'EndTag',\n qq'baz'\n ]\n ];\n" (End tag with incorrect name in RCDATA or CDATA: bar) # Got 1 extra line at line 2: # + " qq'ParseError',\n" ok 77 ok 78 ok 79 ok 80 not ok 81 # Test 81 got: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #81) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (Commented close tag in [R]CDATA: foo) # Line 4 is changed: # - " qq'foo'\n" # + " qq'foo'\n" not ok 82 # Test 82 got: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #82) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (Commented close tag in [R]CDATA: foo) # Line 4 is changed: # - " qq'foo'\n" # + " qq'foo'\n" ok 83 ok 84 not ok 85 # Test 85 got: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ],\n qq'ParseError',\n [\n qq'Comment',\n qq'>baz'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #85) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ],\n qq'ParseError',\n [\n qq'Comment',\n qq''\n ],\n [\n qq'Character',\n qq'baz'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (End tag surrounded by bogus comment in [R]CDATA: foobaz) # Line 13 is changed: # - " qq''\n" # + " qq'>baz'\n" # Lines 14-14 are missing: # - " ],\n" # - " [\n" # - " qq'Character',\n" # - " qq'baz'\n" # - " ],\n" # - " [\n" # - " qq'EndTag',\n" # - " qq'bar'\n" not ok 86 # Test 86 got: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ],\n qq'ParseError',\n [\n qq'Comment',\n qq'>baz'\n ]\n ];\n" (t/HTML-tokenizer.t at line 137 fail #86) # Expected: "$VAR1 = [\n [\n qq'Character',\n qq'foo'\n ],\n [\n qq'EndTag',\n qq'bar'\n ],\n qq'ParseError',\n [\n qq'Comment',\n qq''\n ],\n [\n qq'Character',\n qq'baz'\n ],\n [\n qq'EndTag',\n qq'bar'\n ]\n ];\n" (End tag surrounded by bogus comment in [R]CDATA: foobaz) # Line 13 is changed: # - " qq''\n" # + " qq'>baz'\n" # Lines 14-14 are missing: # - " ],\n" # - " [\n" # - " qq'Character',\n" # - " qq'baz'\n" # - " ],\n" # - " [\n" # - " qq'EndTag',\n" # - " qq'bar'\n" ok 87 ok 88 ok 89 ok 90 ok 91 ok 92 ok 93 ok 94 ok 95 ok 96 ok 97 ok 98 ok 99 ok 100 ok 101 ok 102 ok 103 ok 104 ok 105 ok 106 ok 107 ok 108 ok 109 ok 110 ok 111 ok 112 ok 113