aboutsummaryrefslogtreecommitdiff
path: root/lib/richpp.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/richpp.ml')
-rw-r--r--lib/richpp.ml4
1 files changed, 0 insertions, 4 deletions
diff --git a/lib/richpp.ml b/lib/richpp.ml
index fe3edd99ca..a98273edb2 100644
--- a/lib/richpp.ml
+++ b/lib/richpp.ml
@@ -194,7 +194,3 @@ let raw_print xml =
let () = print xml in
Buffer.contents buf
-let of_richpp x = Element ("richpp", [], [x])
-let to_richpp xml = match xml with
-| Element ("richpp", [], [x]) -> x
-| _ -> raise Serialize.Marshal_error