关于Scheme的一个问题

shellex

关于Scheme的一个问题
      
该问题来自这篇文章:
http://www.cnblogs.com/linkcd/ar ... /196087.html#659633
乐过以后,我想了一下
如下是我写的代码
(define (Foo op x y)
(op x y))
(foo + (read) (read))
(foo (read) (read) (read))

第二次执行foo函数时是会出错(编译器DrScheme)
不能实现文章中想要的功能.请问为何?
初学,望大家包涵

shellex

问题已经解决:
(define  (Foo  op  x  y)  
   (display  (op  x  y)))  
(foo  (eval(read))  (read)  (read))