13 lines
287 B
Scheme
13 lines
287 B
Scheme
(module plt-mred mzscheme
|
|
(require (lib "mred.ss" "mred")
|
|
(lib "class.ss"))
|
|
|
|
(define argv #())
|
|
(define program "mred")
|
|
|
|
(provide argv
|
|
program
|
|
(all-from mzscheme)
|
|
(all-from (lib "class.ss"))
|
|
(all-from (lib "mred.ss" "mred"))))
|