Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
( lambda ( msg )
( case msg
(( get-ports )
( lambda () listen ))
(( add-service )
( lambda ( port )
( set ! listen ( cons port listen ))))
(( remove-service )
( lambda ( port )
( set ! listen ( delete port listen ))))
( else ( my-host msg )))))))
( define s ( make-server ))
((s ’ get-hostname ))
((s ’ set-hostname ) "x")
((s ’ get-hostname ))
((s ’ get-ports ))
((s ’ remove-service ) 22)
((s ’ add-service ) 443)
Como o objetivo desta discussão era apenas o de ilustrar o mecanismo pelo qual
fechos podem emular um sistema de objetos, não foram desenvolvidas facilidades como
uma macro 4 define-class, que a partir de um nome de classe e lista de atributos geraria
um procedimento para criar objetos da classe e outros, para acessar os atributos e métodos.
A possibilidade de implementar fechos está intimamente ligada à disciplina de escopo
léxico, mas nem toda linguagem com escopo estático suporta fechos. Em C, por exemplo,
uma função pode retornar um ponteiro para outra função – mas a função retornada não
leva consigo o ambiente em que foi definida, porque em C não há como retornar um
ponteiro para função que não tenha sido definida no nível base.
Versão Preliminar
4 Uma macro é uma forma especial definida pelo usuário.
108
[ 27 de outubro de 2010 at 15:47 ]