phauna.org


let () =
  Arg.parse specl anonfun usage_msg;
  match List.rev !anonargs with
  | [] -> Arg.usage specl usage_msg; exit 1
  | args ->
     begin
       match !conf with None -> () | Some conf -> do_config conf;
       let string = "world" in
       printf "hello %s\n%!" string;
     end


This entry was posted on Monday, November 6th, 2006 at 8:32 pm and is filed under hacking. You can follow any responses to this entry through the RSS 2.0 feed. You can skip to the end and leave a response. Pinging is currently not allowed.