X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/5c72e80d9b6c141c9b2f5403860c03e6ebb64bc1..44f5ace3a1ccc47acfcf84761428d69cc8c7792d:/regen/regcomp.pl

diff --git a/regen/regcomp.pl b/regen/regcomp.pl
index 69643ca..eef5533 100644
--- a/regen/regcomp.pl
+++ b/regen/regcomp.pl
@@ -34,7 +34,7 @@ while (<DESC>) {
         next;
     }
     unless ($lastregop) {
-        ($name[$ind], $desc, $rest[$ind]) = /^(\S+)\s+([^\t]+)\s*;\s*(.*)/;
+        ($name[$ind], $desc, $rest[$ind]) = /^(\S+)\s+([^\t]+?)\s*;\s*(.*)/;
         ($type[$ind], $code[$ind], $args[$ind], $flags[$ind], $longj[$ind])
           = split /[,\s]\s*/, $desc;
         ++$ind;