fix #111: (try_lwt .. with x as y -> ...) generates an "unused case" warning