for-each-ref: add new option to include root refs
[git.git] / t / t4018 / scheme-class
blobe5e07b43fb2b4e73f1a42d5d996a6ba217807706
1 (define book-class%
2   (class* () object% RIGHT
3     (field (pages 5))
4     (field (ChangeMe 5))
5     (define/public (letters)
6       (* pages 500))
7     (super-new)))