Remove Pascal-related entries in code and comments.
authorMartin Liska <mliska@suse.cz>
Tue, 25 Sep 2018 07:11:05 +0000 (09:11 +0200)
committerMartin Liska <marxin@gcc.gnu.org>
Tue, 25 Sep 2018 07:11:05 +0000 (07:11 +0000)
2018-09-25  Martin Liska  <mliska@suse.cz>

* config/powerpcspe/powerpcspe.c (rs6000_output_function_epilogue):
Do not handle "GNU Pascal".
* config/rs6000/rs6000.c (rs6000_output_function_epilogue):
Likewise.
* config/sparc/sparc.c (sparc_pass_by_reference): Remove Pascal
from documentation. Likewise.
* dbxout.c (dbxout_range_type): Likewise.
* doc/cpp.texi: Likewise.
* doc/extend.texi: Likewise.
* doc/frontends.texi: Likewise.
* doc/invoke.texi: Remove Pascal entry.
* tree.def (CLEANUP_POINT_EXPR): Likewise.
* doc/rtl.texi (MODE_FUNCTION): Remove not used entry.
2018-09-25  Martin Liska  <mliska@suse.cz>

* c-common.c (c_common_truthvalue_conversion):
Remove Pascal from documentation.

From-SVN: r264559

13 files changed:
gcc/ChangeLog
gcc/c-family/ChangeLog
gcc/c-family/c-common.c
gcc/config/powerpcspe/powerpcspe.c
gcc/config/rs6000/rs6000.c
gcc/config/sparc/sparc.c
gcc/dbxout.c
gcc/doc/cpp.texi
gcc/doc/extend.texi
gcc/doc/frontends.texi
gcc/doc/invoke.texi
gcc/doc/rtl.texi
gcc/tree.def

index 033a5fa7a791dc8aa6616de2a5d585fd761498b5..d9dde59c678c257f7ee547b92d76e60af34212d6 100644 (file)
@@ -1,3 +1,19 @@
+2018-09-25  Martin Liska  <mliska@suse.cz>
+
+       * config/powerpcspe/powerpcspe.c (rs6000_output_function_epilogue):
+       Do not handle "GNU Pascal".
+       * config/rs6000/rs6000.c (rs6000_output_function_epilogue):
+       Likewise.
+       * config/sparc/sparc.c (sparc_pass_by_reference): Remove Pascal
+       from documentation. Likewise.
+       * dbxout.c (dbxout_range_type): Likewise.
+       * doc/cpp.texi: Likewise.
+       * doc/extend.texi: Likewise.
+       * doc/frontends.texi: Likewise.
+       * doc/invoke.texi: Remove Pascal entry.
+       * tree.def (CLEANUP_POINT_EXPR): Likewise.
+       * doc/rtl.texi (MODE_FUNCTION): Remove not used entry.
+
 2018-09-25  Martin Liska  <mliska@suse.cz>
 
        PR middle-end/86078
index 4080bee111dc6d23cf664f2b902afb09ebe0c34e..3b3b98724755015c381cbf54b828369adce0d9d6 100644 (file)
@@ -1,3 +1,8 @@
+2018-09-25  Martin Liska  <mliska@suse.cz>
+
+       * c-common.c (c_common_truthvalue_conversion):
+       Remove Pascal from documentation.
+
 2018-09-21  Eric Botcazou  <ebotcazou@adacore.com>
 
        * c-ada-spec.c: Include diagnostic.h.
index 4bfb14585e2a5543c8a9980c46fdf3fd7b8fed59..10a8bc29bfac05917a46061d695fa648756c15fc 100644 (file)
@@ -3289,7 +3289,7 @@ c_common_truthvalue_conversion (location_t location, tree expr)
        tree inner = TREE_OPERAND (expr, 0);
        if (decl_with_nonnull_addr_p (inner))
          {
-           /* Common Ada/Pascal programmer's mistake.  */
+           /* Common Ada programmer's mistake.  */
            warning_at (location,
                        OPT_Waddress,
                        "the address of %qD will always evaluate as %<true%>",
index dea1eab11881ceab73b1de59328fa9b6f83641f2..325b6ad52230f3e19c1a08ec7e8340557572f71b 100644 (file)
@@ -32024,7 +32024,7 @@ rs6000_output_function_epilogue (FILE *file)
       /* Language type.  Unfortunately, there does not seem to be any
         official way to discover the language being compiled, so we
         use language_string.
-        C is 0.  Fortran is 1.  Pascal is 2.  Ada is 3.  C++ is 9.
+        C is 0.  Fortran is 1.  Ada is 3.  C++ is 9.
         Java is 13.  Objective-C is 14.  Objective-C++ isn't assigned
         a number, so for now use 9.  LTO, Go and JIT aren't assigned numbers
         either, so for now use 0.  */
@@ -32036,8 +32036,6 @@ rs6000_output_function_epilogue (FILE *file)
       else if (! strcmp (language_string, "GNU F77")
               || lang_GNU_Fortran ())
        i = 1;
-      else if (! strcmp (language_string, "GNU Pascal"))
-       i = 2;
       else if (! strcmp (language_string, "GNU Ada"))
        i = 3;
       else if (lang_GNU_CXX ()
index 79dd2f648e8e8ae88d3c0f09faf2d240df0e7645..5c7ab2b24e26e7c15ef2e7c3d92a4437b245f108 100644 (file)
@@ -28408,7 +28408,7 @@ rs6000_output_function_epilogue (FILE *file)
       /* Language type.  Unfortunately, there does not seem to be any
         official way to discover the language being compiled, so we
         use language_string.
-        C is 0.  Fortran is 1.  Pascal is 2.  Ada is 3.  C++ is 9.
+        C is 0.  Fortran is 1.  Ada is 3.  C++ is 9.
         Java is 13.  Objective-C is 14.  Objective-C++ isn't assigned
         a number, so for now use 9.  LTO, Go and JIT aren't assigned numbers
         either, so for now use 0.  */
@@ -28420,8 +28420,6 @@ rs6000_output_function_epilogue (FILE *file)
       else if (! strcmp (language_string, "GNU F77")
               || lang_GNU_Fortran ())
        i = 1;
-      else if (! strcmp (language_string, "GNU Pascal"))
-       i = 2;
       else if (! strcmp (language_string, "GNU Ada"))
        i = 3;
       else if (lang_GNU_CXX ()
index 2481fbf3b0a8b2fe50ade690acdebc4570e6f5a0..42acabb5d78e6c9161c4535076ba9b57ca422867 100644 (file)
@@ -7516,9 +7516,8 @@ sparc_pass_by_reference (cumulative_args_t cum ATTRIBUTE_UNUSED,
 {
   if (TARGET_ARCH32)
     /* Original SPARC 32-bit ABI says that structures and unions,
-       and quad-precision floats are passed by reference.  For Pascal,
-       also pass arrays by reference.  All other base types are passed
-       in registers.
+       and quad-precision floats are passed by reference.
+       All base types are passed in registers.
 
        Extended ABI (as implemented by the Sun compiler) says that all
        complex floats are passed by reference.  Pass complex integers
index 459b7c2806f5c52db59b0b8c2b4c0136eb3d8868..bf41b17a26341ee6890d63193358e2bc14673cae 100644 (file)
@@ -1715,7 +1715,7 @@ dbxout_range_type (tree type, tree low, tree high)
   if (TREE_TYPE (type))
     dbxout_type (TREE_TYPE (type), 0);
   else if (TREE_CODE (type) != INTEGER_TYPE)
-    dbxout_type (type, 0); /* E.g. Pascal's ARRAY [BOOLEAN] of INTEGER */
+    dbxout_type (type, 0);
   else
     {
       /* Traditionally, we made sure 'int' was type 1, and builtin types
index efad2c8eab5ad1f61823dd7d9c450542f11c1c13..53455741fd9778b8bf8df118f975020d3324c300 100644 (file)
@@ -194,7 +194,7 @@ will be removed, and the Makefile will not work.
 
 Having said that, you can often get away with using cpp on things which
 are not C@.  Other Algol-ish programming languages are often safe
-(Pascal, Ada, etc.) So is assembly, with caution.  @option{-traditional-cpp}
+(Ada, etc.) So is assembly, with caution.  @option{-traditional-cpp}
 mode preserves more white space, and is otherwise more permissive.  Many
 of the problems can be avoided by writing C or C++ style comments
 instead of native language comments, and keeping macros simple.
index 7a696556c359c5438219260f6fbbab582fea3d59..cfe6a8e5bb85bc304210383023852ce6074dc8fc 100644 (file)
@@ -26,7 +26,7 @@ extensions, accepted by GCC in C90 mode and in C++.
 * Statement Exprs::     Putting statements and declarations inside expressions.
 * Local Labels::        Labels local to a block.
 * Labels as Values::    Getting pointers to labels, and computed gotos.
-* Nested Functions::    As in Algol and Pascal, lexical scoping of functions.
+* Nested Functions::    Nested function in GNU C.
 * Constructing Calls::  Dispatching a call to another function.
 * Typeof::              @code{typeof}: referring to the type of an expression.
 * Conditionals::        Omitting the middle operand of a @samp{?:} expression.
index ecf1d51905e27927ae6298154f2f34bfb8fbc8c6..dbb83eed299211c0988ee1d735d4cf9f2e5db664 100644 (file)
@@ -32,11 +32,10 @@ various processors.
 
 @cindex COBOL
 @cindex Mercury
-@cindex Pascal
 The part of a compiler that is specific to a particular language is
 called the ``front end''.  In addition to the front ends that are
 integrated components of GCC, there are several other front ends that
-are maintained separately.  These support languages such as Pascal,
+are maintained separately.  These support languages such as
 Mercury, and COBOL@.  To use these, they must be built together with
 GCC proper.
 
index dba1e622b8075933492b7cc3c607339345af5ccf..7ef4e7a449b84f0a912b1a7223b187cf421f571d 100644 (file)
@@ -1450,9 +1450,6 @@ Ada source code file containing a library unit body (a subprogram or
 package body).  Such files are also called @dfn{bodies}.
 
 @c GCC also knows about some suffixes for languages not yet included:
-@c Pascal:
-@c @var{file}.p
-@c @var{file}.pas
 @c Ratfor:
 @c @var{file}.r
 
index 0695ad2df9b225a49fbde5c25f4c77729f893103..463bdc6aaae6e29fd54c045b3ba08c11dbd5fb4a 100644 (file)
@@ -1393,11 +1393,6 @@ Complex floating point modes.  By default these are @code{QCmode},
 @code{HCmode}, @code{SCmode}, @code{DCmode}, @code{XCmode}, and
 @code{TCmode}.
 
-@findex MODE_FUNCTION
-@item MODE_FUNCTION
-Algol or Pascal function variables including a static chain.
-(These are not currently implemented).
-
 @findex MODE_CC
 @item MODE_CC
 Modes representing condition code values.  These are @code{CCmode} plus
index 49bc423c0a88c78f1c2eedc31f0ecfac4ae5ed74..a6882d9288d0044c7e1ec13379611a8cb48437f0 100644 (file)
@@ -141,11 +141,7 @@ DEFTREECODE (BOOLEAN_TYPE, "boolean_type", tcc_type, 0)
 /* Integer types in all languages, including char in C.
    Also used for sub-ranges of other discrete types.
    Has components TYPE_MIN_VALUE, TYPE_MAX_VALUE (expressions, inclusive)
-   and TYPE_PRECISION (number of bits used by this type).
-   In the case of a subrange type in Pascal, the TREE_TYPE
-   of this will point at the supertype (another INTEGER_TYPE,
-   or an ENUMERAL_TYPE or BOOLEAN_TYPE).
-   Otherwise, the TREE_TYPE is zero.  */
+   and TYPE_PRECISION (number of bits used by this type).  */
 DEFTREECODE (INTEGER_TYPE, "integer_type", tcc_type, 0)
 
 /* C's float and double.  Different floating types are distinguished
@@ -200,16 +196,15 @@ DEFTREECODE (VECTOR_TYPE, "vector_type", tcc_type, 0)
  and holds the type to coerce a value of that array type to in C.
  TYPE_STRING_FLAG indicates a string (in contrast to an array of chars)
  in languages (such as Chill) that make a distinction.  */
-/* Array types in C or Pascal */
+/* Array types in C */
 DEFTREECODE (ARRAY_TYPE, "array_type", tcc_type, 0)
 
-/* Struct in C, or record in Pascal.  */
+/* Struct in C.  */
 /* Special fields:
    TYPE_FIELDS  chain of FIELD_DECLs for the fields of the struct,
      VAR_DECLs, TYPE_DECLs and CONST_DECLs for record-scope variables,
      types and enumerators and FUNCTION_DECLs for methods associated
-     with the type.
-   A few may need to be added for Pascal.  */
+     with the type.  */
 /* See the comment above, before ENUMERAL_TYPE, for how
    forward references to struct tags are handled in C.  */
 DEFTREECODE (RECORD_TYPE, "record_type", tcc_type, 0)
@@ -460,7 +455,7 @@ DEFTREECODE (IMAGPART_EXPR, "imagpart_expr", tcc_reference, 1)
    generating insns.  */
 DEFTREECODE (VIEW_CONVERT_EXPR, "view_convert_expr", tcc_reference, 1)
 
-/* C unary `*' or Pascal `^'.  One operand, an expression for a pointer.  */
+/* C unary `*'.  One operand, an expression for a pointer.  */
 DEFTREECODE (INDIRECT_REF, "indirect_ref", tcc_reference, 1)
 
 /* Used to represent lookup in a virtual method table which is dependent on
@@ -632,7 +627,7 @@ DEFTREECODE (CLEANUP_POINT_EXPR, "cleanup_point_expr", tcc_expression, 1)
    object of the same type or even for one and the same object within
    its scope.
 
-   Record types with discriminants in Ada or schema types in Pascal are
+   Record types with discriminants in Ada are
    examples of such types.  This mechanism is also used to create "fat
    pointers" for unconstrained array types in Ada; the fat pointer is a
    structure one of whose fields is a pointer to the actual array type