Source file xgboost__c_generated_functions__Function_description__Functions.ml

module CI = Cstubs_internals

external xgboost_stubs_1_XGBoostVersion
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> unit
  = "xgboost_stubs_1_XGBoostVersion" 

external xgboost_stubs_2_XGBGetLastError : unit -> CI.voidp
  = "xgboost_stubs_2_XGBGetLastError" 

external xgboost_stubs_3_XGBSetGlobalConfig : _ CI.fatptr -> int
  = "xgboost_stubs_3_XGBSetGlobalConfig" 

external xgboost_stubs_4_XGDMatrixCreateFromMat
  : _ CI.fatptr -> Unsigned.uint64 -> Unsigned.uint64 -> float ->
    _ CI.fatptr -> int = "xgboost_stubs_4_XGDMatrixCreateFromMat" 

external xgboost_stubs_5_XGDMatrixCreateFromDense
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_5_XGDMatrixCreateFromDense" 

external xgboost_stubs_6_XGDMatrixCreateFromCSR
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 ->
    _ CI.fatptr -> _ CI.fatptr -> int
  =
  "xgboost_stubs_6_XGDMatrixCreateFromCSR_byte6" "xgboost_stubs_6_XGDMatrixCreateFromCSR"
  

external xgboost_stubs_7_XGDMatrixSetFloatInfo
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 -> int
  = "xgboost_stubs_7_XGDMatrixSetFloatInfo" 

external xgboost_stubs_8_XGDMatrixSetUIntInfo
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 -> int
  = "xgboost_stubs_8_XGDMatrixSetUIntInfo" 

external xgboost_stubs_9_XGDMatrixGetFloatInfo
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_9_XGDMatrixGetFloatInfo" 

external xgboost_stubs_10_XGDMatrixGetUIntInfo
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_10_XGDMatrixGetUIntInfo" 

external xgboost_stubs_11_XGDMatrixNumRow : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_11_XGDMatrixNumRow" 

external xgboost_stubs_12_XGDMatrixNumCol : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_12_XGDMatrixNumCol" 

external xgboost_stubs_13_XGDMatrixNumNonMissing
  : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_13_XGDMatrixNumNonMissing" 

external xgboost_stubs_14_XGDMatrixSaveBinary
  : _ CI.fatptr -> _ CI.fatptr -> int -> int
  = "xgboost_stubs_14_XGDMatrixSaveBinary" 

external xgboost_stubs_15_XGDMatrixFree : _ CI.fatptr -> int
  = "xgboost_stubs_15_XGDMatrixFree" 

external xgboost_stubs_16_XGDMatrixSliceDMatrix
  : _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 -> _ CI.fatptr -> int
  = "xgboost_stubs_16_XGDMatrixSliceDMatrix" 

external xgboost_stubs_17_XGBoosterCreate
  : _ CI.fatptr -> Unsigned.uint64 -> _ CI.fatptr -> int
  = "xgboost_stubs_17_XGBoosterCreate" 

external xgboost_stubs_18_XGBoosterFree : _ CI.fatptr -> int
  = "xgboost_stubs_18_XGBoosterFree" 

external xgboost_stubs_19_XGBoosterReset : _ CI.fatptr -> int
  = "xgboost_stubs_19_XGBoosterReset" 

external xgboost_stubs_20_XGBoosterSetParam
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_20_XGBoosterSetParam" 

external xgboost_stubs_21_XGBoosterGetNumFeature
  : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_21_XGBoosterGetNumFeature" 

external xgboost_stubs_22_XGBoosterBoostedRounds
  : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_22_XGBoosterBoostedRounds" 

external xgboost_stubs_23_XGBoosterUpdateOneIter
  : _ CI.fatptr -> int -> _ CI.fatptr -> int
  = "xgboost_stubs_23_XGBoosterUpdateOneIter" 

external xgboost_stubs_24_XGBoosterTrainOneIter
  : _ CI.fatptr -> _ CI.fatptr -> int -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_24_XGBoosterTrainOneIter" 

external xgboost_stubs_25_XGBoosterEvalOneIter
  : _ CI.fatptr -> int -> _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 ->
    _ CI.fatptr -> int
  =
  "xgboost_stubs_25_XGBoosterEvalOneIter_byte6" "xgboost_stubs_25_XGBoosterEvalOneIter"
  

external xgboost_stubs_26_XGBoosterPredict
  : _ CI.fatptr -> _ CI.fatptr -> int -> Unsigned.uint -> int ->
    _ CI.fatptr -> _ CI.fatptr -> int
  =
  "xgboost_stubs_26_XGBoosterPredict_byte7" "xgboost_stubs_26_XGBoosterPredict"
  

