diff options
| author | Benedikt Meurer <benedikt.meurer@googlemail.com> | 2012-12-29 10:41:08 +0000 |
|---|---|---|
| committer | Benedikt Meurer <benedikt.meurer@googlemail.com> | 2012-12-29 10:41:08 +0000 |
| commit | b04d8284f0ce84d237cadf8ff5aabc060890613f (patch) | |
| tree | f44b7273a42c0473e03b6b9f9c701147fdd1a33e /byterun/extern.c | |
| parent | 21735ad37520e466ff6b32474964d3206ab4dbef (diff) | |
Fix several C compiler warnings.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13171 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/extern.c')
| -rw-r--r-- | byterun/extern.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/byterun/extern.c b/byterun/extern.c index 4fb806840..4e96bc4c4 100644 --- a/byterun/extern.c +++ b/byterun/extern.c @@ -583,13 +583,12 @@ static intnat extern_value(value v, value flags) void caml_output_val(struct channel *chan, value v, value flags) { - intnat len; struct output_block * blk, * nextblk; if (! caml_channel_binary_mode(chan)) caml_failwith("output_value: not a binary channel"); init_extern_output(); - len = extern_value(v, flags); + extern_value(v, flags); /* During [caml_really_putblock], concurrent [caml_output_val] operations can take place (via signal handlers or context switching in systhreads), and [extern_output_first] may change. So, save it in a local variable. */ |