Z991239-385 #comment 添加以测试模式启动的脚本

ChangeLog

@@ -1,10 +1,21 @@
 ## 更新记录
 
-* 2020-05-19: SpBase: 添加实体测试接口 OnExam，主要改动在 SpTest 中
+* 2020-05-26: 添加以测试模式启动的`spexplorertest.vbs`脚本
+
+* 2020-05-24: Entity: 添加多个压力测试实体（mod_highVoltage**），通过 TestDeamon 实体注册启动（廖桂发）
+
+* 2020-05-24: SpBase: 修复在多个实体共用一个系统变量时，ShellVal回写只写一个实体，导致后面重启后其他实体无权限操作的缺陷（廖桂发）
+
+* 2020-05-23: LibToolkit,SpBase: 添加自定义的malloc/free等C内存分配函数，以跟踪内存申请的情况（廖桂发）
+                       添加一些spshell退出时清理内存的代码（廖桂发）
+
+* 2020-05-23: SpShell: spshell启动支持 --kill 选项参数，以强制杀死框架相关的进程（廖桂发）
+
+* 2020-05-19: SpBase: 添加实体测试接口 OnExam，主要改动在 SpTest 中（廖桂发）
 
 * 2020-05-15: CMake: 针对每个实体，添加版本说明（廖桂发）
 
-  以后每个实体的改动都需要添加ChangeLog，并且有必要的情况下更具语义版本控制规则修改实体的版本号
+  以后每个实体的改动都需要添加ChangeLog，并且有必要的情况下更具语义版本控制规则修改实体的版本号（廖桂发）
 
 * 2020-05-15: 在现有的系统变量机制上封装终端系统状态，添加接口（廖桂发）
 

addin/startup_scripts/spexplorertest.vbs

@@ -0,0 +1,23 @@
+base_dir = Left(WScript.ScriptFullName, InStrRev(WScript.ScriptFullName, "\"))
+version_path = base_dir & "active.txt"
+version = ReadVersion(version_path)
+bin_path = base_dir & version & "\bin\spshell.exe --test"
+Run bin_path
+
+Sub Run(ByVal sFile)
+Dim shell
+	Set shell = CreateObject("WScript.Shell")
+	shell.Run Chr(34) & sFile & Chr(34), 1, false
+	Set shell = nothing
+End Sub
+
+Function ReadVersion(sFile)
+	Dim fs
+	Dim tfs
+	Set fs = CreateObject("Scripting.FileSystemObject")
+	Set tfs = fs.OpenTextFile(sFile, 1, True)
+	ReadVersion = Trim(tfs.ReadLine)
+	tfs.Close
+	Set tfs = Nothing
+	Set fs = Nothing
+End Function

module/include/mod_highVoltageBase.hpp

@@ -255,7 +255,7 @@ void CHighVoltageBase::TestCaseInvoke()
 
 	//Stop();
 
-	//SetMaxTimes(1000);
+	SetMaxTimes(10000);
 
 	IFFAILBREAK(GetFunction()->PostThreadPoolTask(new UpdateSysValTask(this)));
 	IFFAILBREAK(GetFunction()->PostThreadPoolTask(new SendBroadCastTask(this)));