This may be considered a sub-issue of issue 23.
e.g. instead of
> <@ not >> (=) @> |> source;;
val it : string = "(fun value -> not value) >> (fun x y -> x = y)"
should be
> <@ not >> (=) @> |> source;;
val it : string = "not >> (=)"
Original issue reported on code.google.com by stephen....@gmail.com on 23 Mar 2011 at 3:52