scheme-class « t4018 « t - git.kernel.org/pub/scm/git/git.git - Unnamed repository; edit this file 'description' to name the repository.

Welcome to mirror list, hosted at ThFree Co, Russian Federation.

scheme-class « t4018 « t - git.kernel.org/pub/scm/git/git.git - Unnamed repository; edit this file 'description' to name the repository.

summary refs log tree commit diff

path: root/t/t4018/scheme-class

blob: e5e07b43fb2b4e73f1a42d5d996a6ba217807706 (plain)

(define book-class%
  (class* () object% RIGHT
    (field (pages 5))
    (field (ChangeMe 5))
    (define/public (letters)
      (* pages 500))
    (super-new)))