Hello

    I am working some of the exercises in the online
OReilly book, in particular the time server in the
Distributed Computing chapter. I wrote the following
function:

(* Get time of day and send across the wire *)
let time_service ic oc =
   try
     let ts = Unix.time () in
     let (date:Unix.tm) = Unix.gmtime ts in
     let year = string_of_int (date.tm_year);
         month = string_of_int (date.tm_mon + 1);
         day = string_of_int (date.tm_mday);
         hour = string_of_int (date.tm_hour);
         minute = string_of_int (date.tm_min);
         seconds = string_of_int (date.tm_sec) in
     let r = year^month^day^hour^minute^seconds
     in output_string oc (r^"\n"); flush oc
   with _ -> Printf.eprintf "BLAH\n"; flush stdout;
xit 0;;
                                                      
                         
I get the following error from ocamlc:

File "time1.ml", line 23, characters 30-44:
Unbound record field label tm_year

I am confused because this field is in Unix.tm! ???

Regards, Vasili

__________________________________
Do you Yahoo!?
Yahoo! Finance Tax Center - File online. File on time.
http://taxes.yahoo.com/filing.html

-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners