/* Definitions of target machine for GNU compiler. Clipper/Clix version. Copyright (C) 1988, 1993, 1996, 1997, 1999, 2000 Free Software Foundation, Inc. This file is part of GNU CC. GNU CC 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 2, or (at your option) any later version. GNU CC 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 GNU CC; see the file COPYING. If not, write to the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* Names to predefine in the preprocessor for this target machine. */ #define CPP_PREDEFINES "-Dclipper -Dunix -Asystem=unix -Asystem=svr3 -Acpu=clipper -Amachine=clipper" #undef STARTFILE_SPEC #define STARTFILE_SPEC \ "%{pg:gcrt1.o%s}%{!pg:%{p:mcrt1.o%s}%{!p:crt1.o%s}} crtbegin.o%s" #undef ENDFILE_SPEC #define ENDFILE_SPEC "crtend.o%s crtn.o%s" #undef LIB_SPEC #define TARGET_MEM_FUNCTIONS #define ASM_OUTPUT_ASCII(FILE,PTR,LEN) \ do { \ const unsigned char *s = (const unsigned char *)(PTR);\ size_t i, limit = (LEN); \ for (i = 0; i < limit; s++, i++) \ { \ if ((i % 8) == 0) \ fputs ("\n\t.byte\t", (FILE)); \ fprintf ((FILE), "%s0x%x", (i%8?",":""), (unsigned)*s); \ } \ fputs ("\n", (FILE)); \ } while (0) /* This is how to output an assembler line that says to advance the location counter to a multiple of 2**LOG bytes. */ #define ASM_OUTPUT_ALIGN(FILE,LOG) \ fprintf(FILE, "\t.align %d\n", 1 << (LOG)) #define BSS_SECTION_ASM_OP "\t.bss" #undef INIT_SECTION_ASM_OP #define INIT_SECTION_ASM_OP "\t.section .init,\"x\"" /* Define a few machine-specific details of the implementation of constructors. The __CTORS_LIST__ goes in the .init section. Define CTOR_LIST_BEGIN and CTOR_LIST_END to contribute to the .init section an instruction to push a word containing 0 (or some equivalent of that). TARGET_ASM_CONSTRUCTOR should be defined to push the address of the constructor. */ #define CTOR_LIST_BEGIN \ asm (INIT_SECTION_ASM_OP); \ asm ("subq $8,sp"); \ asm ("loadq $0,r0"); \ asm ("storw r0,(sp)") /* don't need end marker */ #undef CTOR_LIST_END /* fini psect is 8 aligned */ #define DTOR_LIST_BEGIN \ asm (DTORS_SECTION_ASM_OP); \ func_ptr __DTOR_LIST__[2] = { (func_ptr) (-1), 0 }; #undef TARGET_ASM_CONSTRUCTOR #define TARGET_ASM_CONSTRUCTOR clix_asm_out_constructor #undef TARGET_ASM_DESTRUCTOR #define TARGET_ASM_DESTRUCTOR clix_asm_out_destructor /* On clix crt1.o first calls init code and then sets environ and a valid chrclass. Unfortunately stdio routines bomb with unset chrclass. Therefore we set chrclass prior to calling global constructors. */ #undef DO_GLOBAL_CTORS_BODY #define DO_GLOBAL_CTORS_BODY \ do { \ func_ptr *p, *beg = alloca (0); \ _setchrclass (0); \ for (p = beg; *p; p+=2) \ ; \ while (p != beg) \ { p-= 2; (*p) (); } \ } while (0) #undef DO_GLOBAL_DTORS_BODY #define DO_GLOBAL_DTORS_BODY \ func_ptr *f = &__DTOR_LIST__[2]; /* 0,1 contains -1,0 */ \ int n = 0; \ while (*f) \ { \ f+= 2; /* skip over alignment 0 */ \ n++; \ } \ f -= 2; \ while (--n >= 0) \ { \ (*f) (); \ f-= 2; /* skip over alignment 0 */ \ }