Fre*_*Foo 5

如果我理解正确的话,你想有一个功能print-function,使得后

(define (foo x) (cons x x))
Run Code Online (Sandbox Code Playgroud)

它表现得像

> (print-function foo)
(lambda (x) (cons x x))
Run Code Online (Sandbox Code Playgroud)

标准计划没有这方面的便利.原因是Scheme实现可以并且通常将函数编译成不同的表示(字节码,机器代码).

一些方案可以保持功能定义; 检查您的实施手册.