gas: NEWS: Add the RISC-V features for 2.39

[binutils-gdb.git] / libiberty / gather-docs

diff --git a/libiberty/gather-docs b/libiberty/gather-docs
index 94d3fcf8f3ac0117fd92bf0fc22c6c51311e9575..fb24def733d27ccaf5a999ec784b82060c116ba3 100644 (file)
--- a/libiberty/gather-docs
+++ b/libiberty/gather-docs
@@ -1,8 +1,7 @@
 #!/usr/bin/perl
 # -*- perl -*-
 
-#   Copyright (C) 2001
-#   Free Software Foundation
+#   Copyright (C) 2001-2022 Free Software Foundation, Inc.
 #
 # This file is part of the libiberty library.
 # Libiberty is free software; you can redistribute it and/or
@@ -73,8 +72,8 @@ for $in (@ARGV) {
 
            if (/^\@def[a-z]*[a-wyz] /) {
                
-               ($name) = m/[^\(]* ([^\( \t\r\n]+) *\(/;
-               $name =~ s/[    ]*$//;
+               ($name) = m/[^\(]* ([^\( \t\r\n\@]+) *(\(|\@?$)/;
+               $name =~ s/[     ]*\@?$//;
                $key = $name;
                $key =~ tr/A-Z/a-z/;
                $key =~ s/[^a-z0-9]+/ /g;