Decompile non-prefix and non-infix functions with operator-based names using operator symbols

```
For example,

> let (+) x y z = x - y - z;;

val ( + ) : int -> int -> int -> int

> decompile <@ (+) 3 3 3 @>;;
val it : string = "op_Addition 3 3 3"

is correct, but we'd like to print "(+) 3 3 3"
```

Original issue reported on code.google.com by `stephen....@gmail.com` on 23 Apr 2012 at 2:25
