08.02.2015 Views

Programação Funcional e Concorrente com Scheme

Programação Funcional e Concorrente com Scheme

Programação Funcional e Concorrente com Scheme

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

notas de aula - Jerônimo C. Pellegrini<br />

(force a)<br />

Error: (quotient) division by zero<br />

No próximo exemplo, definimos duas variáveis <strong>com</strong> o valor (* 10 10 10 10) – uma<br />

usando avaliação estrita e outra usando avaliação preguiçosa.<br />

(define d (* 10 10 10 10))<br />

(define e (delay (* 10 10 10 10)))<br />

d<br />

10000<br />

e<br />

#<br />

O resultado de delay pode ou não ser um procedimento. Muitas implementações de<br />

<strong>Scheme</strong> definem um tipo promise. Se e não é um procedimento, não podemos aplicá-lo, e<br />

é necessário usar force:<br />

(+ e 1)<br />

Error: (+) bad argument type: #<br />

(+ (force e) 1)<br />

10001<br />

O próximo exemplo mostra que o ambiente de uma expressão ainda não avaliada é<br />

aquele onde ela foi definida – mas podemos modificá-lo antes de usar force.<br />

Definimos uma variável zz que faz referência a outras duas variáveis que ainda não<br />

definimos:<br />

( define nome-<strong>com</strong>pleto<br />

( delay ( string-append nome<br />

Warning: the following toplevel variables<br />

are referenced but unbound:<br />

nome<br />

sobrenome )))<br />

Versão Preliminar<br />

sobrenome<br />

Tentar forçar nome-<strong>com</strong>pleto é evidentemente um erro:<br />

216<br />

[ 27 de outubro de 2010 at 15:47 ]

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!