external xgboost_stubs_27_XGBoosterPredictFromDense
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr ->
    _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  =
  "xgboost_stubs_27_XGBoosterPredictFromDense_byte7" "xgboost_stubs_27_XGBoosterPredictFromDense"
  

external xgboost_stubs_28_XGBoosterSaveModel
  : _ CI.fatptr -> _ CI.fatptr -> int = "xgboost_stubs_28_XGBoosterSaveModel" 

external xgboost_stubs_29_XGBoosterLoadModel
  : _ CI.fatptr -> _ CI.fatptr -> int = "xgboost_stubs_29_XGBoosterLoadModel" 

external xgboost_stubs_30_XGBoosterSaveModelToBuffer
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_30_XGBoosterSaveModelToBuffer" 

external xgboost_stubs_31_XGBoosterLoadModelFromBuffer
  : _ CI.fatptr -> _ CI.fatptr -> Unsigned.uint64 -> int
  = "xgboost_stubs_31_XGBoosterLoadModelFromBuffer" 

external xgboost_stubs_32_XGBoosterSaveJsonConfig
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_32_XGBoosterSaveJsonConfig" 

external xgboost_stubs_33_XGBoosterLoadJsonConfig
  : _ CI.fatptr -> _ CI.fatptr -> int
  = "xgboost_stubs_33_XGBoosterLoadJsonConfig" 

external xgboost_stubs_34_XGBoosterFeatureScore
  : _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr ->
    _ CI.fatptr -> _ CI.fatptr -> _ CI.fatptr -> int
  =
  "xgboost_stubs_34_XGBoosterFeatureScore_byte7" "xgboost_stubs_34_XGBoosterFeatureScore"
  

type 'a result = 'a
type 'a return = 'a
type 'a fn =
 | Returns  : 'a CI.typ   -> 'a return fn
 | Function : 'a CI.typ * 'b fn  -> ('a -> 'b) fn
let map_result f x = f x
let returning t = Returns t
let (@->) f p = Function (f, p)
let foreign : type a b. string -> (a -> b) fn -> (a -> b) =
  fun name t -> match t, name with
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x4; _},
        Function
          (CI.Pointer _,
           Function
             (CI.Pointer _,
              Function
                (CI.Pointer _,
                 Function
                   (CI.Pointer _,
                    Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))))))),
  "XGBoosterFeatureScore" ->
  (fun x1 x3 x7 x9 x11 x13 x15 ->
    let CI.CPointer x16 = x15 in
    let CI.CPointer x14 = x13 in
    let CI.CPointer x12 = x11 in
    let CI.CPointer x10 = x9 in
    let CI.CPointer x8 = x7 in
    let CI.CPointer x6 = x4 x3 in
    let CI.CPointer x2 = x1 in
    let x5 = x6 in
    xgboost_stubs_34_XGBoosterFeatureScore x2 x5 x8 x10 x12 x14 x16)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x20; _},
        Returns (CI.Primitive CI.Int))),
  "XGBoosterLoadJsonConfig" ->
  (fun x17 x19 ->
    let CI.CPointer x22 = x20 x19 in
    let CI.CPointer x18 = x17 in
    let x21 = x22 in xgboost_stubs_33_XGBoosterLoadJsonConfig x18 x21)
| Function
    (CI.Pointer _,
     Function
       (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))),
  "XGBoosterSaveJsonConfig" ->
  (fun x23 x25 x27 ->
    let CI.CPointer x28 = x27 in
    let CI.CPointer x26 = x25 in
    let CI.CPointer x24 = x23 in
    xgboost_stubs_32_XGBoosterSaveJsonConfig x24 x26 x28)
