diff options
Diffstat (limited to 'src/ne_ocaml_401.ml')
| -rw-r--r-- | src/ne_ocaml_401.ml | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/ne_ocaml_401.ml b/src/ne_ocaml_401.ml index 2348135..1029db8 100644 --- a/src/ne_ocaml_401.ml +++ b/src/ne_ocaml_401.ml @@ -1,20 +1,27 @@ let get_uint16 s off = get_16 s off + [@@ocaml.inline] let get_int16 s off = - ((get_uint16 s off) lsl ( Sys.word_size - 17 )) asr ( Sys.word_size - 17 ) + ((get_uint16 s off) lsl ( Sys.int_size - 16 )) asr ( Sys.int_size - 16 ) + [@@ocaml.inline] let get_int32 s off = get_32 s off + [@@ocaml.inline] let get_int64 s off = get_64 s off + [@@ocaml.inline] let set_int16 s off v = set_16 s off v + [@@ocaml.inline] let set_int32 s off v = set_32 s off v + [@@ocaml.inline] let set_int64 s off v = set_64 s off v + [@@ocaml.inline] |