Merge branch 'jk/pack-objects-bitmap-progress-fix'

[git] / t / t4018 / scheme-define-slash-public

(define bar-class%
  (class object%
    (field (info 5))
    (define/public (foo) RIGHT
      (+ info 42)
      (* info ChangeMe))
    (super-new)))