| Function
    (CI.Pointer _,
     Function
       (CI.Pointer _,
        Function (CI.Primitive CI.Uint64_t, Returns (CI.Primitive CI.Int)))),
  "XGBoosterLoadModelFromBuffer" ->
  (fun x29 x31 x33 ->
    let CI.CPointer x32 = x31 in
    let CI.CPointer x30 = x29 in
    xgboost_stubs_31_XGBoosterLoadModelFromBuffer x30 x32 x33)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x37; _},
        Function
          (CI.Pointer _,
           Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))),
  "XGBoosterSaveModelToBuffer" ->
  (fun x34 x36 x40 x42 ->
    let CI.CPointer x43 = x42 in
    let CI.CPointer x41 = x40 in
    let CI.CPointer x39 = x37 x36 in
    let CI.CPointer x35 = x34 in
    let x38 = x39 in
    xgboost_stubs_30_XGBoosterSaveModelToBuffer x35 x38 x41 x43)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x47; _},
        Returns (CI.Primitive CI.Int))),
  "XGBoosterLoadModel" ->
  (fun x44 x46 ->
    let CI.CPointer x49 = x47 x46 in
    let CI.CPointer x45 = x44 in
    let x48 = x49 in xgboost_stubs_29_XGBoosterLoadModel x45 x48)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x53; _},
        Returns (CI.Primitive CI.Int))),
  "XGBoosterSaveModel" ->
  (fun x50 x52 ->
    let CI.CPointer x55 = x53 x52 in
    let CI.CPointer x51 = x50 in
    let x54 = x55 in xgboost_stubs_28_XGBoosterSaveModel x51 x54)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x59; _},
        Function
          (CI.View {CI.ty = CI.Pointer _; write = x63; _},
           Function
             (CI.Pointer _,
              Function
                (CI.Pointer _,
                 Function
                   (CI.Pointer _,
                    Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))))))),
  "XGBoosterPredictFromDense" ->
  (fun x56 x58 x62 x66 x68 x70 x72 ->
    let CI.CPointer x73 = x72 in
    let CI.CPointer x71 = x70 in
    let CI.CPointer x69 = x68 in
    let CI.CPointer x67 = x66 in
    let CI.CPointer x65 = x63 x62 in
    let CI.CPointer x61 = x59 x58 in
    let CI.CPointer x57 = x56 in
    let x60 = x61 in
    let x64 = x65 in
    xgboost_stubs_27_XGBoosterPredictFromDense x57 x60 x64 x67 x69 x71 x73)
| Function
    (CI.Pointer _,
     Function
       (CI.Pointer _,
        Function
          (CI.Primitive CI.Int,
           Function
             (CI.Primitive CI.Uint,
              Function
                (CI.Primitive CI.Int,
                 Function
                   (CI.Pointer _,
                    Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))))))),
  "XGBoosterPredict" ->
  (fun x74 x76 x78 x79 x80 x81 x83 ->
    let CI.CPointer x84 = x83 in
    let CI.CPointer x82 = x81 in
    let CI.CPointer x77 = x76 in
    let CI.CPointer x75 = x74 in
    xgboost_stubs_26_XGBoosterPredict x75 x77 x78 x79 x80 x82 x84)
| Function
    (CI.Pointer _,
     Function
       (CI.Primitive CI.Int,
        Function
          (CI.Pointer _,
           Function
             (CI.Pointer _,
              Function
                (CI.Primitive CI.Uint64_t,
                 Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))))),
  "XGBoosterEvalOneIter" ->
  (fun x85 x87 x88 x90 x92 x93 ->
    let CI.CPointer x94 = x93 in
    let CI.CPointer x91 = x90 in
    let CI.CPointer x89 = x88 in
    let CI.CPointer x86 = x85 in
    xgboost_stubs_25_XGBoosterEvalOneIter x86 x87 x89 x91 x92 x94)
| Function
    (CI.Pointer _,
     Function
       (CI.Pointer _,
        Function
          (CI.Primitive CI.Int,
           Function
             (CI.View {CI.ty = CI.Pointer _; write = x101; _},
              Function
                (CI.View {CI.ty = CI.Pointer _; write = x105; _},
                 Returns (CI.Primitive CI.Int)))))),
  "XGBoosterTrainOneIter" ->
  (fun x95 x97 x99 x100 x104 ->
    let CI.CPointer x107 = x105 x104 in
    let CI.CPointer x103 = x101 x100 in
    let CI.CPointer x98 = x97 in
    let CI.CPointer x96 = x95 in
    let x102 = x103 in
    let x106 = x107 in
    xgboost_stubs_24_XGBoosterTrainOneIter x96 x98 x99 x102 x106)
| Function
    (CI.Pointer _,
     Function
       (CI.Primitive CI.Int,
        Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))),
  "XGBoosterUpdateOneIter" ->
  (fun x108 x110 x111 ->
    let CI.CPointer x112 = x111 in
    let CI.CPointer x109 = x108 in
    xgboost_stubs_23_XGBoosterUpdateOneIter x109 x110 x112)
| Function
    (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int))),
  "XGBoosterBoostedRounds" ->
  (fun x113 x115 ->
    let CI.CPointer x116 = x115 in
    let CI.CPointer x114 = x113 in
    xgboost_stubs_22_XGBoosterBoostedRounds x114 x116)
