URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [config/] [c4x/] [c4x-c.c] - Rev 828
Go to most recent revision | Compare with Previous | Blame | View Log
/* Subroutines for the C front end on the TMS320C[34]x Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2007 Free Software Foundation, Inc. Contributed by Michael Hayes (m.hayes@elec.canterbury.ac.nz) and Herman Ten Brugge (Haj.Ten.Brugge@net.HCC.nl). This file is part of GCC. GCC 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, or (at your option) any later version. GCC 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 GCC; see the file COPYING3. If not see <http://www.gnu.org/licenses/>. */ #include "config.h" #include "system.h" #include "coretypes.h" #include "tm.h" #include "tree.h" #include "toplev.h" #include "cpplib.h" #include "c-pragma.h" #include "tm_p.h" static int c4x_parse_pragma (const char *, tree *, tree *); /* Handle machine specific pragmas for compatibility with existing compilers for the C3x/C4x. pragma attribute ---------------------------------------------------------- CODE_SECTION(symbol,"section") section("section") DATA_SECTION(symbol,"section") section("section") FUNC_CANNOT_INLINE(function) FUNC_EXT_CALLED(function) FUNC_IS_PURE(function) const FUNC_IS_SYSTEM(function) FUNC_NEVER_RETURNS(function) noreturn FUNC_NO_GLOBAL_ASG(function) FUNC_NO_IND_ASG(function) INTERRUPT(function) interrupt */ /* Parse a C4x pragma, of the form ( function [, "section"] ) \n. FUNC is loaded with the IDENTIFIER_NODE of the function, SECT with the STRING_CST node of the string. If SECT is null, then this pragma doesn't take a section string. Returns 0 for a good pragma, -1 for a malformed pragma. */ #define BAD(gmsgid, arg) \ do { warning (OPT_Wpragmas, gmsgid, arg); return -1; } while (0) static int c4x_parse_pragma (name, func, sect) const char *name; tree *func; tree *sect; { tree f, s, x; if (pragma_lex (&x) != CPP_OPEN_PAREN) BAD ("missing '(' after '#pragma %s' - ignored", name); if (pragma_lex (&f) != CPP_NAME) BAD ("missing function name in '#pragma %s' - ignored", name); if (sect) { if (pragma_lex (&x) != CPP_COMMA) BAD ("malformed '#pragma %s' - ignored", name); if (pragma_lex (&s) != CPP_STRING) BAD ("missing section name in '#pragma %s' - ignored", name); *sect = s; } if (pragma_lex (&x) != CPP_CLOSE_PAREN) BAD ("missing ')' for '#pragma %s' - ignored", name); if (pragma_lex (&x) != CPP_EOF) warning (OPT_Wpragmas, "junk at end of '#pragma %s'", name); *func = f; return 0; } void c4x_pr_CODE_SECTION (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { tree func, sect; if (c4x_parse_pragma ("CODE_SECTION", &func, §)) return; code_tree = chainon (code_tree, build_tree_list (func, build_tree_list (NULL_TREE, sect))); } void c4x_pr_DATA_SECTION (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { tree func, sect; if (c4x_parse_pragma ("DATA_SECTION", &func, §)) return; data_tree = chainon (data_tree, build_tree_list (func, build_tree_list (NULL_TREE, sect))); } void c4x_pr_FUNC_IS_PURE (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { tree func; if (c4x_parse_pragma ("FUNC_IS_PURE", &func, 0)) return; pure_tree = chainon (pure_tree, build_tree_list (func, NULL_TREE)); } void c4x_pr_FUNC_NEVER_RETURNS (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { tree func; if (c4x_parse_pragma ("FUNC_NEVER_RETURNS", &func, 0)) return; noreturn_tree = chainon (noreturn_tree, build_tree_list (func, NULL_TREE)); } void c4x_pr_INTERRUPT (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { tree func; if (c4x_parse_pragma ("INTERRUPT", &func, 0)) return; interrupt_tree = chainon (interrupt_tree, build_tree_list (func, NULL_TREE)); } /* Used for FUNC_CANNOT_INLINE, FUNC_EXT_CALLED, FUNC_IS_SYSTEM, FUNC_NO_GLOBAL_ASG, and FUNC_NO_IND_ASG. */ void c4x_pr_ignored (pfile) cpp_reader *pfile ATTRIBUTE_UNUSED; { }
Go to most recent revision | Compare with Previous | Blame | View Log