boot2

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

055-char-named.scm (344B)

      1 ; Named character forms: #\space #\newline #\tab #\return #\null.
      2 (if (= (char->integer #\space)   32) 0 (sys-exit 1))
      3 (if (= (char->integer #\newline) 10) 0 (sys-exit 2))
      4 (if (= (char->integer #\tab)      9) 0 (sys-exit 3))
      5 (if (= (char->integer #\return)  13) 0 (sys-exit 4))
      6 (if (= (char->integer #\null)     0) 0 (sys-exit 5))
      7 (sys-exit 0)