2009-11-19 9 views

Répondre

3

Vous devez l'écrire vous-même. Il n'est pas intégré à Scheme car il n'est pas idiomatique et il peut être facilement construit à partir de set-car!.

(define (list-set! l k obj) 
    (cond 
    ((or (< k 0) (null? l)) #f) 
    ((= k 0) (set-car! l obj)) 
    (else (list-set! (cdr l) (- k 1) obj)))) 

Si vous faites cela beaucoup, vous devriez probablement à l'aide de vecteurs et vector-set! au lieu.

+0

ok, je vais examiner cela. –

Questions connexes