boot2

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

038-record-internal-prims.scm (459B)


      1 ; Internal record primitives are not part of the user-facing API
      2 ; (R7RS records bind only the constructor / predicate / accessors /
      3 ; mutators introduced by define-record-type). Calling %make-record-td
      4 ; from user code must abort with "scheme1: unbound variable".
      5 ;
      6 ; This test is RED until the %record-* rows are removed from
      7 ; prim_table; today it would otherwise return 33 from the old
      8 ; through-public-binding path.
      9 (%make-record-td 'foo 2)
     10 (sys-exit 0)