boot2

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

054-char-literal.scm (548B)

      1 ; #\<c> for printable ASCII evaluates to the u8 of <c>.
      2 ; #\xNN evaluates to the byte with that hex value.
      3 (if (= #\a 97)    0 (sys-exit 1))    ; lowercase
      4 (if (= #\Z 90)    0 (sys-exit 2))    ; uppercase
      5 (if (= #\! 33)    0 (sys-exit 3))    ; punctuation
      6 (if (= #\~ 126)   0 (sys-exit 4))    ; last printable
      7 (if (= #\x41 65)  0 (sys-exit 5))    ; hex form -> 'A'
      8 (if (= #\x7f 127) 0 (sys-exit 6))    ; hex form -> DEL
      9 (if (= #\xff 255) 0 (sys-exit 7))    ; hex, 8-bit max
     10 (if (= #\xFF 255) 0 (sys-exit 8))    ; hex, uppercase digits
     11 (sys-exit 0)