如何在MIT Scheme中获取我的函数定义？

Question

在JavaScript中,我可以检索函数的"源代码"定义,例如:

?function alert_Hi() {
    alert("Hi");
}

alert(alert_Hi);

将返回我输入的内容.http://jsfiddle.net/DuCqJ/

我怎么能在麻省理工学院计划中做到这一点？

我记得看过一些返回的#compound-procedure东西,但我真正想要的是"源代码".

Answer 1

你可以试试pp

(define (display-hi) (display "Hi"))
(pp display-hi) =>
(named-lambda (display-hi)
  (display "Hi"))