Dear OCaml Users,

sometimes I want to do something like

match expr with
| case1 when cond1
| case2 when cond2
| case3 when cond3 -> result

but this doesn't work. I have to write

match expr with
| case1 when cond1 -> result
| case2 when cond2 -> result
| case3 when cond3 -> result

Usually only some of the matches have a when clause. Is there a way to avoid copying the result term (other than writing a function) ?

Best regards,

Michael
Intel Deutschland GmbH
Registered Address: Am Campeon 10-12, 85579 Neubiberg, Germany
Tel: +49 89 99 8853-0, www.intel.de
Managing Directors: Christin Eisenschmid, Christian Lamprechter
Chairperson of the Supervisory Board: Nicole Lau
Registered Office: Munich
Commercial Register: Amtsgericht Muenchen HRB 186928