Hello list,

I'm doing that:

let _ =
  try
   let infile = open_in !filename in
   let rec readIn () =
      try
         (input_line infile) ^ readIn();
      with ee -> "";
   in
    print_string(readIn () );
   "good";
  with e -> "";;

So why don't I get any output at all? Doesn't "with" erease the raised 
Exception?

Thanks and cheers, chris