[Pkg-ocaml-maint-commits] r5044 - /trunk/packages/tuareg-mode/bugs/450741.ml

[treinen at users.alioth.debian.org]

Author: treinen
Date: Thu Jan 10 20:44:47 2008
New Revision: 5044

URL: http://svn.debian.org/wsvn/pkg-ocaml-maint/?sc=1&rev=5044
Log:
bug submited by Eric

Added:
    trunk/packages/tuareg-mode/bugs/450741.ml

Added: trunk/packages/tuareg-mode/bugs/450741.ml
URL: http://svn.debian.org/wsvn/pkg-ocaml-maint/trunk/packages/tuareg-mode/bugs/450741.ml?rev=5044&op=file
==============================================================================
--- trunk/packages/tuareg-mode/bugs/450741.ml (added)
+++ trunk/packages/tuareg-mode/bugs/450741.ml Thu Jan 10 20:44:47 2008
@@ -1,0 +1,12 @@
+let foo x =
+  if p then
+    match bar with
+      | A -> if a then b  (* else c *)
+      | B -> b
+  else this
+
+    
+let bar =
+  if p then
+    try if a then b with e -> ()
+    else c