Re: Représentations intermédiaires du compilateur OCaml

Retourner au contenu associé (journal : Malfunction: réutiliser la représentation intermédiaire du compilateur OCaml)

[^] # Re: Représentations intermédiaires du compilateur OCaml

Posté par Axioplase ıɥs∀ (site web personnel) le 27 juin 2016 à 21:31. En réponse au journal Malfunction: réutiliser la représentation intermédiaire du compilateur OCaml. Évalué à 3.
```
(define tree '((1 . 2) . (3 . 4))
```
et
```
(define (size l)
 (if (pair? l)
 1
 (+ (size (car l)) (size (cdr l)))))
```
ou
```
(define (size l)
 (case (pair? l)
 ((t) (+ (size (car l)) (size (cdr l))))
 (else 1)))
```
Modulo les possibles erreurs de syntaxe car j'alterne entre différents Schemes et Lisps, c'est pas dur, quoi...