鱼刺类线程池问题

hsk0809

刚接触线程池  套用别人的模板，不知道什么情况，运行一段时候以后主线程莫名其妙的自动停止  大佬帮忙看看，如果不是代码问题，还有什么原因会造成这种情况

  

窗口程序集名	保 留	保 留	备 注
程序集_消息处理
变量名	类 型	数组	备 注
线程池	鱼刺类_线程池Ex
线程池状态	逻辑型
主线程	鱼刺类_线程操作
主线程句柄	整数型
线程数	整数型

子程序名	返回值类型	公开	备 注
线程池_创建

线程数 ＝ 到整数 (读配置项 (G_config目录, “other”, “ThreadNumber”, “3”))
如果真 (线程池.取_状态 () ＝ 0)
线程池状态 ＝ 线程池.创建 (线程数, 线程数)
如果真 (线程池状态 ＝ 假)
日志 (“线程池创建失败，即将退出”, 1)
结束程序 ()
日志 (“线程池创建成功。线程数：” ＋ 到文本 (线程数), 0)
主线程.创建 (&主线程, , 主线程句柄)

.版本 2<br /> <br /> .程序集 程序集_消息处理<br /> .程序集变量 线程池, 鱼刺类_线程池Ex<br /> .程序集变量 线程池状态, 逻辑型<br /> .程序集变量 主线程, 鱼刺类_线程操作<br /> .程序集变量 主线程句柄, 整数型<br /> .程序集变量 线程数, 整数型<br /> <br /> .子程序 线程池_创建<br /> <br /> 线程数 ＝ 到整数 (读配置项 (G_config目录, “other”, “ThreadNumber”, “3”))<br /> .如果真 (线程池.取_状态 () ＝ 0)<br />     线程池状态 ＝ 线程池.创建 (线程数, 线程数)<br />     .如果真 (线程池状态 ＝ 假)<br />         日志 (“线程池创建失败，即将退出”, 1)<br />         结束程序 ()<br />     .如果真结束<br />     日志 (“线程池创建成功。线程数：” ＋ 到文本 (线程数), 0)<br />     主线程.创建 (&主线程, , 主线程句柄)<br /> .如果真结束

  

子程序名	返回值类型	公开	备 注
主线程

变量名	类 型	静态	数组	备 注
i	整数型
任务数	整数型
已投递数	整数型
需投递数	整数型

主线程.置CPU亲和性 ()
判断循环首 (线程池状态)
如果真 (任务数 ＜ 1 且 线程池.取_执行线程数 () ＜ 1)
任务数 ＝ 队列_消息.取数量 ()
如果真 (任务数 ＜ 1)
线程池.等待任务动态 (10)
到循环尾 ()
调试输出 (“总任务数”, 任务数)

需投递数 ＝ 选择 (任务数 ＞ 线程数, 线程数, 任务数)  ' 为了保证最后剩下的任务正好投递完毕
调试输出 (“需 投递数”, 需投递数)
如果真 (需投递数 ≥ 1)
计次循环首 (需投递数, i)
线程池.投递任务 (&线程_消息处理, 已投递数)
原子_递增 (已投递数)
计次循环尾 ()
任务数 ＝ 任务数 － 需投递数
调试输出 (“已 投递数”, 已投递数)

线程池.等待任务动态 ()
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> <br /> <br /> .子程序 主线程<br /> .局部变量 i, 整数型<br /> .局部变量 任务数, 整数型<br /> .局部变量 已投递数, 整数型<br /> .局部变量 需投递数, 整数型<br /> <br /> 主线程.置CPU亲和性 ()<br /> .判断循环首 (线程池状态)<br />     .如果真 (任务数 ＜ 1 且 线程池.取_执行线程数 () ＜ 1)<br />         任务数 ＝ 队列_消息.取数量 ()<br /> <br />         .如果真 (任务数 ＜ 1)<br />             线程池.等待任务动态 (10)<br />             到循环尾 ()<br />         .如果真结束<br />         调试输出 (“总任务数”, 任务数)<br />     .如果真结束<br /> <br />     需投递数 ＝ 选择 (任务数 ＞ 线程数, 线程数, 任务数)  ' 为了保证最后剩下的任务正好投递完毕<br />     调试输出 (“需 投递数”, 需投递数)<br /> <br />     .如果真 (需投递数 ≥ 1)<br />         .计次循环首 (需投递数, i)<br />             线程池.投递任务 (&线程_消息处理, 已投递数)<br />             原子_递增 (已投递数)<br />         .计次循环尾 ()<br />         任务数 ＝ 任务数 － 需投递数<br />         调试输出 (“已 投递数”, 已投递数)<br />     .如果真结束<br /> <br />     线程池.等待任务动态 ()<br /> <br /> .判断循环尾 ()

羽傲天

用户Java的线程池吧，

cherryy

有可能线程堵塞，适当的加个延迟会好点