Identifier "TEST" is not indented correctly

[wildptr]

Running ocp-indent on the following piece of code

          let inst =
            match op with
            | OP_TEST ->
              TEST (r1, o2)
            | _ -> CMP (r1, o2)
          in

yields

          let inst =
            match op with
            | OP_TEST ->
        TEST (r1, o2)
           | _ -> CMP (r1, o2)
        in

which is totally messed up. However, constructor names other than TEST do not seem to trigger this weird behavior.

ocp-indent --version: 1.8.1

[wildptr]

I see that ocp-indent recognizes "TEST" as a preprocessor directive here. It would be nice if we add a configuration option that allows the user to turn off recognition of preprocessor directives when no preprocessor is being used.

[yminsky]

I think the support of TEST should just be deleted. This is a hangover from the bad-old camlp4 days.