From f5f6c9bb104525a44db53d1230fdf7ffab1345de Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fran=C3=A7ois=20Bobot?= <francois.bobot@cea.fr>
Date: Sun, 19 Jun 2022 20:10:41 +0200
Subject: [PATCH] Remove large integer constant in colibrics

---
 src/bin/options.ml | 2 --
 1 file changed, 2 deletions(-)

diff --git a/src/bin/options.ml b/src/bin/options.ml
index 721859b3d..bd5a281cf 100644
--- a/src/bin/options.ml
+++ b/src/bin/options.ml
@@ -152,12 +152,10 @@ let parse_time arg =
 let size_string f =
   let n = int_of_float f in
   let aux n div = n / div, n mod div in
-  let n_tera, n = aux n 1_000_000_000_000 in
   let n_giga, n = aux n 1_000_000_000 in
   let n_mega, n = aux n 1_000_000 in
   let n_kilo, n = aux n 1_000 in
   let print_aux s n = if n <> 0 then (string_of_int n) ^ s else "" in
-  (print_aux "To" n_tera) ^
   (print_aux "Go" n_giga) ^
   (print_aux "Mo" n_mega) ^
   (print_aux "ko" n_kilo) ^
-- 
GitLab