bonsoir , est ce que quelqu'un peut m'aider en clisp
(alphabet 0 256) elle donne le résultat souhaité
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 alphabet iterative (defun alphabet (x y) (setq a "") (setq x x) (loop (cond ((< y x) (return a)) ) (setq a (string-concat a (string (code-char x)))) (setq x (1+ x))))
(alphabet 0 char-code-limit) mais avec le code char elle retourne pas un résultat
ensuite j'aimerais imprimer une chaine de caractère sur un fichier avec la fonction (print-alphabet fichier)
Dans l'attente de vous lire
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 <code> <une tabulation> <le caractère "en vrai"> <une tabulation><le caractère en représentation common lisp> 9 . . . #\tAB 65 . A . #\A
merci
Partager