![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to encore.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [GCC 2.x] / gcc / config|
Return to encore.h CVS log | Up to [GCC 2.x] / gcc / config |
1.1 ! root 1: /* Definitions of target machine for GNU compiler. ENCORE NS32000 version. ! 2: Copyright (C) 1988 Free Software Foundation, Inc. ! 3: Adapted by Robert Brown ([email protected]) from the Sequent ! 4: version by Michael Tiemann ([email protected]). ! 5: ! 6: This file is part of GNU CC. ! 7: ! 8: GNU CC is free software; you can redistribute it and/or modify ! 9: it under the terms of the GNU General Public License as published by ! 10: the Free Software Foundation; either version 2, or (at your option) ! 11: any later version. ! 12: ! 13: GNU CC is distributed in the hope that it will be useful, ! 14: but WITHOUT ANY WARRANTY; without even the implied warranty of ! 15: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ! 16: GNU General Public License for more details. ! 17: ! 18: You should have received a copy of the GNU General Public License ! 19: along with GNU CC; see the file COPYING. If not, write to ! 20: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ ! 21: ! 22: ! 23: /* ! 24: * Looks like all multiprocessors have this bug! ! 25: */ ! 26: ! 27: #define SEQUENT_ADDRESS_BUG 1 ! 28: ! 29: #include "ns32k.h" ! 30: ! 31: #define SDB_DEBUGGING_INFO ! 32: #undef DBX_REGISTER_NUMBER ! 33: #define DBX_REGISTER_NUMBER(REGNO) (REGNO) ! 34: ! 35: /* Cause long-jump assembler to be used, ! 36: since otherwise some files fail to be assembled right. */ ! 37: #define ASM_SPEC "-j" ! 38: ! 39: #undef ASM_FILE_START ! 40: #undef ASM_GENERATE_INTERNAL_LABEL ! 41: #undef ASM_OUTPUT_ADDR_DIFF_ELT ! 42: #undef ASM_OUTPUT_ALIGN ! 43: #undef ASM_OUTPUT_ASCII ! 44: #undef ASM_OUTPUT_DOUBLE ! 45: #undef ASM_OUTPUT_INT ! 46: #undef ASM_OUTPUT_INTERNAL_LABEL ! 47: #undef ASM_OUTPUT_LOCAL ! 48: #undef CPP_PREDEFINES ! 49: #undef FUNCTION_BOUNDARY ! 50: #undef PRINT_OPERAND ! 51: #undef PRINT_OPERAND_ADDRESS ! 52: #undef TARGET_VERSION ! 53: #undef FUNCTION_PROFILER ! 54: #undef ASM_OUTPUT_LABELREF_AS_INT ! 55: ! 56: #define TARGET_DEFAULT 25 /* 32532 with 32081 (guessing) */ ! 57: #define TARGET_VERSION fprintf (stderr, " (32000, Encore syntax)"); ! 58: /* Note Encore does not standardly do -Dencore. */ ! 59: /* budd: should have a -ns32332 (or -apc) switch! but no harm for now */ ! 60: #define CPP_PREDEFINES "-Dns32000 -Dn16 -Dns16000 -Dns32332 -Dunix" ! 61: ! 62: /* Ignore certain cpp directives used in header files on sysV. */ ! 63: #define SCCS_DIRECTIVE ! 64: ! 65: /* Output #ident as a .ident. */ ! 66: #define ASM_OUTPUT_IDENT(FILE, NAME) fprintf (FILE, "\t.ident \"%s\"\n", NAME); ! 67: ! 68: /* The .file command should always begin the output. */ ! 69: #define ASM_FILE_START(FILE) \ ! 70: output_file_directive ((FILE), main_input_filename) ! 71: ! 72: #define FUNCTION_BOUNDARY 128 /* speed optimization */ ! 73: ! 74: /* ! 75: * The Encore assembler uses ".align 2" to align on 2-byte boundaries. ! 76: */ ! 77: ! 78: #define ASM_OUTPUT_ALIGN(FILE,LOG) \ ! 79: fprintf (FILE, "\t.align %d\n", 1 << (LOG)) ! 80: ! 81: /* ! 82: * Internal labels are prefixed with a period. ! 83: */ ! 84: ! 85: #define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM) \ ! 86: sprintf (LABEL, "*.%s%d", PREFIX, NUM) ! 87: #define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM) \ ! 88: fprintf (FILE, ".%s%d:\n", PREFIX, NUM) ! 89: #define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, VALUE, REL) \ ! 90: fprintf (FILE, "\t.word .L%d-.LI%d\n", VALUE, REL) ! 91: ! 92: /* ! 93: * Different syntax for integer constants, double constants, and ! 94: * uninitialized locals. ! 95: */ ! 96: ! 97: #define ASM_OUTPUT_INT(FILE,VALUE) \ ! 98: ( fprintf (FILE, "\t.double "), \ ! 99: output_addr_const (FILE, (VALUE)), \ ! 100: fprintf (FILE, "\n")) ! 101: ! 102: #define ASM_OUTPUT_LABELREF_AS_INT(STREAM, NAME) \ ! 103: do { \ ! 104: fprintf (STREAM, "\t.double\t"); \ ! 105: ASM_OUTPUT_LABELREF (STREAM, NAME); \ ! 106: fprintf (STREAM, "\n"); \ ! 107: } while (0) ! 108: ! 109: ! 110: #define ASM_OUTPUT_DOUBLE(FILE,VALUE) \ ! 111: fprintf (FILE, "\t.long 0f%.20e\n", (VALUE)) ! 112: ! 113: #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \ ! 114: ( fputs ("\t.bss ", (FILE)), \ ! 115: assemble_name ((FILE), (NAME)), \ ! 116: fprintf ((FILE), ",%u,%u\n", (SIZE), (ROUNDED))) ! 117: ! 118: /* ! 119: * Encore assembler can't handle huge string constants like the one in ! 120: * gcc.c. If the default routine in varasm.c were more conservative, this ! 121: * code could be eliminated. It starts a new .ascii directive every 40 ! 122: * characters. ! 123: */ ! 124: ! 125: #define ASM_OUTPUT_ASCII(file, p, size) \ ! 126: { \ ! 127: for (i = 0; i < (size); i++) \ ! 128: { \ ! 129: register int c = (p)[i]; \ ! 130: if ((i / 40) * 40 == i) \ ! 131: if (i == 0) \ ! 132: fprintf ((file), "\t.ascii \""); \ ! 133: else \ ! 134: fprintf ((file), "\"\n\t.ascii \""); \ ! 135: if (c == '\"' || c == '\\') \ ! 136: putc ('\\', (file)); \ ! 137: if (c >= ' ' && c < 0177) \ ! 138: putc (c, (file)); \ ! 139: else \ ! 140: { \ ! 141: fprintf ((file), "\\%o", c); \ ! 142: if (i < (size) - 1 \ ! 143: && (p)[i + 1] >= '0' && (p)[i + 1] <= '9')\ ! 144: fprintf ((file), "\"\n\t.ascii \""); \ ! 145: } \ ! 146: } \ ! 147: fprintf ((file), "\"\n"); \ ! 148: } ! 149: ! 150: /* ! 151: * Dollar signs are required before immediate operands, double ! 152: * floating point constants use $0f syntax, and external addresses ! 153: * should be prefixed with a question mark to avoid assembler warnings ! 154: * about undefined symbols. ! 155: */ ! 156: ! 157: #define PRINT_OPERAND(FILE, X, CODE) \ ! 158: { if (CODE == '$') putc ('$', FILE); \ ! 159: else if (CODE == '?') fputc ('?', FILE); \ ! 160: else if (GET_CODE (X) == REG) \ ! 161: fprintf (FILE, "%s", reg_names[REGNO (X)]); \ ! 162: else if (GET_CODE (X) == MEM) \ ! 163: { \ ! 164: rtx xfoo; \ ! 165: xfoo = XEXP (X, 0); \ ! 166: switch (GET_CODE (xfoo)) \ ! 167: { \ ! 168: case MEM: \ ! 169: if (GET_CODE (XEXP (xfoo, 0)) == REG) \ ! 170: if (REGNO (XEXP (xfoo, 0)) == STACK_POINTER_REGNUM) \ ! 171: fprintf (FILE, "0(0(sp))"); \ ! 172: else fprintf (FILE, "0(0(%s))", \ ! 173: reg_names[REGNO (XEXP (xfoo, 0))]); \ ! 174: else \ ! 175: { \ ! 176: fprintf (FILE, "0("); \ ! 177: output_address (xfoo); \ ! 178: putc (')', FILE); \ ! 179: } \ ! 180: break; \ ! 181: case REG: \ ! 182: fprintf (FILE, "0(%s)", reg_names[REGNO (xfoo)]); \ ! 183: break; \ ! 184: case PRE_DEC: \ ! 185: case POST_INC: \ ! 186: fprintf (FILE, "tos"); \ ! 187: break; \ ! 188: case CONST_INT: \ ! 189: fprintf (FILE, "@%d", INTVAL (xfoo)); \ ! 190: break; \ ! 191: default: \ ! 192: output_address (xfoo); \ ! 193: break; \ ! 194: } \ ! 195: } \ ! 196: else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != DImode) \ ! 197: if (GET_MODE (X) == DFmode) \ ! 198: { union { double d; int i[2]; } u; \ ! 199: u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \ ! 200: fprintf (FILE, "$0f%.20e", u.d); } \ ! 201: else { union { double d; int i[2]; } u; \ ! 202: u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \ ! 203: fprintf (FILE, "$0f%.20e", u.d); } \ ! 204: else if (GET_CODE (X) == CONST) \ ! 205: output_addr_const (FILE, X); \ ! 206: else { putc ('$', FILE); output_addr_const (FILE, X); }} ! 207: ! 208: #define PRINT_OPERAND_ADDRESS(FILE, ADDR) print_operand_address(FILE, ADDR) ! 209: ! 210: /* Change the way in which data is allocated and initialized on the ! 211: encore so that both private and shared data are supported. Shared data ! 212: that is initialized must be contained in the ".shrdata" section ! 213: of the program. This is accomplished by defining the SHARED_SECTION_ASM_OP ! 214: macro. Share data that is simply allocated, and not initialized must ! 215: be prefixed with the ".shrcomm" or ".shrbss" pseudo op, for common or ! 216: local data respectively. This is accomplished by redefining the ! 217: ASM_OUTPUT_COMMON and ASM_OUTPUT_LOCAL macros. */ ! 218: ! 219: /* Assembler pseudo-op for shared data segment. */ ! 220: ! 221: #define SHARED_SECTION_ASM_OP ".shrdata" ! 222: ! 223: /* This says how to output an assembler line ! 224: to define a shared common symbol. */ ! 225: ! 226: #define ASM_OUTPUT_SHARED_COMMON(FILE, NAME, SIZE, ROUNDED) \ ! 227: ( fputs (".shrcomm ", (FILE)), \ ! 228: assemble_name ((FILE), (NAME)), \ ! 229: fprintf ((FILE), ",%d\n", (ROUNDED))) ! 230: ! 231: /* This says how to output an assembler line ! 232: to define a shared local symbol. */ ! 233: ! 234: #define ASM_OUTPUT_SHARED_LOCAL(FILE, NAME, SIZE, ROUNDED) \ ! 235: ( fputs ("\t.shrbss ", (FILE)), \ ! 236: assemble_name ((FILE), (NAME)), \ ! 237: fprintf ((FILE), ",%d,%d\n", (SIZE), (ROUNDED))) ! 238: ! 239: #define FUNCTION_PROFILER(FILE, LABELNO) \ ! 240: fprintf (FILE, "\taddr .LP%d,r0\n\tjsr mcount\n", (LABELNO))
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.