##ifdef CAMLTK val names : unit -> options list ##else val names : unit -> image list ##endif