From d016f69818b30b75d186fb14f440b93b0518fc66 Mon Sep 17 00:00:00 2001
From: Emilio Jesus Gallego Arias
Date: Thu, 21 Nov 2019 15:38:39 +0100
Subject: [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
```
---
 kernel/nativevalues.mli | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'kernel/nativevalues.mli')

diff --git a/kernel/nativevalues.mli b/kernel/nativevalues.mli
index 815ef3e98e..420249117d 100644
--- a/kernel/nativevalues.mli
+++ b/kernel/nativevalues.mli
@@ -36,7 +36,7 @@ val eq_annot_sw : annot_sw -> annot_sw -> bool
 val hash_annot_sw : annot_sw -> int
 
 type sort_annot = string * int
-      
+
 type rec_pos = int array
 
 val eq_rec_pos : rec_pos -> rec_pos -> bool
@@ -47,8 +47,8 @@ type atom =
   | Aind of pinductive
   | Asort of Sorts.t
   | Avar of Id.t
-  | Acase of annot_sw * accumulator * t * (t -> t) 
-  | Afix of t array * t array * rec_pos * int 
+  | Acase of annot_sw * accumulator * t * (t -> t)
+  | Afix of t array * t array * rec_pos * int
   | Acofix of t array * t array * int * t
   | Acofixe of t array * t array * int * t
   | Aprod of Name.t * t * (t -> t)
@@ -89,7 +89,7 @@ val mk_meta_accu : metavariable -> t
 val mk_evar_accu : Evar.t -> t array -> t
 val mk_proj_accu : (inductive * int) -> accumulator -> t
 val upd_cofix : t -> t -> unit
-val force_cofix : t -> t 
+val force_cofix : t -> t
 val mk_const : tag -> t
 val mk_block : tag -> t array -> t
 
@@ -117,9 +117,9 @@ val cast_accu : t -> accumulator
 [@@ocaml.inline always]
 
 (* Functions over block: i.e constructors *)
-    
+
 type block
-      
+
 val block_size : block -> int
 val block_field : block -> int -> t
 val block_tag : block -> int
@@ -178,7 +178,7 @@ val addMulDiv : t -> t -> t -> t -> t
 val eq      : t -> t -> t -> t
 val lt      : t -> t -> t -> t
 val le      : t -> t -> t -> t
-val compare : t -> t -> t -> t 
+val compare : t -> t -> t -> t
 
 val print : t -> t
 
-- 
cgit v1.2.3