boot2

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

23-vector.scm (367B)


      1 ;; Step 11d: vector literals #(...). Reader builds a vector of the
      2 ;; constituent values (no element-level evaluation — literals only).
      3 (if (= (vector-ref #(10 20 30) 0) 10)
      4   (if (= (vector-ref #(10 20 30) 1) 20)
      5     (if (= (vector-ref #(10 20 30) 2) 30)
      6       (if (= (vector-length #(1 2 3 4)) 4)
      7         (if (= (vector-length #()) 0)
      8           42 0) 0) 0) 0) 0)