Turtle Misc-Error incomprehensible
Je vous explique mon cas :
J'utilise un programme turtle codé en C et contrôlé par la console avec du code Lisp (avec guile) qui permet de dessiner des choses dans une fenêtre graphique.
Lorsque je tappe ce bout de code, toujours la même erreur s'affiche et arrête le programme et je ne sais pas pourquoi :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| (load "useful-macros.scm")
(define FillRect
(lambda (X Y W H)
((pen-up)
(goto X Y)
(pen-down)
(for i 0 (- H 1)
(goto (+ X (- W 1)) (+ Y i))
(goto X (+ Y i))))))
(FillRect 10 10 50 20) |
Code:
1
2
3
4
5
6
7
8
9
10
| Backtrace:
In unknown file:
?: 0* [primitive-load "test.scm"]
In test.scm:
33: 1* [FillRect 10 10 50 20]
26: 2 [#<unspecified> #<unspecified> #<unspecified> #<unspecified>]
test.scm:26:9: In expression ((pen-up) (goto X Y) (pen-down) ...):
test.scm:26:9: Wrong type to apply: #<unspecified>
ABORT: (misc-error) |
Je précise que les opérateurs pen-up, pen-down, goto sont défini et compris par le programme et le for est défini dans le fichier lancé au tout début.
Je suis en train de m'arracher les cheveux dessus et je suis persuadé que c'est une erreur toute bête mais je ne trouve pas. Merci de m'aider :?
