X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fxpath%2Fparser.ml;h=7386577115cf910ba0e8c88cddc3894fae270847;hp=ed5283e933fa09aed9b97c4b57fc92fbbfe31022;hb=5b5dcd45cf86701ccfe917c1d6ad73b83bb523c3;hpb=f71defc62c481fe8a3a161d904790f3ca117a8cb

diff --git a/src/xpath/parser.ml b/src/xpath/parser.ml
index ed5283e..7386577 100644
--- a/src/xpath/parser.ml
+++ b/src/xpath/parser.ml
@@ -14,11 +14,15 @@
 (***********************************************************************)
 
 (*
-  Time-stamp: <Last modified on 2013-02-07 10:31:20 CET by Kim Nguyen>
+  Time-stamp: <Last modified on 2013-04-22 16:23:46 CEST by Kim Nguyen>
 *)
 
 include Xpath_internal_parser
 
 let parse (l : Ulexing.lexbuf) =
-  xpath_query (fun _ -> Ulexer.token l) (Lexing.from_string "!!dummy!!")
+  try
+    xpath_query (fun _ -> Ulexer.token l) (Lexing.from_string "!!dummy!!")
+  with
+    Parsing.Parse_error ->
+      Ulexer.error (Ulexing.lexeme_start l) (Ulexing.lexeme_end l) "syntax error"