boot2

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

110-cwv-zero.scm (197B)

      1 ; Zero-value yield: (values) returns a 0-pack; consumer must accept ().
      2 
      3 (if (= 99 (call-with-values
      4             (lambda () (values))
      5             (lambda () 99)))
      6     0 (sys-exit 1))
      7 
      8 (sys-exit 0)