| Function
    (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int))),
  "XGBoosterGetNumFeature" ->
  (fun x117 x119 ->
    let CI.CPointer x120 = x119 in
    let CI.CPointer x118 = x117 in
    xgboost_stubs_21_XGBoosterGetNumFeature x118 x120)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x124; _},
        Function
          (CI.View {CI.ty = CI.Pointer _; write = x128; _},
           Returns (CI.Primitive CI.Int)))),
  "XGBoosterSetParam" ->
  (fun x121 x123 x127 ->
    let CI.CPointer x130 = x128 x127 in
    let CI.CPointer x126 = x124 x123 in
    let CI.CPointer x122 = x121 in
    let x125 = x126 in
    let x129 = x130 in xgboost_stubs_20_XGBoosterSetParam x122 x125 x129)
| Function (CI.Pointer _, Returns (CI.Primitive CI.Int)), "XGBoosterReset" ->
  (fun x131 ->
    let CI.CPointer x132 = x131 in xgboost_stubs_19_XGBoosterReset x132)
| Function (CI.Pointer _, Returns (CI.Primitive CI.Int)), "XGBoosterFree" ->
  (fun x133 ->
    let CI.CPointer x134 = x133 in xgboost_stubs_18_XGBoosterFree x134)
| Function
    (CI.Pointer _,
     Function
       (CI.Primitive CI.Uint64_t,
        Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))),
  "XGBoosterCreate" ->
  (fun x135 x137 x138 ->
    let CI.CPointer x139 = x138 in
    let CI.CPointer x136 = x135 in
    xgboost_stubs_17_XGBoosterCreate x136 x137 x139)
| Function
    (CI.Pointer _,
     Function
       (CI.Pointer _,
        Function
          (CI.Primitive CI.Uint64_t,
           Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))),
  "XGDMatrixSliceDMatrix" ->
  (fun x140 x142 x144 x145 ->
    let CI.CPointer x146 = x145 in
    let CI.CPointer x143 = x142 in
    let CI.CPointer x141 = x140 in
    xgboost_stubs_16_XGDMatrixSliceDMatrix x141 x143 x144 x146)
| Function (CI.Pointer _, Returns (CI.Primitive CI.Int)), "XGDMatrixFree" ->
  (fun x147 ->
    let CI.CPointer x148 = x147 in xgboost_stubs_15_XGDMatrixFree x148)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x152; _},
        Function (CI.Primitive CI.Int, Returns (CI.Primitive CI.Int)))),
  "XGDMatrixSaveBinary" ->
  (fun x149 x151 x155 ->
    let CI.CPointer x154 = x152 x151 in
    let CI.CPointer x150 = x149 in
    let x153 = x154 in xgboost_stubs_14_XGDMatrixSaveBinary x150 x153 x155)
| Function
    (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int))),
  "XGDMatrixNumNonMissing" ->
  (fun x156 x158 ->
    let CI.CPointer x159 = x158 in
    let CI.CPointer x157 = x156 in
    xgboost_stubs_13_XGDMatrixNumNonMissing x157 x159)
| Function
    (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int))),
  "XGDMatrixNumCol" ->
  (fun x160 x162 ->
    let CI.CPointer x163 = x162 in
    let CI.CPointer x161 = x160 in xgboost_stubs_12_XGDMatrixNumCol x161 x163)
| Function
    (CI.Pointer _, Function (CI.Pointer _, Returns (CI.Primitive CI.Int))),
  "XGDMatrixNumRow" ->
  (fun x164 x166 ->
    let CI.CPointer x167 = x166 in
    let CI.CPointer x165 = x164 in xgboost_stubs_11_XGDMatrixNumRow x165 x167)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x171; _},
        Function
          (CI.Pointer _,
           Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))),
  "XGDMatrixGetUIntInfo" ->
  (fun x168 x170 x174 x176 ->
    let CI.CPointer x177 = x176 in
    let CI.CPointer x175 = x174 in
    let CI.CPointer x173 = x171 x170 in
    let CI.CPointer x169 = x168 in
    let x172 = x173 in
    xgboost_stubs_10_XGDMatrixGetUIntInfo x169 x172 x175 x177)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x181; _},
        Function
          (CI.Pointer _,
           Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))),
  "XGDMatrixGetFloatInfo" ->
  (fun x178 x180 x184 x186 ->
    let CI.CPointer x187 = x186 in
    let CI.CPointer x185 = x184 in
    let CI.CPointer x183 = x181 x180 in
    let CI.CPointer x179 = x178 in
    let x182 = x183 in
    xgboost_stubs_9_XGDMatrixGetFloatInfo x179 x182 x185 x187)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x191; _},
        Function
          (CI.Pointer _,
           Function (CI.Primitive CI.Uint64_t, Returns (CI.Primitive CI.Int))))),
  "XGDMatrixSetUIntInfo" ->
  (fun x188 x190 x194 x196 ->
    let CI.CPointer x195 = x194 in
    let CI.CPointer x193 = x191 x190 in
    let CI.CPointer x189 = x188 in
    let x192 = x193 in
    xgboost_stubs_8_XGDMatrixSetUIntInfo x189 x192 x195 x196)
