增加测试模块的函数

src/testCase/utTpfm.erl

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