6 lines
175 B
Racket
6 lines
175 B
Racket
#lang scheme/base
|
|
(require racket/class)
|
|
(provide (except-out (all-from-out racket/class)
|
|
printable<%>)
|
|
(rename-out [writable<%> printable<%>]))
|