|
|
1.1 ! root 1: /* Output variables, constants and external declarations, for GNU compiler. ! 2: Copyright (C) 1988 Free Software Foundation, Inc. ! 3: ! 4: This file is part of GNU CC. ! 5: ! 6: GNU CC is free software; you can redistribute it and/or modify ! 7: it under the terms of the GNU General Public License as published by ! 8: the Free Software Foundation; either version 1, or (at your option) ! 9: any later version. ! 10: ! 11: GNU CC is distributed in the hope that it will be useful, ! 12: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 13: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 14: GNU General Public License for more details. ! 15: ! 16: You should have received a copy of the GNU General Public License ! 17: along with GNU CC; see the file COPYING. If not, write to ! 18: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ! 19: ! 20: #include "tm-vax.h" ! 21: ! 22: #undef CPP_PREDEFINES ! 23: #undef TARGET_VERSION ! 24: #undef TARGET_DEFAULT ! 25: #undef CALL_USED_REGISTERS ! 26: #undef MAYBE_VMS_FUNCTION_PROLOGUE ! 27: ! 28: /* Predefine this in CPP because VMS limits the size of command options ! 29: and GNU CPP is not used on VMS except with GNU C. */ ! 30: #define CPP_PREDEFINES "-Dvax -Dvms -DVMS -D__GNU__ -D__GNUC__" ! 31: ! 32: /* By default, allow $ to be part of an identifier. */ ! 33: #define DOLLARS_IN_IDENTIFIERS 1 ! 34: ! 35: #define TARGET_DEFAULT 1 ! 36: #define TARGET_VERSION fprintf (stderr, " (vax vms)"); ! 37: ! 38: #define CALL_USED_REGISTERS {1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1} ! 39: ! 40: #define MAYBE_VMS_FUNCTION_PROLOGUE(FILE) \ ! 41: { extern char *current_function_name; \ ! 42: if (!strcmp ("main", current_function_name)) \ ! 43: fprintf(FILE, "\tjsb _c$main_args\n"); } ! 44: ! 45: #define ASM_OUTPUT_EXTERNAL(FILE,DECL,NAME) \ ! 46: { if (DECL_INITIAL (DECL) == 0 && TREE_CODE (DECL) != FUNCTION_DECL) \ ! 47: fprintf (FILE, ".comm _%s,0\n", NAME); }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.