aboutsummaryrefslogtreecommitdiff
path: root/lib/qparser
diff options
context:
space:
mode:
Diffstat (limited to 'lib/qparser')
-rw-r--r--lib/qparser/lexer.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/qparser/lexer.ml b/lib/qparser/lexer.ml
index 5741b7a..da8acce 100644
--- a/lib/qparser/lexer.ml
+++ b/lib/qparser/lexer.ml
@@ -10,7 +10,7 @@ exception LexError of string
exception EOF
(* Extract the location name from the pattern *)
-let location_name = Str.regexp {|.* \(.*\)|}
+let location_name = Str.regexp {|# *\(.*\)|}
(** Remove all the expression state when we are leaving the expression itself. *)
let rec leave_expression buffer =