Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
( syntax-rules ()
((_ fun )
( set ! fun ( with-trace ’fun fun )))))
find.
Agora podemos acmopanhar as chamadas de um procedimento usando a macro
(trace find)
(find ’a ’(x y z a b c))
7.9 casamento de padrões
exercícios
Ex. 69 — Reescreva o jogo de poquer descrito nos Capítulos anteriores usando define-structure.
Ex. 70 — Escreva uma macro xnor, que é semelhante a xor exceto que o primeiro argumento
é o número de formas que devem ser verdadeiras.
( xnor 2 #f #f ’a ’b #f) ==> #t
( xnor 3 #f #f ’a ’b #f) ==> #f
( xnor 1 #f 1 #f) ==> #t
Ex. 71 — Faça uma macro que permita escrever Lisp em notação posfixa. Um exemplo
de uso:
((y x +) 2 *) deve ser expandido para (* 2 (+ x y))
Ex. 72 — Imagine uma função que mude o valor de uma variável para #f:
( define faz-falso !
( lambda (x)
( set ! x #f )))
Versão Preliminar
Porque ela não funciona Como conseguir que (faz-falso! variavel) funcione de
forma correta
192
[ 27 de outubro de 2010 at 15:47 ]