]>
gcc.gnu.org Git - gcc.git/blob - gcc/config/i370/i370-c.c
1 /* Subroutines for the C front end for System/370.
2 Copyright (C) 1989, 1993, 1995, 1997, 1998, 1999, 2000
3 Free Software Foundation, Inc.
4 Contributed by Jan Stein (jan@cd.chalmers.se).
5 Modified for OS/390 LanguageEnvironment C by Dave Pitts (dpitts@cozx.com)
6 Hacked for Linux-ELF/390 by Linas Vepstas (linas@linas.org)
8 This file is part of GCC.
10 GCC is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2, or (at your option)
15 GCC is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with GCC; see the file COPYING. If not, write to
22 the Free Software Foundation, 59 Temple Place - Suite 330,
23 Boston, MA 02111-1307, USA. */
27 #include "coretypes.h"
37 /* #pragma map (name, alias) -
38 In this implementation both name and alias are required to be
39 identifiers. The older code seemed to be more permissive. Can
44 cpp_reader
*pfile ATTRIBUTE_UNUSED
;
48 if (c_lex (&x
) == CPP_OPEN_PAREN
49 && c_lex (&name
) == CPP_NAME
50 && c_lex (&x
) == CPP_COMMA
51 && c_lex (&alias
) == CPP_NAME
52 && c_lex (&x
) == CPP_CLOSE_PAREN
)
54 if (c_lex (&x
) != CPP_EOF
)
55 warning ("junk at end of #pragma map");
57 mvs_add_alias (IDENTIFIER_POINTER (name
), IDENTIFIER_POINTER (alias
), 1);
61 warning ("malformed #pragma map, ignored");
This page took 0.038529 seconds and 5 git commands to generate.