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/nativelibrary.ml | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'kernel/nativelibrary.ml')

diff --git a/kernel/nativelibrary.ml b/kernel/nativelibrary.ml
index 1dbab6c690..7f46d4e173 100644
--- a/kernel/nativelibrary.ml
+++ b/kernel/nativelibrary.ml
@@ -30,29 +30,29 @@ and translate_field prefix mp env acc (l,x) =
      let con = Constant.make2 mp l in
      (if !Flags.debug then
         let msg = Printf.sprintf "Compiling constant %s..." (Constant.to_string con) in
-	Feedback.msg_debug (Pp.str msg));
+        Feedback.msg_debug (Pp.str msg));
      compile_constant_field env prefix con acc cb
   | SFBmind mb ->
      (if !Flags.debug then
-	let id = mb.mind_packets.(0).mind_typename in
-	let msg = Printf.sprintf "Compiling inductive %s..." (Id.to_string id) in
-	Feedback.msg_debug (Pp.str msg));
+        let id = mb.mind_packets.(0).mind_typename in
+        let msg = Printf.sprintf "Compiling inductive %s..." (Id.to_string id) in
+        Feedback.msg_debug (Pp.str msg));
      compile_mind_field mp l acc mb
   | SFBmodule md ->
      let mp = md.mod_mp in
      (if !Flags.debug then
-	let msg =
-	  Printf.sprintf "Compiling module %s..." (ModPath.to_string mp)
-	in
-	Feedback.msg_debug (Pp.str msg));
+        let msg =
+          Printf.sprintf "Compiling module %s..." (ModPath.to_string mp)
+        in
+        Feedback.msg_debug (Pp.str msg));
      translate_mod prefix mp env md.mod_type acc
   | SFBmodtype mdtyp ->
      let mp = mdtyp.mod_mp in
      (if !Flags.debug then
-	let msg =
-	  Printf.sprintf "Compiling module type %s..." (ModPath.to_string mp)
-	in
-	Feedback.msg_debug (Pp.str msg));
+        let msg =
+          Printf.sprintf "Compiling module type %s..." (ModPath.to_string mp)
+        in
+        Feedback.msg_debug (Pp.str msg));
      translate_mod prefix mp env mdtyp.mod_type acc
 
 let dump_library mp dp env mod_expr =
-- 
cgit v1.2.3