Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
(force nome-completo)
Error: unbound variable: nome
Podemos tentar criar um ambiente léxico onde nome e sobrenome existam e forçar
nome-completo neste ambiente, mas isto também resultará em erro:
(let ((nome "Richard") (sobrenome "Wagner")) (force nome-completo))
Error: unbound variable: nome
O ambiente de nome-completo é o ambiente léxico onde a definimos. Como nome-completo
foi definida no ambiente global, podemos criar os vínculos faltantes ali.
(define nome "Richard")
(define sobrenome "Wagner")
(force nome-completo)
”Richard Wagner”
9.1.1 Como implementar delay e force
A implementação de delay e force é surpreendentemente simples. Aqui os definiremos
com os nomes depois e agora:
( define-syntax depois
( syntax-rules ()
(( depois x)
( lambda () x ))))
( define agora
( lambda (x) (x )))
A macro depois aceita uma S-expressão e devolve um procedimento que, ao ser
executado, avalia a S-expressão. Este procedimento retornado por depois é a “promessa”.
O procedimento agora toma a promessa (o procedimento) e o executa, produzindo o
Versão Preliminar
valor desejado.
[ 27 de outubro de 2010 at 15:47 ]
217