From 3ec0ac011538f734edafaa67e0b2dbfa23a40b6a Mon Sep 17 00:00:00 2001
From: SisMaker <1713699517@qq.com>
Date: Sat, 15 May 2021 11:11:15 +0800
Subject: [PATCH] =?UTF-8?q?ft:=20=E6=B5=8B=E8=AF=95=E7=94=A8=E4=BE=8B?=
 =?UTF-8?q?=E6=B7=BB=E5=8A=A0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 src/testCase/utTpfm.erl | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/src/testCase/utTpfm.erl b/src/testCase/utTpfm.erl
index b1882be..dbcb504 100644
--- a/src/testCase/utTpfm.erl
+++ b/src/testCase/utTpfm.erl
@@ -574,5 +574,35 @@ load2(N, List) ->
    utStrToBeam:load(load2, [{get, 1}], binary_to_list(LastStr)),
    load2(N - 1, List).
 
+lMakeList(0, Acc) ->
+   Acc;
+lMakeList(Num, Acc) ->
+   NewAcc = [{rand:uniform(1000000), rand:uniform(1000000), rand:uniform(1000000)} | Acc],
+   lMakeList(Num - 1, NewAcc).
+
+lSort(Cnt, Num) ->
+   SList = lMakeList(Num, []),
+   utTc:ts(Cnt, lists, sort, [SList]).
+
+bp(0, _Str) ->
+   ok;
+bp(Cnt, Str) ->
+   binary:split(Str, <<"~">>),
+   bp(Cnt - 1, Str).
+
+
+bp1(Cnt, Str) ->
+   Pt = binary:compile_pattern(<<"~">>),
+   persistent_term:put(aaaaa, Pt),
+   bp11(Cnt, Str).
+
+bp11(0, _Str) ->
+   ok;
+bp11(Cnt, Str) ->
+   binary:split(Str, persistent_term:get(aaaaa)),
+   bp11(Cnt - 1, Str).
+
+
+