增加测试模块的函数

src/testCase/utTpfm.erl

@@ -560,13 +560,13 @@ tPd(N, _) ->
    erlang:put(pdVpSize, 0),
    tPd(N -1, erlang:get(pdVpSize)).
 
-load1(0, List) ->
+load1(0, _List) ->
    ok;
 load1(N, List) ->
    utKvsToBeam:load(load1, List),
    load1(N - 1, List).
 
-load2(0, List) ->
+load2(0, _List) ->
    ok;
 load2(N, List) ->
    Str = << <<"get(", (utTypeCast:toBinary(Key))/binary, ") -> ", (utTypeCast:toBinary(Value))/binary, ";">> || {Key, Value} <- List>>,