7d50e61c7f
* Another big chunk of v4-require-isms * Allow `#lang framework/keybinding-lang' for keybinding files * Move hierlist sources into "mrlib/hierlist", leave stub behind svn: r10689
11 lines
286 B
Scheme
11 lines
286 B
Scheme
|
|
(require mzlib/process)
|
|
|
|
(define name (vector-ref (current-command-line-arguments) 0))
|
|
|
|
(when (file-exists? (format "~a.o1" name))
|
|
(delete-file (format "~a.o1" name)))
|
|
|
|
(system (format "gsc -:m10000 -dynamic -prelude '(include \"gambit-prelude.sch\")' ~a.sch"
|
|
name))
|