X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_common.erl;h=e516322f87fb07931c19287f4d626067cbbb457e;hb=HEAD;hp=b016a0fd73fcf6f49cfc7f0452970c8728d6ab0a;hpb=4a6c575807a90370c0069b688026b10102e1ce10;p=euphorik.git diff --git a/modules/erl/euphorik_common.erl b/modules/erl/euphorik_common.erl index b016a0f..f9e3f68 100644 --- a/modules/erl/euphorik_common.erl +++ b/modules/erl/euphorik_common.erl @@ -42,7 +42,7 @@ ceiling(X) -> end. -% Retourne la difference entre deux timestamp (erlang:now()) en miliseconde +% Retourne la difference entre deux timestamp (erlang:timestamp()) en miliseconde delta_date_ms(D1, D2) -> 1000000000 * abs(element(1, D1) - element(1, D2)) + 1000 * abs(element(2, D1) - element(2, D2)) + trunc(abs(element(3, D1) - element(3, D2)) / 1000).