我试图运行(http://mitpress.mit.edu/sicp/full-text/book/book-ZH-26.html)在SICP 4.1中所述的程序,但已经在重新定义函数碰到一些困难,apply如这本书暗示你这样做.代码如下:
#lang planet neil/sicp
;; -----------------------------------------------------------------------------
;; 4.1.1 The Core of the Evaluator
;; -----------------------------------------------------------------------------
;; Eval
(define apply-in-underlying-scheme apply)
(define (eval exp env)
(display 'eval)
(newline)
(display exp)
(newline)
(cond ((self-evaluating? exp) exp)
((variable? exp) (let ((res (lookup-variable-value exp env)))
(display (list 'lookup exp))
(newline)
(display res)
(newline)
res))
((quoted? exp) (text-of-quotation exp))
((assignment? exp) (eval-assignment exp env))
((definition? exp) (eval-definition exp env))
((if? exp) (eval-if exp env))
((lambda? exp)
(make-procedure (lambda-parameters exp)
(lambda-body exp)
env)) …Run Code Online (Sandbox Code Playgroud) 我已经看到有关如何使用' - '文件名处理图像以处理从STDIN到STDOUT的图像的信息.
$ convert logo: gif:- | display gif:-
我已经阅读了如何从动画gif中提取单个帧.
$ convert 'images.gif[0]' image.png
我还没有找到任何关于如何从STDIN中提取gif的第一帧的信息.
我试着convert -[0]和convert -'[0]'无济于事.你能帮我吗?
http://www.imagemagick.org/script/command-line-processing.php