From 0b5ef21f936acbb89fa5b272efdcf3cf03de58cc Mon Sep 17 00:00:00 2001
From: Pierre Letouzey
Date: Wed, 31 May 2017 21:48:26 +0200
Subject: Notation.declare_rawnumeral_interpreter

 This new function is similar to declare_numeral_interpreter,
 but works on a lower level : instead of bigint, numbers are
 represented as string of their decimal digits (plus a boolean sign)
---
 interp/notation.mli | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'interp/notation.mli')

diff --git a/interp/notation.mli b/interp/notation.mli
index d271a88fe7..c739ec12fd 100644
--- a/interp/notation.mli
+++ b/interp/notation.mli
@@ -74,6 +74,11 @@ type 'a prim_token_interpreter =
 type 'a prim_token_uninterpreter =
     glob_constr list * (glob_constr -> 'a option) * cases_pattern_status
 
+type rawnum = Constrexpr.raw_natural_number * Constrexpr.sign
+
+val declare_rawnumeral_interpreter : scope_name -> required_module ->
+  rawnum prim_token_interpreter -> rawnum prim_token_uninterpreter -> unit
+
 val declare_numeral_interpreter : scope_name -> required_module ->
   bigint prim_token_interpreter -> bigint prim_token_uninterpreter -> unit
 
-- 
cgit v1.2.3