diff --git a/src/markup.ml b/src/markup.ml
index 1800137..58f20b7 100644
--- a/src/markup.ml
+++ b/src/markup.ml
@@ -96,7 +96,7 @@ struct
       |> encoding ~report
       |> Input.preprocess Common.is_valid_xml_char report
       |> Xml_tokenizer.tokenize report entity
-      |> Xml_parser.parse context namespace report
+      |> Markup__xml_parser.parse context namespace report
       |> k
     in
 
diff --git a/src/xml_parser.ml b/src/markup__xml_parser.ml
similarity index 100%
rename from src/xml_parser.ml
rename to src/markup__xml_parser.ml
diff --git a/src/xml_parser.mli b/src/markup__xml_parser.mli
similarity index 100%
rename from src/xml_parser.mli
rename to src/markup__xml_parser.mli
diff --git a/test/test_xml_parser.ml b/test/test_xml_parser.ml
index 087c9cb..55acf96 100644
--- a/test/test_xml_parser.ml
+++ b/test/test_xml_parser.ml
@@ -23,7 +23,7 @@ let expect ?context ?(namespace = no_top_level_namespaces) text signals =
   |> Encoding.utf_8
   |> Input.preprocess is_valid_xml_char Error.ignore_errors
   |> Xml_tokenizer.tokenize Error.ignore_errors no_custom_entities
-  |> Xml_parser.parse context namespace report
+  |> Markup__xml_parser.parse context namespace report
   |> iter iterate;
 
   ended ()