Original bug ID: 4417
Reporter: jm
Assigned to: ertai
Status: closed (set by @xavierleroy on 2010-04-29T12:26:06Z)
Resolution: fixed
Priority: normal
Severity: minor
Version: 3.10+dev
Fixed in version: 3.10+dev
Category: -for Camlp4 use https://github.com/ocaml/camlp4/issues

Bug description

% cat test.ml4
let r = ref 0
let _ =
if true then (- !r) else 42
% camlp4of -printer o -impl test.ml4 > test.ml
% ocamlc -c -impl test.ml4
% ocamlc -c test.ml
File "test.ml", line 3, characters 21-23:
Syntax error
2% cat test.ml
let r = ref 0

let _ = if true then -!r else 42