init here
This commit is contained in:
3
исх/струя/струя-внутр/внутр.tri
Normal file
3
исх/струя/струя-внутр/внутр.tri
Normal file
@@ -0,0 +1,3 @@
|
||||
модуль струя-внутр
|
||||
|
||||
тип Струя* = фн (аргумент: *)
|
||||
21
исх/струя/струя.tri
Normal file
21
исх/струя/струя.tri
Normal file
@@ -0,0 +1,21 @@
|
||||
модуль струя
|
||||
|
||||
импорт "исх/струя/струя-внутр"
|
||||
|
||||
// c:include "pstruya.h"
|
||||
|
||||
фн tri_thread_create(струя: струя-внутр.Струя, аргумент: *): Цел64 @внеш
|
||||
фн tri_thread_join(ид: Цел64) @внеш
|
||||
фн tri_thread_detach(ид: Цел64) @внеш
|
||||
|
||||
фн новая струя*(струя: струя-внутр.Струя, аргумент: *): Цел64 {
|
||||
вернуть tri_thread_create(струя, аргумент)
|
||||
}
|
||||
|
||||
фн ждать струю*(ид: Цел64) {
|
||||
tri_thread_join(ид)
|
||||
}
|
||||
|
||||
фн отсоединить струю*(ид: Цел64) {
|
||||
tri_thread_detach(ид)
|
||||
}
|
||||
Reference in New Issue
Block a user