2010/7/30 Luciano Borges <[email protected]>:
> Olá pessoal, estou iniciando no mundoi LISP, estou usando o lisp no
> IntelliCad, alguém já usou nesse ambiente?
>
> Estou precisando dar manutenção em um código existente e para isso
> quero fazer um exemplo simples para testar e saber como funciona
> algumas das funções, então, precisaria de um código que eu chamasse
> uma função com um parâmetro e pegasse esse parâmetro e escrevesse em
> um arquivo texto. Tentei dessa forma e não deu certo.
>
> ; Exemplo que pega um parâmetro e imprime num arquivo texto
>
> (defun imprimir()
> (setq nomeArquivo "dados.txt")
> (setq arquivo (open nomeArquivo "w"))
> (write-line "teste" arquivo)
> (close arquivo)
> )
>
Nunca usei o Intellicad, mas ele aparenta usar o AutoLisp.
Eu olhei a documentação e não entendo como ele tem a petulância de se
chamar de "Lisp" Não achei nem let, nem with-open-file, e tem escopo
dinâmico. Até implementações Scheme para microcontroladores são mais
completas. Então você está olhando para o "mundo Lisp" através de um
buraco de fechadura :)
Em CommonLisp, o mesmo código poderia ser feito assim(testado no SBCL):
(defun imprimir (&optional (nome-arquivo "teste.txt"))
(with-open-file (stream nome-arquivo :direction :output :if-exists :supersede)
(format stream "teste")))
Voltando à pergunta, o que você quer dizer por "não deu certo"? Dá
erro ou o que?
--Stephen
Sent from my Emacs
--
You received this message because you are subscribed to the Google Groups
"Lisp-br" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/lisp-br?hl=en.
