6 lines
147 B
Scheme
6 lines
147 B
Scheme
#cs
|
|
(module Comparable mzscheme
|
|
(require mzlib/class)
|
|
(provide (all-defined))
|
|
(define Comparable (interface () compareTo-java.lang.Object)))
|