* parser.y (regterm, regclass): Relocate handling

of empty [] into regterm, via empty derivation.

1 files changed, 3 insertions, 3 deletions

diff --git a/parser.y b/parser.y
index a3154201..db3ff2c7 100644
--- a/parser.y
+++ b/parser.y
@@ -469,9 +469,8 @@ regbranch : regterm             { $$ = cons($1, nil); }
           ;
 
 regterm : '[' regclass ']'      { $$ = cons(set_s, $2); }
-        | '[' ']'               { $$ = cons(set_s, nil); }
-        | '[' '^' regclass ']'  { $$ = cons(cset_s, $3); }
-        | '[' '^' ']'           { $$ = wild_s; }
+        | '[' '^' regclass ']'  { $$ = if3(nullp($3), wild_s,
+                                                      cons(cset_s, $3)); }
         | '.'                   { $$ = wild_s; }
         | '^'                   { $$ = chr('^'); }
         | ']'                   { $$ = chr(']'); }
@@ -492,6 +491,7 @@ regterm : '[' regclass ']'      { $$ = cons(set_s, $2); }
 
 regclass : regclassterm                 { $$ = cons($1, nil); }
          | regclassterm regclass        { $$ = cons($1, $2); }
+         | /* empty */                  { $$ = nil; }
          ;
 
 regclassterm : regrange         { $$ = $1; }