boot2

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

022-named-let.scm (251B)


      1 ; Named let: `go` is bound to a closure that re-enters the loop body.
      2 ; First iteration: first=#t → recurse with first=#f and the same n=71.
      3 ; Second: first=#f → return n.
      4 (sys-exit (let go ((n 71) (first #t))
      5             (if first (go n #f) n)))