X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_common.erl;h=9b740b9152bd2c8a861822f67d89e8cf1c3fe3ef;hp=e516322f87fb07931c19287f4d626067cbbb457e;hb=0fd41878c239877c274bd2bf58caf65b24977e52;hpb=cb02531d4a4b217997db3fdfe2661af18c576ddd diff --git a/modules/erl/euphorik_common.erl b/modules/erl/euphorik_common.erl index e516322..9b740b9 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).