Merge branch 'ab/svn-tests-set-e-fix'
[git] / t / t4018 / scheme-define-slash-public
1 (define bar-class%
2   (class object%
3     (field (info 5))
4     (define/public (foo) RIGHT
5       (+ info 42)
6       (* info ChangeMe))
7     (super-new)))