boot2

Playing with the boostrap
git clone https://git.ryansepassi.com/git/boot2.git
Log | Files | Refs | README

051-shell-signal.scm (350B)


      1 ; Pin the signal-termination branch of decode-wait-status. Run a child
      2 ; that SIGKILLs itself; the prelude's wait should report (#t . (+ 128 9)).
      3 ; Together with 45/56 (exit-code branch) this covers both branches of
      4 ; decode-wait-status without any raw sys-* poking.
      5 (define r (run "/bin/sh" "-c" "kill -9 $$"))
      6 (if (car r) (exit (cdr r)) (exit 99))