diff options
| author | Emilio Jesus Gallego Arias | 2019-11-21 15:38:39 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-11-21 15:38:39 +0100 |
| commit | d016f69818b30b75d186fb14f440b93b0518fc66 (patch) | |
| tree | 32cd948273f79a2c01ad27b4ed0244ea60d7e2f9 /kernel/names.ml | |
| parent | b680b06b31c27751a7d551d95839aea38f7fbea1 (diff) | |
[coq] Untabify the whole ML codebase.
We also remove trailing whitespace.
Script used:
```bash
for i in `find . -name '*.ml' -or -name '*.mli' -or -name '*.mlg'`; do expand -i "$i" | sponge "$i"; sed -e's/[[:space:]]*$//' -i.bak "$i"; done
```
Diffstat (limited to 'kernel/names.ml')
| -rw-r--r-- | kernel/names.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/kernel/names.ml b/kernel/names.ml index b755ff0e08..148cc352f1 100644 --- a/kernel/names.ml +++ b/kernel/names.ml @@ -83,7 +83,7 @@ end module Name = struct type t = Anonymous (** anonymous identifier *) - | Name of Id.t (** non-anonymous identifier *) + | Name of Id.t (** non-anonymous identifier *) let mk_name id = Name id @@ -333,7 +333,7 @@ module ModPath = struct module Self_Hashcons = struct type t = module_path type u = (DirPath.t -> DirPath.t) * (MBId.t -> MBId.t) * - (string -> string) + (string -> string) let rec hashcons (hdir,huniqid,hstr as hfuns) = function | MPfile dir -> MPfile (hdir dir) | MPbound m -> MPbound (huniqid m) @@ -727,8 +727,8 @@ type 'a tableKey = | RelKey of Int.t type inv_rel_key = int (* index in the [rel_context] part of environment - starting by the end, {\em inverse} - of de Bruijn indice *) + starting by the end, {\em inverse} + of de Bruijn indice *) let eq_table_key f ik1 ik2 = if ik1 == ik2 then true |
