Commits

Alexey Kishkin  committed 211c1e6

work with comments

  • Participants
  • Parent commits e1fd40b

Comments (0)

Files changed (1)

          flush o_channel;
       end
  
-   (** Delete key *)
+   (** Delete key 
+     @param key - string - key to delete
+   *)
    
    method delete key =
       let cargo = self#encode_packet Delete key "" "" 0 0L in
          (status, key, value)
       end
    
-   (** Delete key , dont wait the answer  *)
+   (** Delete key , dont wait the answer
+      @param key - string - key to delete
+   
+     *)
    
    method deleteq key =
       let cargo = self#encode_packet DeleteQ key "" "" 0 0L in
          (status, key, value)
       end
    
+   
+   (** Return version of memcache server *)
    method version =
       let cargo = self#encode_packet Version "" "" "" 0 0L in
       begin
 
 
 (* Example *)
+(*
 let print_result (status, key, value) =
    print_string (key^" :: ");
    print_endline (match status with
 c#append "walrus" " year";;
 List.iter (fun x -> print_result x) (c#multiget ["mumka";"odobenus rosmarus";"abirvalg";"walrus"]);;
 List.iter (fun x -> print_result x) (c#stat_all);;
+*)