diff options
Diffstat (limited to 'parsing/vernacextend.ml4')
-rw-r--r-- | parsing/vernacextend.ml4 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/parsing/vernacextend.ml4 b/parsing/vernacextend.ml4 index 3fad196f9..127b411b5 100644 --- a/parsing/vernacextend.ml4 +++ b/parsing/vernacextend.ml4 @@ -145,7 +145,9 @@ EXTEND ; rule: [ [ "["; s = STRING; l = LIST0 args; "]"; "->"; "["; e = Pcaml.expr; "]" - -> (s,l,<:expr< fun () -> $e$ >>) + -> + if s = "" then Util.user_err_loc (loc,"",Pp.str "Command name is empty"); + (s,l,<:expr< fun () -> $e$ >>) ] ] ; args: |