- and loop o e =
- let (e', h) = e in
- match e' with
Il vaudra mieux utiliser une fonction (genre `lexp_lexp'`) comme ça le
jour où on change la définition de `lexp` (e.g. en y ajoutant un
troisième élément), on aura pas besoin de tout re-modifier.
Stefan