swh:1:snp:505c374fd75bb208ae4e9a54e64bb310bc49295e
Raw File
Tip revision: 7917f5ddaa44447990064070041a55d2452c0168 authored by Ole Krüger on 15 March 2024, 11:10:38 UTC
WIP: Buck2
Tip revision: 7917f5d
main.ml
open Api
open Ctypes

let add (x : int) (y : int) =
  let x_ptr = Uintptr.of_int x in
  let y_ptr = Uintptr.of_int y in
  let res = Functions.add x_ptr y_ptr in
  Uintptr.to_int res
back to top