On Stream in Scheme

(define (force delayed-object)   (delayed-object)) (define (memo-proc proc)   (let ((already-run? false) (result false))     (lambda ()     ...

2012-04-07 07:34:58

阅读数:686

评论数:0

On quote

(list ,(+ 1 2) 4) =) (list 3 4) (let ((name 'a)) (list ,name ',name)) =) (list a (quote a)) (a ,(+ 1 2) ,@(map abs '(4 -5 6)) b) =) (a 3 4 5 6...

2012-04-07 07:27:39

阅读数:669

评论数:0

提示
确定要删除当前文章?
取消 删除
关闭
关闭