diff options
author | Zackery Spytz <zspytz@gmail.com> | 2019-02-18 20:41:13 -0700 |
---|---|---|
committer | Zackery Spytz <zspytz@gmail.com> | 2019-02-18 20:41:13 -0700 |
commit | 5a58f9a87b8abd756ea17be86d82be5d48838050 (patch) | |
tree | 9a91495b06985371fb6e888503dd5fc0e5902c2e /Lib/ocaml/typemaps.i | |
parent | 470ce2dd3110d3d740d2632744b517d4f87a28fd (diff) | |
parent | 9038a9987dc1440422a60aab8b943e42568be973 (diff) | |
download | swig-5a58f9a87b8abd756ea17be86d82be5d48838050.tar.gz |
Merge remote-tracking branch 'upstream/master' into OCaml-INPUT-OUTPUT-INOUT-primitives
Diffstat (limited to 'Lib/ocaml/typemaps.i')
-rw-r--r-- | Lib/ocaml/typemaps.i | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Lib/ocaml/typemaps.i b/Lib/ocaml/typemaps.i index 916b189d0..08a0c97c9 100644 --- a/Lib/ocaml/typemaps.i +++ b/Lib/ocaml/typemaps.i @@ -132,11 +132,11 @@ %typemap(varin) C_NAME { $1 = OCAML_TO_C($input); } -%typemap(in) C_NAME & ($*1_ltype temp) { +%typemap(in) const C_NAME & ($*1_ltype temp) { temp = ($*1_ltype) OCAML_TO_C($input); $1 = &temp; } -%typemap(varin) C_NAME & { +%typemap(varin) const C_NAME & { $1 = OCAML_TO_C($input); } %typemap(directorout) C_NAME { @@ -149,10 +149,10 @@ %typemap(varout) C_NAME { $result = C_TO_OCAML($1); } -%typemap(varout) C_NAME & { +%typemap(varout) const C_NAME & { $result = C_TO_OCAML($1); } -%typemap(out) C_NAME & { +%typemap(out) const C_NAME & { $result = C_TO_OCAML(*$1); } %typemap(directorin) C_NAME { |