antcolony

1.6 KB

1. // process.hl → class Process — one child, its lifetime, its events. The
2. // eventloop wiring lives HERE so app code never sees it: the events source is
3. // registered AT this instance, the internal fan-out re-emits `line` and
4. // `exit` at itself, and `on process.line` / `on process.exit` in the app are
5. // ordinary instance-scoped handlers.
7. Number pid = 0
8. Boolean running = false
9. Number #srcId = 0
11. start(String cmd) {
12. // THE STRING GOES OVER WHOLE (mission 249). `hl_proc_spawn` branches on
13. // the argument's type and its string branch is the tokenizer server.hl
14. // documents: whitespace RUNS (spaces, tabs, newlines — a command written
15. // across lines is one command) and quote GROUPING. Splitting here on " "
16. // and handing the pieces to the LIST branch is what kept that code
17. // unreached, and put a tab or a newline inside argv[0].
18. return this.launch(cmd)
19. }
21. startArgs(args) {
22. return this.launch(args)
23. }
25. // The one spawn: `spec` is the command STRING or the argv LIST, and which
26. // one it is decides the branch inside `hl_proc_spawn`, never anything here.
27. launch(spec) {
28. let spawned = __native("proc.spawn", spec)
29. pid = spawned.pid
30. running = true
31. #srcId = __native("eventloop.register", spawned.events, "__procEvent")
32. return this
33. }
35. on __procEvent(ev) {
36. if (ev.exit != null) {
37. running = false
38. // A FINISHED CHILD RETIRES ITS SOURCE (server.hl: "a program whose
39. // children are done simply ends"). Without this the loop still holds
40. // a source that will never speak again and the program never returns.
41. __native("eventloop.unregister", #srcId)
42. emit exit(ev)
43. return null
44. }
45. emit line(ev)
46. return null
47. }
49. kill() {
50. if (running == false) {
51. return false
52. }
53. return __native("proc.kill", pid)
54. }