MOD déplacement de la function ceiling de euphorik_bd ver euphorik_common

[euphorik.git] / modules / erl / euphorik_bd.erl

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index b11b4e6..1f9a682 100755 (executable)
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -901,17 +901,6 @@ delta_date_minute(D1, D2) ->
    trunc(delta_date_ms(D1, D2) / 1000 / 60).
 
 
-% Bizarre, cette fonction n'existe pas dans la stdlib.
-% Pas utilisé mais bon ca me fait de la peine de l'enlever.
-ceiling(X) ->
-   T = trunc(X),
-   case (X - T) of
-      Neg when Neg < 0 -> T;
-      Pos when Pos > 0 -> T + 1;
-      _ -> T
-   end.
-
-
 % Renvoie un nouvel id pour une table donnée
 nouvel_id(Table) ->
    mnesia:dirty_update_counter(counter, Table, 1).\r