GitLab

This closes issue #122

This commit might break the bench, I will fix it quickly I promise :)

Bench reestablished

Example taken from the VOCaL project:
  let make (dummy [@ocaml:optional]: option 'a) (n: int63) (x: 'a) : t 'a
    ...

  let init (dummy [@ocaml:named]: 'a) (n: int63) (f: int63 -> 'a) : t 'a
  = let a = make None n dummy in
    ...

Now the resulting OCaml code is as follows:
  let init ~dummy:(dummy: 'a) (n: int) (f: (int) -> 'a) : 'a t =
    let a = make  n dummy in
    ...

both constructor and projection names are now added to the mod_known from
Mltree.pmodule, pointing to the type declarations in which they are introduced.

- even for range types fitting 31-bit signed integers the user must provide a
driver in order to get them extracted to OCaml's type 'int'

- range types that fit in 31-bit signed integers are mapped to OCaml's type int
  (both literals and for loops)
- a for loop on a type that is mapped to 'int' in the OCaml driver is
  translated to an OCaml for loop

New label can be used to avoid printing type definitions that are
only useful inside ghost, and so we do not want to get them in the
extracted code.

Labels [ocaml:named] and [ocaml:remove] moved into /src/mlw/ocaml_printer.ml

If [e1] is a ghost expression but [if e1 then e2 else e3] doesn't, then either
[e2] or [e3] (or both) are Eabsurd.

If [e] is a ghost expression but [match e with bl] doesn't, then the first
pattern in [bl] is irrefutable.