diff options
| author | Pierre-Marie Pédrot | 2017-07-26 20:50:58 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2017-07-26 20:59:49 +0200 |
| commit | 57b9df4e07351a753f897dc24eb8238f6465b26d (patch) | |
| tree | 6b9e29bc4a53a7b4ede6d15739a3c4cce200f1d9 /theories | |
| parent | e917841e46264ad7b80241b25dcd7731eca468a8 (diff) | |
Dedicated module for ident type.
Diffstat (limited to 'theories')
| -rw-r--r-- | theories/Ident.v | 17 | ||||
| -rw-r--r-- | theories/Ltac2.v | 1 |
2 files changed, 18 insertions, 0 deletions
diff --git a/theories/Ident.v b/theories/Ident.v new file mode 100644 index 0000000000..55456afbe2 --- /dev/null +++ b/theories/Ident.v @@ -0,0 +1,17 @@ +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2016 *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) + +Require Import Ltac2.Init. + +Ltac2 Type t := ident. + +Ltac2 @ external equal : t -> t -> bool := "ltac2" "ident_equal". + +Ltac2 @ external of_string : string -> t option := "ltac2" "ident_of_string". + +Ltac2 @ external to_string : t -> string := "ltac2" "ident_to_string". diff --git a/theories/Ltac2.v b/theories/Ltac2.v index 4cd3fafcb2..0d6c8f232a 100644 --- a/theories/Ltac2.v +++ b/theories/Ltac2.v @@ -10,6 +10,7 @@ Require Export Ltac2.Init. Require Ltac2.Int. Require Ltac2.String. +Require Ltac2.Ident. Require Ltac2.Array. Require Ltac2.Message. Require Ltac2.Constr. |