Преглед изворни кода

ft: 测试代码修正

master
SisMaker пре 3 година
родитељ
комит
2bb62dcca2
2 измењених фајлова са 48 додато и 1 уклоњено
  1. +47
    -0
      src/measure/DsTestSimple/utSEnlfqDs.erl
  2. +1
    -1
      src/measure/DsTestSimple/utSTestDs.erl

+ 47
- 0
src/measure/DsTestSimple/utSEnlfqDs.erl Прегледај датотеку

@ -0,0 +1,47 @@
-module(utSEnlfqDs).
-compile([nowarn_unused_function, nowarn_unused_vars, nowarn_export_all]).
-export([start/2]).
start(Num, Pid) ->
Ds = init(Num),
Time1 = erlang:monotonic_time(),
NewDsI = insert(Num, Ds),
Time2 = erlang:monotonic_time(),
NewDsR = read(Num, NewDsI),
Time3 = erlang:monotonic_time(),
NewDsU = update(Num, NewDsR),
Time4 = erlang:monotonic_time(),
NewDsF = for(Num, NewDsU),
Time5 = erlang:monotonic_time(),
delete(Num, NewDsF),
Time6 = erlang:monotonic_time(),
erlang:send(Pid, {over, self(), Time2 - Time1, Time3 - Time2, not_support, not_support, not_support, no_size}),
exit(normal).
init(_Num) ->
{ok, Ds} = enlfq:new(),
Ds.
insert(0, Ds) ->
Ds;
insert(Num, Ds) ->
enlfq:push(Ds, {Num, Num, tettdfd}),
insert(Num - 1, Ds).
read(0, Ds) ->
Ds;
read(Num, Ds) ->
Value = enlfq:pop(Ds),
read(Num - 1, Ds).
update(Num, Ds) ->
Ds.
for(Num, Ds) ->
Ds.
delete(Num, Ds) ->
Ds.

+ 1
- 1
src/measure/DsTestSimple/utSTestDs.erl Прегледај датотеку

@ -11,7 +11,7 @@
%-define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096, 8192, 16384, 32768, 65536, 131072, 524288, 1048576]).
-define(V_NUM, [8, 16, 32, 64, 128, 256, 516, 1024, 2048, 4096]).
-define(DsList, [utSPdDs, utSTupleDs, utSListsDs, utSMapsDs, utSQueueDs, utSUtFifoDs, utSUtLifoDs, utSEtsSetDs, utSEtsOrdDs, utSArrayDs, utSDictDs, utSGb_treesDs, utSSetsDs, utSGb_setsDs, utSOrddictDs, utSOrdsetsDs]).
-define(DsList, [utSPdDs, utSTupleDs, utSListsDs, utSMapsDs, utSQueueDs, utSUtFifoDs, utSUtLifoDs, utSEnlfqDs, utSEtsSetDs, utSEtsOrdDs, utSArrayDs, utSDictDs, utSGb_treesDs, utSSetsDs, utSGb_setsDs, utSOrddictDs, utSOrdsetsDs]).
%-define(DsList, [utSPdDs, utSTupleDs, utSMapsDs, utSArrayDs, utSEtsSetDs, utSSetsDs]).
-define(Cnt, 12).

Loading…
Откажи
Сачувај