1. camlspotter
  2. ocaml-indent

Commits

camlspotter  committed 904f187

semi in try

  • Participants
  • Parent commits cefcc1b
  • Branches default

Comments (0)

Files changed (2)

File main.ml

View file
 
     | SEMI ->
         let rec f bases = match bases with
-          | { k = (KParen cols | KBegin cols | KBracket cols | KBrace cols | KLet (_, cols)) } :: _ ->
+          | { k = (KParen cols | KBegin cols | KBracket cols | KBrace cols | KLet (_, cols)) | KTry cols | KMatch cols | KFun cols | KFunction cols } :: _ ->
               fix cols, bases
           | { k = (KThen cols | KElse cols) } :: bs -> 
               fix cols, bs

File tests/semi-in-try.ml

View file
+let _ = 
+  try
+    loop Region.zero State.init str;
+    print_stderr "hello"
+    ; raise Exit
+  with
+  | Exit -> Tokenstr.close str