| Function
    (CI.Pointer _,
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x200; _},
        Function
          (CI.Pointer _,
           Function (CI.Primitive CI.Uint64_t, Returns (CI.Primitive CI.Int))))),
  "XGDMatrixSetFloatInfo" ->
  (fun x197 x199 x203 x205 ->
    let CI.CPointer x204 = x203 in
    let CI.CPointer x202 = x200 x199 in
    let CI.CPointer x198 = x197 in
    let x201 = x202 in
    xgboost_stubs_7_XGDMatrixSetFloatInfo x198 x201 x204 x205)
| Function
    (CI.View {CI.ty = CI.Pointer _; write = x207; _},
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x211; _},
        Function
          (CI.View {CI.ty = CI.Pointer _; write = x215; _},
           Function
             (CI.Primitive CI.Uint64_t,
              Function
                (CI.View {CI.ty = CI.Pointer _; write = x220; _},
                 Function (CI.Pointer _, Returns (CI.Primitive CI.Int))))))),
  "XGDMatrixCreateFromCSR" ->
  (fun x206 x210 x214 x218 x219 x223 ->
    let CI.CPointer x224 = x223 in
    let CI.CPointer x222 = x220 x219 in
    let CI.CPointer x217 = x215 x214 in
    let CI.CPointer x213 = x211 x210 in
    let CI.CPointer x209 = x207 x206 in
    let x208 = x209 in
    let x212 = x213 in
    let x216 = x217 in
    let x221 = x222 in
    xgboost_stubs_6_XGDMatrixCreateFromCSR x208 x212 x216 x218 x221 x224)
| Function
    (CI.View {CI.ty = CI.Pointer _; write = x226; _},
     Function
       (CI.View {CI.ty = CI.Pointer _; write = x230; _},
        Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))),
  "XGDMatrixCreateFromDense" ->
  (fun x225 x229 x233 ->
    let CI.CPointer x234 = x233 in
    let CI.CPointer x232 = x230 x229 in
    let CI.CPointer x228 = x226 x225 in
    let x227 = x228 in
    let x231 = x232 in
    xgboost_stubs_5_XGDMatrixCreateFromDense x227 x231 x234)
| Function
    (CI.Pointer _,
     Function
       (CI.Primitive CI.Uint64_t,
        Function
          (CI.Primitive CI.Uint64_t,
           Function
             (CI.Primitive CI.Float,
              Function (CI.Pointer _, Returns (CI.Primitive CI.Int)))))),
  "XGDMatrixCreateFromMat" ->
  (fun x235 x237 x238 x239 x240 ->
    let CI.CPointer x241 = x240 in
    let CI.CPointer x236 = x235 in
    xgboost_stubs_4_XGDMatrixCreateFromMat x236 x237 x238 x239 x241)
| Function
    (CI.View {CI.ty = CI.Pointer _; write = x243; _},
     Returns (CI.Primitive CI.Int)),
  "XGBSetGlobalConfig" ->
  (fun x242 ->
    let CI.CPointer x245 = x243 x242 in
    let x244 = x245 in xgboost_stubs_3_XGBSetGlobalConfig x244)
| Function
    (CI.Void, Returns (CI.View {CI.ty = CI.Pointer x247; read = x248; _})),
  "XGBGetLastError" ->
  (fun x246 ->
    x248 (CI.make_ptr x247 (xgboost_stubs_2_XGBGetLastError x246)))
| Function
    (CI.Pointer _,
     Function (CI.Pointer _, Function (CI.Pointer _, Returns CI.Void))),
  "XGBoostVersion" ->
  (fun x249 x251 x253 ->
    let CI.CPointer x254 = x253 in
    let CI.CPointer x252 = x251 in
    let CI.CPointer x250 = x249 in
    xgboost_stubs_1_XGBoostVersion x250 x252 x254)
| _, s ->  Printf.ksprintf failwith "No match for %s" s


let foreign_value : type a. string -> a Ctypes.typ -> a Ctypes.ptr =
  fun name t -> match t, name with
| _, s ->  Printf.ksprintf failwith "No match for %s" s