Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
mento get-linear-congruential recebe uma semente e retorna um gerador de números
aleatóreos que pode ser chamado sem argumentos:
( define get-linear-congruential
( lambda ( seed )
( let (( next seed ))
( lambda ()
( let ((n ( linear-congruencial next
( set ! next n)
next )))))
1103515245
12345
( expt 2 32))))
( define next-random ! ( get-linear-congruential 1111))
Ao dar nome ao gerador retornado por get-linear-congruential usamos o sinal
! porque de fato, cada vez que for aplicado o procedimento next-random! modificará o
valor de uma variável.
3.6.3 Um micro sistema de objetos
No paradigma de programação orientada a objetos, a idéia central é modelar o mundo
como objetos e organizá-los em classes. Cada objeto de uma mesma classe tem os mesmos
atributos (variáveis locais, que somente são visíveis dentro do objeto) e objetos interagem
trocando mensagens. Cada objeto tem uma lista de mensagens que pode responder – para
cada mensagem ele implementa um método.
As variáveis que fechos Scheme “carregam” são semelhantes aos atributos de objetos.
Para implementar um sistema de objetos simples em Scheme com fechos são necessários
dois procedimentos:
• Um para criar um objeto de uma classe;
• Um para enviar uma mensagem a um objeto.
Versão Preliminar
O exemplo a seguir mostra como um objeto host pode ser criado. O procedimento que
cria o objeto é específico (não há ainda um define-class), mas ilustra o funcionamento
do mecanismo.
106
[ 27 de outubro de 2010 at 15:47 ]