Fix non-TEST compilation problem
This commit is contained in:
parent
67b661494e
commit
0a77c09779
1 changed files with 4 additions and 4 deletions
|
@ -68,13 +68,13 @@ ping(Pid) ->
|
||||||
calculate_projection_internal_old(Pid) ->
|
calculate_projection_internal_old(Pid) ->
|
||||||
gen_server:call(Pid, {calculate_projection_internal_old}, infinity).
|
gen_server:call(Pid, {calculate_projection_internal_old}, infinity).
|
||||||
|
|
||||||
test_write_proposed_projection(Pid) ->
|
|
||||||
gen_server:call(Pid, {test_write_proposed_projection}, infinity).
|
|
||||||
|
|
||||||
-ifdef(TEST).
|
-ifdef(TEST).
|
||||||
|
|
||||||
%% Test/debugging code only.
|
%% Test/debugging code only.
|
||||||
|
|
||||||
|
test_write_proposed_projection(Pid) ->
|
||||||
|
gen_server:call(Pid, {test_write_proposed_projection}, infinity).
|
||||||
|
|
||||||
%% Calculate a projection and return it to us.
|
%% Calculate a projection and return it to us.
|
||||||
%% If KeepRunenvP is true, the server will retain its change in its
|
%% If KeepRunenvP is true, the server will retain its change in its
|
||||||
%% runtime environment, e.g., changes in simulated network partitions.
|
%% runtime environment, e.g., changes in simulated network partitions.
|
||||||
|
@ -459,7 +459,7 @@ rank_and_sort_projections(Ps, CurrentProj) ->
|
||||||
Proj#projection.epoch_number == Epoch],
|
Proj#projection.epoch_number == Epoch],
|
||||||
%% Sort with highest rank first (custom sort)
|
%% Sort with highest rank first (custom sort)
|
||||||
lists:sort(fun({RankA,_}, {RankB,_}) -> RankA > RankB end,
|
lists:sort(fun({RankA,_}, {RankB,_}) -> RankA > RankB end,
|
||||||
rank_projections(MaxPs, CurrentProj)).
|
rank_projections(MaxPs, CurrentProj)).
|
||||||
|
|
||||||
%% Caller must ensure all Projs are of the same epoch number.
|
%% Caller must ensure all Projs are of the same epoch number.
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue