Permalink
Browse files

[enhance] bslregister: print filename on parse error.

  • Loading branch information...
1 parent 9f4d83c commit 3b155d9ebc4b75556c36d9e2b9ddeb3b5ada3807 @arthuraa arthuraa committed Aug 23, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 compiler/libbsl/bslRegisterLib.ml
@@ -1575,7 +1575,7 @@ let parse_js_bypass_file_new pprocess filename =
let contents = pprocess filename (File.content filename) in
FilePos.add_file filename contents;
match BslJsParse.parse_string ~filename contents with
- | `error e -> OManager.error "%s" e
+ | `error e -> OManager.error "%s: %s" filename e
| `success {BslJsParse. directives; code = contents} ->
let add_tags ((pos, tags, directive) as p) =
match directive with

0 comments on commit 3b155d9

Please sign in to comment.