fixed the comment streaming bug raised by Graham Bennett added to the

* parser.c: fixed the comment streaming bug raised by Graham Bennett
* test/badcomment.xml result//badcomment.xml*: added to the regression suite.
Daniel
diff --git a/result/badcomment.xml.rdr b/result/badcomment.xml.rdr
new file mode 100644
index 0000000..29a3cd1
--- /dev/null
+++ b/result/badcomment.xml.rdr
@@ -0,0 +1,21 @@
+0 1 foo 0 0
+1 14 #text 0 1 
+
+1 8 #comment 0 1  def='NT-Char'
+1 8 #comment 0 1 >Char</nt>* ']]&gt;' <nt def='NT-Char'>Char</nt>*))
+']]&gt;'</rhs>
+<com>CDATA sections</com>
+<rhs>| '&lt;!DOCTYPE' 
+(<nt def="NT-Char">Char</nt> - ('[' | ']'))+
+('[' 
+<nt def="NT-simpleDTD">simpleDTD</nt>*
+']')? '&gt;'</rhs>
+<com>doc type declaration</com>
+<prod id="NT-simpleDTD"><lhs>simpleDTD</lhs>
+<rhs>'&lt;!&como;' 
+(<nt def='NT-Char'>Char</nt>* - 
+(<nt def='NT-Char'>Char</nt>* '&comc;' <nt def='NT-Char'>Char</nt>*))
+'&comc;&gt;'</rhs>
+1 14 #text 0 1 
+
+0 15 foo 0 0