diff options
author | Zack Weinberg <zack@codesourcery.com> | 2002-02-27 18:48:07 +0000 |
---|---|---|
committer | Zack Weinberg <zack@gcc.gnu.org> | 2002-02-27 18:48:07 +0000 |
commit | f458d1d5d7bd85e412689858ea5d5de681608fbb (patch) | |
tree | aff434354f9eafe5065d231d996385e95f0669b4 /gcc/f/lex.c | |
parent | e0b3a8ff40c97c0b633185e6d0872468504a7a1a (diff) | |
download | gcc-f458d1d5d7bd85e412689858ea5d5de681608fbb.zip gcc-f458d1d5d7bd85e412689858ea5d5de681608fbb.tar.gz gcc-f458d1d5d7bd85e412689858ea5d5de681608fbb.tar.bz2 |
c-common.c, [...]: Delete code implementing -traditional mode.
* c-common.c, c-common.h, c-decl.c, c-lex.c, c-parse.in,
c-tree.h, c-typeck.c, cppexp.c, cpplex.c, cpplib.c, cpplib.h,
cppmacro.c, objc/lang-specs.h, objc/objc-act.c,
builtin-types.def, builtins.def, dwarf2out.c, dwarfout.c,
gcc.c, toplev.c: Delete code implementing -traditional mode.
* ada/misc.c, ch/ch-tree.h, ch/decl.c, cp/decl2.c, f/com.c,
f/lex.c, f/top.c, java/builtins.c, java/decl.c: Delete
traditional-mode-related code copied from the C front end
but not used, or used only to permit the compiler to link.
* doc/bugreport.texi, doc/cpp.texi, doc/extend.texi,
doc/invoke.texi, doc/standards.texi, doc/trouble.texi:
Document removal of -traditional mode for compilation, and
remove documentation only relevant to that mode.
* config/nextstep.h, config/ptx4.h, config/svr4.h,
config/convex/convex.h, config/d30v/d30v.h,
config/i386/dgux.h, config/i386/osf1elf.h,
config/i386/osfelf.h, config/i386/osfrose.h,
config/i386/sco5.h, config/i386/sol2.h, config/m68k/a-ux.h,
config/m68k/hp310.h, config/m88k/dgux.h,
config/m88k/dguxbcs.h, config/m88k/luna.h, config/m88k/m88k.c,
config/m88k/m88k.h, config/m88k/openbsd.h,
config/mips/abi64.h, config/mips/osfrose.h,
config/mips/svr4-5.h, config/mips/svr4-t.h,
config/sparc/sol2-sld-64.h, config/sparc/sol2.h,
config/stormy16/stormy16.h: Remove all references to
-traditional from target specs. Delete all mention of the
no-longer-necessary TRADITIONAL_RETURN_FLOAT macro. Also
delete a couple of commented-out definitions of
DOLLARS_IN_IDENTIFIERS, with (incorrect) commentary referring
to -traditional.
* system.h: Poison TRADITIONAL_RETURN_FLOAT.
* doc/tm.texi: Remove mention of TRADITIONAL_RETURN_FLOAT macro.
* testsuite/gcc.c-torture/execute/920730-1t.c,
testsuite/gcc.c-torture/execute/920730-1t.x,
testsuite/gcc.dg/ext-glob.c: Delete test cases, only relevant
to -traditional.
From-SVN: r50110
Diffstat (limited to 'gcc/f/lex.c')
-rw-r--r-- | gcc/f/lex.c | 44 |
1 files changed, 0 insertions, 44 deletions
diff --git a/gcc/f/lex.c b/gcc/f/lex.c index d9f3bad..b3e57ba 100644 --- a/gcc/f/lex.c +++ b/gcc/f/lex.c @@ -246,8 +246,6 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) hollerith constants. */ #define wide_flag 0 -#define warn_traditional 0 -#define flag_traditional 0 switch (state) { @@ -268,18 +266,6 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) switch (c) { case 'x': - if (warn_traditional) - { - /* xgettext:no-c-format */ - ffebad_start_msg_lex ("The meaning of `\\x' (at %0) varies with -traditional", - FFEBAD_severityWARNING); - ffelex_bad_here_ (0, line, column); - ffebad_finish (); - } - - if (flag_traditional) - return c; - code = 0; count = 0; nonnull = 0; @@ -319,24 +305,9 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) return TARGET_BS; case 'a': - if (warn_traditional) - { - /* xgettext:no-c-format */ - ffebad_start_msg_lex ("The meaning of `\\a' (at %0) varies with -traditional", - FFEBAD_severityWARNING); - ffelex_bad_here_ (0, line, column); - ffebad_finish (); - } - - if (flag_traditional) - return c; return TARGET_BELL; case 'v': -#if 0 /* Vertical tab is present in common usage compilers. */ - if (flag_traditional) - return c; -#endif return TARGET_VT; case 'e': @@ -589,12 +560,6 @@ ffelex_cfebackslash_ (int *use_d, int *d, FILE *finput) switch (c) { case 'x': - if (warn_traditional) - warning ("the meaning of `\\x' varies with -traditional"); - - if (flag_traditional) - return c; - code = 0; count = 0; nonnull = 0; @@ -672,18 +637,9 @@ ffelex_cfebackslash_ (int *use_d, int *d, FILE *finput) return TARGET_BS; case 'a': - if (warn_traditional) - warning ("the meaning of `\\a' varies with -traditional"); - - if (flag_traditional) - return c; return TARGET_BELL; case 'v': -#if 0 /* Vertical tab is present in common usage compilers. */ - if (flag_traditional) - return c; -#endif return TARGET_VT; case 'e': |