% Ce module utilise une base mnesia.
% @author G.Burri
--module(euphorik_minichat).\r
+-module(euphorik_bd).\r
-export([
% gestion :
create/0,
fun() ->
% TODO : optimisations ? serait-ce du O(n) ?
Query = qlc:q([E || E <- qlc:keysort(2, mnesia:table(minichat), [{order, ascending}]), lists:any(fun(Id) -> Id =:= E#minichat.id end, Ids)]),
- %io:format("~s~n", [qlc:info(Query)]),
qlc:e(Query)
end
)).
% 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