program. Scheme 一层自解释的 run-inside 定义[mce-self-driver]

(define source-definitions (program-datums interpreter))

(define (run-inside program)
   (run-scheme (append source-definitions
                (list (list 'run (list 'quote program))))))