?? tm-pyr.h
字號:
#define DBX_NO_XREFS 1/* Do not break .stabs pseudos into continuations. */#define DBX_CONTIN_LENGTH 0/* This is the char to use for continuation (in case we need to turn continuation back on). */#define DBX_CONTIN_CHAR '?'/* This is how to output the definition of a user-level label named NAME, such as the label on a static function or variable NAME. */#define ASM_OUTPUT_LABEL(FILE,NAME) \ do { assemble_name (FILE, NAME); fputs (":\n", FILE); } while (0)/* This is how to output a command to make the user-level label named NAME defined for reference from other files. */#define ASM_GLOBALIZE_LABEL(FILE,NAME) \ do { fputs (".globl ", FILE); assemble_name (FILE, NAME); fputs ("\n", FILE);} while (0)/* This is how to output a reference to a user-level label named NAME. */#define ASM_OUTPUT_LABELREF(FILE,NAME) \ fprintf (FILE, "_%s", NAME);/* This is how to output an internal numbered label where PREFIX is the class of label and NUM is the number within the class. */#define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM) \ fprintf (FILE, "%s%d:\n", PREFIX, NUM)/* This is how to store into the string LABEL the symbol_ref name of an internal numbered label where PREFIX is the class of label and NUM is the number within the class. This is suitable for output with `assemble_name'. */#define ASM_GENERATE_INTERNAL_LABEL(LABEL,PREFIX,NUM) \ sprintf (LABEL, "*%s%d", PREFIX, NUM)/* This is how to output an assembler line defining a `double' constant. */#define ASM_OUTPUT_DOUBLE(FILE,VALUE) \ fprintf (FILE, "\t.double 0d%.20e\n", (VALUE))/* This is how to output an assembler line defining a `float' constant. */#define ASM_OUTPUT_FLOAT(FILE,VALUE) \ fprintf (FILE, "\t.float 0f%.20e\n", (VALUE))/* This is how to output an assembler line defining an `int' constant. */#define ASM_OUTPUT_INT(FILE,VALUE) \( fprintf (FILE, "\t.word "), \ output_addr_const (FILE, (VALUE)), \ fprintf (FILE, "\n"))/* Likewise for `char' and `short' constants. */#define ASM_OUTPUT_SHORT(FILE,VALUE) \( fprintf (FILE, "\t.half "), \ output_addr_const (FILE, (VALUE)), \ fprintf (FILE, "\n"))#define ASM_OUTPUT_CHAR(FILE,VALUE) \( fprintf (FILE, "\t.byte "), \ output_addr_const (FILE, (VALUE)), \ fprintf (FILE, "\n"))/* This is how to output an assembler line for a numeric constant byte. */#define ASM_OUTPUT_BYTE(FILE,VALUE) \ fprintf (FILE, "\t.byte 0x%x\n", (VALUE))/* This is how to output an insn to push a register on the stack. It need not be very fast code. */#define ASM_OUTPUT_REG_PUSH(FILE,REGNO) \ fprintf (FILE, "\tsubw $4,sp\n\tmovw %s,(sp)\n", reg_names[REGNO])/* This is how to output an insn to pop a register from the stack. It need not be very fast code. */#define ASM_OUTPUT_REG_POP(FILE,REGNO) \ fprintf (FILE, "\tmovw (sp),%s\n\taddw $4,sp\n", reg_names[REGNO])/* Store in OUTPUT a string (made with alloca) containing an assembler-name for a local static variable named NAME. LABELNO is an integer which is different for each call. */#define ASM_FORMAT_PRIVATE_NAME(OUTPUT, NAME, LABELNO) \( (OUTPUT) = (char *) alloca (strlen ((NAME)) + 10), \ sprintf ((OUTPUT), "%s.%d", (NAME), (LABELNO)))/* This is how to output an element of a case-vector that is absolute. */#define ASM_OUTPUT_ADDR_VEC_ELT(FILE, VALUE) \ fprintf (FILE, "\t.word L%d\n", VALUE)/* This is how to output an element of a case-vector that is relative. */#define ASM_OUTPUT_ADDR_DIFF_ELT(FILE, VALUE, REL) \ fprintf (FILE, "\t.word L%d-L%d\n", VALUE, REL)/* This is how to output an assembler line that says to advance the location counter to a multiple of 2**LOG bytes. On Pyramids, .align takes only args between 2 and 5. */#define ASM_OUTPUT_ALIGN(FILE,LOG) \ fprintf (FILE, "\t.align %d\n", (LOG) < 2 ? 2 : (LOG))#define ASM_OUTPUT_SKIP(FILE,SIZE) \ fprintf (FILE, "\t.space %u\n", (SIZE))/* This says how to output an assembler line to define a global common symbol. */#define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED) \( fputs (".comm ", (FILE)), \ assemble_name ((FILE), (NAME)), \ fprintf ((FILE), ",%u\n", (ROUNDED)))/* This says how to output an assembler line to define a local common symbol. */#define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \( fputs (".lcomm ", (FILE)), \ assemble_name ((FILE), (NAME)), \ fprintf ((FILE), ",%u\n", (ROUNDED)))/* Define the parentheses used to group arithmetic operations in assembler code. */#define ASM_OPEN_PAREN "("#define ASM_CLOSE_PAREN ")"/* Define results of standard character escape sequences. */#define TARGET_BELL 007#define TARGET_BS 010#define TARGET_TAB 011#define TARGET_NEWLINE 012#define TARGET_VT 013#define TARGET_FF 014#define TARGET_CR 015/* Print operand X (an rtx) in assembler syntax to file FILE. CODE is a letter or dot (`z' in `%z0') or 0 if no letter was specified. For `%' followed by punctuation, CODE is the punctuation and X is null. On the Pyr, we support the conventional CODE characters: 'f' for float insn (print a CONST_DOUBLE as a float rather than in hex) which are never used. *//* FIXME : should be more robust with CONST_DOUBLE. */#define PRINT_OPERAND(FILE, X, CODE) \{ if (GET_CODE (X) == REG) \ fprintf (FILE, "%s", reg_names [REGNO (X)]); \ \ else if (GET_CODE (X) == MEM) \ output_address (XEXP (X, 0)); \ \ else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) == SFmode) \ { union { double d; int i[2]; } u; \ union { float f; int i; } u1; \ u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \ u1.f = u.d; \ if (CODE == 'f') \ fprintf (FILE, "$0f%.0e", u1.f); \ else \ fprintf (FILE, "$0x%x", u1.i); } \ \ else if (GET_CODE (X) == CONST_DOUBLE && GET_MODE (X) != DImode) \ { union { double d; int i[2]; } u; \ u.i[0] = CONST_DOUBLE_LOW (X); u.i[1] = CONST_DOUBLE_HIGH (X); \ fprintf (FILE, "$0d%.20e", u.d); } \ \ else if (CODE == 'N') \ switch (GET_CODE (X)) \ { \ case EQ: fputs ("eq", FILE); break; \ case NE: fputs ("ne", FILE); break; \ case GT: \ case GTU: fputs ("gt", FILE); break; \ case LT: \ case LTU: fputs ("lt", FILE); break; \ case GE: \ case GEU: fputs ("ge", FILE); break; \ case LE: \ case LEU: fputs ("le", FILE); break; \ } \ \ else if (CODE == 'C') \ switch (GET_CODE (X)) \ { \ case EQ: fputs ("ne", FILE); break; \ case NE: fputs ("eq", FILE); break; \ case GT: \ case GTU: fputs ("le", FILE); break; \ case LT: \ case LTU: fputs ("ge", FILE); break; \ case GE: \ case GEU: fputs ("lt", FILE); break; \ case LE: \ case LEU: fputs ("gt", FILE); break; \ } \ \ else if (CODE == 'R') \ switch (GET_CODE (X)) \ { \ case EQ: fputs ("eq", FILE); break; \ case NE: fputs ("ne", FILE); break; \ case GT: \ case GTU: fputs ("lt", FILE); break; \ case LT: \ case LTU: fputs ("gt", FILE); break; \ case GE: \ case GEU: fputs ("le", FILE); break; \ case LE: \ case LEU: fputs ("ge", FILE); break; \ } \ \ else { putc ('$', FILE); output_addr_const (FILE, X); } \}/* Print a memory operand whose address is ADDR, on file FILE. *//* This is horrendously complicated. */#define PRINT_OPERAND_ADDRESS(FILE, ADDR) \{ \ register rtx reg1, reg2, breg, ireg; \ register rtx addr = ADDR; \ rtx offset, scale; \ retry: \ switch (GET_CODE (addr)) \ { \ case MEM: \ fprintf (stderr, "bad Mem "); debug_rtx (addr); \ addr = XEXP (addr, 0); \ abort (); \ case REG: \ fprintf (FILE, "(%s)", reg_names [REGNO (addr)]); \ break; \ case PLUS: \ reg1 = 0; reg2 = 0; \ ireg = 0; breg = 0; \ offset = 0; \ if (CONSTANT_ADDRESS_P (XEXP (addr, 0)) \ || GET_CODE (XEXP (addr, 0)) == MEM) \ { \ offset = XEXP (addr, 0); \ addr = XEXP (addr, 1); \ } \ else if (CONSTANT_ADDRESS_P (XEXP (addr, 1)) \ || GET_CODE (XEXP (addr, 1)) == MEM) \ { \ offset = XEXP (addr, 1); \ addr = XEXP (addr, 0); \ } \ if (GET_CODE (addr) != PLUS) ; \ else if (GET_CODE (XEXP (addr, 0)) == MULT) \ { \ reg1 = XEXP (addr, 0); \ addr = XEXP (addr, 1); \ } \ else if (GET_CODE (XEXP (addr, 1)) == MULT) \ { \ reg1 = XEXP (addr, 1); \ addr = XEXP (addr, 0); \ } \ else if (GET_CODE (XEXP (addr, 0)) == REG) \ { \ reg1 = XEXP (addr, 0); \ addr = XEXP (addr, 1); \ } \ else if (GET_CODE (XEXP (addr, 1)) == REG) \ { \ reg1 = XEXP (addr, 1); \ addr = XEXP (addr, 0); \ } \ if (GET_CODE (addr) == REG || GET_CODE (addr) == MULT) \ { \ if (reg1 == 0) \ reg1 = addr; \ else \ reg2 = addr; \ addr = 0; \ } \ if (offset != 0) \ { \ if (addr != 0) { \ fprintf (stderr, "\nBad addr "); debug_rtx (addr); \ abort ();} \ addr = offset; \ } \ if (reg1 != 0 && GET_CODE (reg1) == MULT) \ { breg = reg2; ireg = reg1; } \ else if (reg2 != 0 && GET_CODE (reg2) == MULT) \ { breg = reg1; ireg = reg2; } \ else if (reg2 != 0 || GET_CODE (addr) == MEM) \ { breg = reg2; ireg = reg1; } \ else \ { breg = reg1; ireg = reg2; } \ if (addr != 0) \ output_address (offset); \ if (breg != 0) \ { if (GET_CODE (breg) != REG) \ { \ fprintf (stderr, "bad Breg"); debug_rtx (addr); \ abort (); \ } \ fprintf (FILE, "(%s)", reg_names[REGNO (breg)]); } \ if (ireg != 0) \ { \ if (GET_CODE (ireg) == MULT) \ { \ scale = XEXP (ireg, 1); \ ireg = XEXP (ireg, 0); \ if (GET_CODE (ireg) != REG) \ { register rtx tem; \ tem = ireg; ireg = scale; scale = tem; \ } \ if (GET_CODE (ireg) != REG) { \ fprintf (stderr, "bad idx "); debug_rtx (addr); \ abort (); } \ if ((GET_CODE (scale) == CONST_INT) && (INTVAL(scale) >= 1))\ fprintf (FILE, "[%s*0x%x]", reg_names[REGNO (ireg)], \ INTVAL(scale)); \ else \ fprintf (FILE, "[%s*1]", reg_names[REGNO (ireg)]); \ } \ else if (GET_CODE (ireg) == REG) \ fprintf (FILE, "[%s*1]", reg_names[REGNO (ireg)]); \ else \ { \ fprintf (stderr, "Not indexed at all!"); debug_rtx (addr);\ abort (); \ } \ } \ break; \ default: \ output_addr_const (FILE, addr); \ } \}?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -