Remove RETURNS from BFD chew comments

[thirdparty/binutils-gdb.git] / bfd / doc / proto.str

diff --git a/bfd/doc/proto.str b/bfd/doc/proto.str
index 8431c16bd57f82cd5025a33dc01b5d17886b537f..3b77673606718c928c91b66b70362cfb5d4ff154 100644 (file)
--- a/bfd/doc/proto.str
+++ b/bfd/doc/proto.str
@@ -1,8 +1,24 @@
+- Source extraction program for chew.
+-  Copyright (C) 1990-2023 Free Software Foundation, Inc.
+-  This file is part of BFD, the Binary File Descriptor library.
+
+-  This program is free software; you can redistribute it and/or modify
+-  it under the terms of the GNU General Public License as published by
+-  the Free Software Foundation; either version 3 of the License, or
+-  (at your option) any later version.
+
+-  This program is distributed in the hope that it will be useful,
+-  but WITHOUT ANY WARRANTY; without even the implied warranty of
+-  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-  GNU General Public License for more details.
+
+-  You should have received a copy of the GNU General Public License
+-  along with this program; if not, write to the Free Software
+-  Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
 
 : SYNOPSIS
        skip_past_newline
        get_stuff_in_command    
-       paramstuff
        indent
        maybecatstr
 ;
@@ -18,16 +34,16 @@
        ignore ;
 
 : external
-       0 internalmode ignore ;
+       0 internalmode ! ignore ;
 
 : internal 
-       1 internalmode ignore ;
+       1 internalmode ! ignore ;
 
 - input stack { a b } output b if internal, a if external
 : ifinternal
-       "" swap 1 internalmode maybecatstr
+       "" swap 1 internalmode ! maybecatstr
        swap
-       "" swap 0 internalmode maybecatstr
+       "" swap 0 internalmode ! maybecatstr
        catstr
        ;
 
@@ -107,17 +123,17 @@
        catstr
        copy_past_newline
        catstr
-       "" swap 0 internalmode maybecatstr
+       "" swap 0 internalmode ! maybecatstr
        ;
 : ENUMEQX ENUMEQ catstr ;
 : ENUMDOC
        skip_past_newline
        get_stuff_in_command
        strip_trailing_newlines
-       "\n{* " swap catstr " *}\n" catstr
+       "\n{* " swap catstr "  *}\n" catstr
        translatecomments
        - discard it if we're doing internal mode
-       "" swap 0 internalmode maybecatstr
+       "" swap 0 internalmode ! maybecatstr
        swap
        catstr catstr
        ;
@@ -128,7 +144,6 @@
 : INTERNAL_DEFINITION internal ;
 : DESCRIPTION ignore ;
 : FUNCTION external ;
-: RETURNS ignore ;
 : TYPEDEF external ;
 : INTERNAL_FUNCTION internal ;
 : INTERNAL internal ;