foo.eliom

let%server () = Printf.printf "server: %i@." 3
let%client () = Printf.printf "client: %i@." 4