ft: 测试代码添加

src/docs/erlang/编译安装与简单安装.md

@@ -41,6 +41,7 @@
         3.2 使用rpm 安装 rpm -ivh jdk-7u1-linux-i586.rpm 
         yum -y install ncurses-devel unixODBC-devel openssl-devel  gcc gcc-c++ autoconf automake libxslt gtk3-devel.x86_64 
         
+        ./otp_build autoconf
         运行configure配置 
         ./configure --prefix=/usr/local/erlang  --with-ssl  -enable-threads -enable-smmp-support -enable-kernel-poll  --without-javac
         

src/testCase/utTpfm.erl

@@ -574,5 +574,25 @@ load2(N, List) ->
    utStrToBeam:load(load2, [{get, 1}], binary_to_list(LastStr)),
    load2(N - 1, List).
 
+etsT(Cnt, Num) ->
+   Tab = ets:new(test, [ordered_set]),
+   etsInsert(Num, Tab),
+   etsT(Cnt, {50000, Num div 2}, Tab),
+   ets:delete(Tab).
+
+etsInsert(0, _Tab) ->
+   ok;
+etsInsert(N, Tab) ->
+   ets:insert(Tab, {{rand:uniform(100000), N}, N}),
+   etsInsert(N - 1, Tab).
+
+-include_lib("stdlib/include/ms_transform.hrl").
+etsT(Cnt, Key, Tab) ->
+   Ms = ets:fun2ms(fun({K, _V}) when Key > K -> true end),
+   utTc:ts(Cnt, ets, select_count, [Tab, Ms]).
+
+
+
+