svn commit: r1165753 - /thrift/trunk/lib/ocaml/src/Thrift.ml

[jf...@apache.org]

Author: jfarrell
Date: Tue Sep  6 16:26:58 2011
New Revision: 1165753

URL: http://svn.apache.org/viewvc?rev=1165753&view=rev
Log:
Thrift-1322: OCaml lib fail to compile: Thrift.ml line 305, int vs int32 mismatch
Client: OCaml

Updates the ocaml lib INTERNAL and PROTOCOL error enums to use the correct numeric values


Modified:
    thrift/trunk/lib/ocaml/src/Thrift.ml

Modified: thrift/trunk/lib/ocaml/src/Thrift.ml
URL: http://svn.apache.org/viewvc/thrift/trunk/lib/ocaml/src/Thrift.ml?rev=1165753&r1=1165752&r2=1165753&view=diff
==============================================================================
--- thrift/trunk/lib/ocaml/src/Thrift.ml (original)
+++ thrift/trunk/lib/ocaml/src/Thrift.ml Tue Sep  6 16:26:58 2011
@@ -302,8 +302,8 @@ struct
     | 3l -> WRONG_METHOD_NAME
     | 4l -> BAD_SEQUENCE_ID
     | 5l -> MISSING_RESULT
-    | 61 -> INTERNAL_ERROR
-    | 71 -> PROTOCOL_ERROR
+    | 6l -> INTERNAL_ERROR
+    | 7l -> PROTOCOL_ERROR
     | _ -> raise Thrift_error;;
   let typ_to_i = function
     | UNKNOWN -> 0l
@@ -312,8 +312,8 @@ struct
     | WRONG_METHOD_NAME -> 3l
     | BAD_SEQUENCE_ID -> 4l
     | MISSING_RESULT -> 5l
-    | INTERNAL_ERROR -> 61
-    | PROTOCOL_ERROR -> 71
+    | INTERNAL_ERROR -> 6l
+    | PROTOCOL_ERROR -> 7l
 
   class t =
   object (self)