Skip to content

Commit

Permalink
fixup! stubs: add 'OpamStubs.getBinaryMode` that retrieve channel cur…
Browse files Browse the repository at this point in the history
…rent binary mode status
  • Loading branch information
rjbou committed Nov 28, 2023
1 parent 261e375 commit ac1aa3b
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/stubs/win32/opamWindows.c
Original file line number Diff line number Diff line change
Expand Up @@ -793,13 +793,13 @@ CAMLprim value OPAMW_GetBinaryMode(value vchannel) {

int i;

#if OCAML_VERSION_MAJOR >= 5 && OCAML_VERSION_MINOR >= 2
#if OCAML_VERSION_MAJOR >= 50200
caml_channel_lock(channel);
#else
Lock(channel);
#endif
i = caml_channel_binary_mode(channel);
#if OCAML_VERSION_MAJOR >= 5 && OCAML_VERSION_MINOR >= 2
#if OCAML_VERSION_MAJOR >= 50200
caml_channel_unlock(channel);
#else
Unlock(channel);
Expand Down

0 comments on commit ac1aa3b

Please sign in to comment.