Update against the latest pgocaml

ocsigen · Jun 13, 2014 · 292b695 · 292b695
1 parent a748b29
commit 292b695
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/src/sql.mli b/src/sql.mli
@@ -49,7 +49,7 @@ class type date_t = object inherit [date] type_info end
 class type timestamp_t = object inherit [timestamp] type_info end
 class type timestamptz_t = object inherit [timestamptz] type_info end
 class type interval_t = object inherit [interval] type_info end
-class type int32_array_t = object inherit [int32 array] type_info end
+class type int32_array_t = object inherit [int32 option list] type_info end
 
 class type ['row] row_t = object inherit ['row] type_info end
 
@@ -255,7 +255,7 @@ module Value : sig
   val timestamp : timestamp -> < t : timestamp_t; nul : _ > t
   val timestamptz : timestamptz -> < t : timestamptz_t; nul : _ > t
   val interval : interval -> < t : interval_t; nul : _ > t
-  val int32_array : int32 array -> < t : int32_array_t; nul : _ > t
+  val int32_array : int32 option list -> < t : int32_array_t; nul : _ > t
 end
 
 

diff --git a/src/sql_internals.ml b/src/sql_internals.ml
@@ -74,7 +74,7 @@ and atom =
   | Timestamp of timestamp
   | Timestamptz of timestamptz
   | Interval of interval
-  | Int32_array of int32 array
+  | Int32_array of int32 option list
   | Record of untyped (* runtime object instance *)
 and table_name = string option * string
 and row_name = string

diff --git a/src/sql_types.ml b/src/sql_types.ml
@@ -43,7 +43,7 @@ class type date_t = object inherit [date] type_info end
 class type timestamp_t = object inherit [timestamp] type_info end
 class type timestamptz_t = object inherit [timestamptz] type_info end
 class type interval_t = object inherit [interval] type_info end
-class type int32_array_t = object inherit [int32 array] type_info end
+class type int32_array_t = object inherit [int32 option list] type_info end
 
 class type ['row] row_t = object inherit ['row] type_info end