Précédent   Forum du club des développeurs et IT Pro > Autres langages > Langages fonctionnels > Scheme
Scheme Forum d'entraide sur la programmation en langage fonctionnel Scheme
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse
 
Outils de la discussion
Publicité
'
Vieux 10/06/2011, 23h56   #1
Neuromancien2
Membre confirmé
 
Inscription : mai 2002
Messages : 565
Détails du profil
Informations forums :
Inscription : mai 2002
Messages : 565
Points : 279
Points : 279
Par défaut Error: (car) bad argument type

Bonjour,

Je m'initie à Scheme à partir des articles de Linux Magazine.

J'ai réimplémenté memq comme ceci:
Code :
1
2
3
4
5
6
7
8
(define (memq obj lst)
	(if (eq? obj (car lst))
		lst
		(memq obj (cdr lst))))

(display (memq 3 '(1 2 3 4 5)))
(display (memq 6 '(1 2 3 4 5)))
Mais j'obtiens une erreur :
Citation:
Error: (car) bad argument type: ()

Call history:

<eval> [memq] (memq obj (cdr lst))
<eval> [memq] (cdr lst)
<eval> [memq] (eq? obj (car lst))
<eval> [memq] (car lst)
<eval> [memq] (memq obj (cdr lst))
<eval> [memq] (cdr lst)
<eval> [memq] (eq? obj (car lst))
<eval> [memq] (car lst) <--
(3 4 5)
Neuromancien2 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/06/2011, 11h35   #2
Trap D
Rédacteur/Modérateur
 
Avatar de Trap D
 
Inscription : septembre 2003
Messages : 4 437
Détails du profil
Informations forums :
Inscription : septembre 2003
Messages : 4 437
Points : 5 301
Points : 5 301
Tu ne geres pas le cas de la liste vide lorsque l'élément n'est pas trouvé.
__________________
"La haine seule fait des choix" - Koan Zen
"Il ne faut pas être meilleur que les autres, il faut être meilleur que soi." Albert Jacquard
"Ceux qui savent où ils ont posé leur parapluie ne sont pas alcooliques." - pgibonne.
Faites du Prolog, ça vous changera les idées !
Ma page Prolog
Mes codes sources commentés

Mon avatar : Intérieur avec jeune femme de Vilhelm Hammershoi
Trap D est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse
Outils de la discussion

Navigation rapide


Fuseau horaire GMT +2. Il est actuellement 05h48.


 
 
 
 
Partenaires

Hébergement Web