commit d47c67e5ba3fc8c3f815fca196ddf37020920797
author Akron <nils@diewald-online.de> Sun Apr 10 11:02:59 2022 +0200
committer Akron <nils@diewald-online.de> Sun Apr 10 11:02:59 2022 +0200
tree 726712edb84dd31b20d089a6a8e73fe7618d65ab
parent 6dcb6ce65c603457c9855d79614fe5b4a844bcfc

Add minor rules for XML support

Change-Id: I72baac5afc04f849a7c464a0e9b292e9d40ee2b4

src/all/xml.xfst

diff --git a/src/all/xml.xfst b/src/all/xml.xfst
index 06e247d..4526117 100644
--- a/src/all/xml.xfst
+++ b/src/all/xml.xfst
@@ -1,6 +1,11 @@
 ! XML rule
 define XMLns [AsciiLetter [AsciiLetter|Digit|%-]* (%: AsciiLetter [AsciiLetter|Digit|%-]*)] .o. Caseinsensitive;
-define XML [
+
+define XMLcomment [ %< %! %- %- | %- %- %> ];
+define XMLpi [ %< %? AsciiLetter [AsciiLetter | Digit | %- ]* | %? %> ];
+define CDATA [ %< %! %[ {CDATA} %[ | %] %] %> ];
+
+define XML [[
   "<" [
       [
         XMLns
@@ -16,4 +21,4 @@
         "/" XMLns
       ]
     ] WS* ">"
-].u;
+].u | XMLcomment | XMLpi | CDATA ];
\ No newline at end of file