aboutsummaryrefslogtreecommitdiff
path: root/dev/db_printers.ml
diff options
context:
space:
mode:
authorfilliatr1999-09-08 14:03:26 +0000
committerfilliatr1999-09-08 14:03:26 +0000
commit688b7e663ca7b09770f2bd187258e8499d2bf097 (patch)
treed63f81b4fe683211858a7225bec4c82157bb0a8f /dev/db_printers.ml
parent89a65b785781c23f520cf35008d4fe1a2c394c32 (diff)
printers pour le debugger
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@60 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'dev/db_printers.ml')
-rw-r--r--dev/db_printers.ml9
1 files changed, 9 insertions, 0 deletions
diff --git a/dev/db_printers.ml b/dev/db_printers.ml
new file mode 100644
index 0000000000..6290297ffb
--- /dev/null
+++ b/dev/db_printers.ml
@@ -0,0 +1,9 @@
+open Pp
+open Names
+
+let pP s = pP (hOV 0 s)
+
+let prid id = Format.print_string (string_of_id id)
+let prsp sp = Format.print_string (string_of_path sp)
+
+