Changing example code in Deferred.t section of async-guide 

Code was assuming Reader.read_line return string Deferred.t but it returns string Read_result.t Deferred.t