/* Definitions of target machine for GNU compiler.  HP-UX 68000/68020 version.   Copyright (C) 1987, 1988 Free Software Foundation, Inc.This file is part of GNU CC.GNU CC is free software; you can redistribute it and/or modifyit under the terms of the GNU General Public License as published bythe Free Software Foundation; either version 1, 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 ofMERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See theGNU General Public License for more details.You should have received a copy of the GNU General Public Licensealong with GNU CC; see the file COPYING.  If not, write tothe Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  *//* Define USE_GAS if GCC is supposed to work with the GNU assembler,   GNU linker and GNU debugger using DBX debugging information.   (In other words, much of HPUX has been cast aside.)   Undefine USE_GAS if you want GCC to feed the HP assembler.  *//* #define USE_GAS */  /* Use tm-hp9k320g.h if you want this.  *//* Control assembler-syntax conditionals in m68k.md.  */#ifndef USE_GAS#define MOTOROLA#define SGS#define HPUX_ASM#endif#include "tm-m68k.h"/* See tm-m68k.h.  7 means 68020 with 68881.  */#ifndef TARGET_DEFAULT#define	TARGET_DEFAULT 7#endif/* Define __HAVE_68881__ in preprocessor, unless -msoft-float is specified.   This will control the use of inline 68881 insns in certain macros.  *//* For version 6.2 of HP-UX (or earlier), remove the "-V 3" from   ASM_SPEC below. */#ifdef HPUX_ASM/* "-V 3" says that setjmp and longjmp need to save the fpu regs.  */#define ASM_SPEC "%{m68000:+X} -V 3"#if TARGET_DEFAULT & 02  /* -m68881 is the default *//* These definitions differ from those used for GAS by defining __HPUX_ASM__.   This is needed because some programs, particularly GDB, need to   know which assembler is being used so that the correct `asm'   instructions can be used. */#define CPP_SPEC \"%{!msoft-float:-D__HAVE_68881__ }\%{!ansi:%{!mc68000:%{!m68000:-Dmc68020}}} -D__HPUX_ASM__\ -D_HPUX_SOURCE -D__hp9000s300 -D__hp9000s200 -D__PWB -D__hpux -D__unix"#else /* default is -msoft-float */#define CPP_SPEC \"%{m68881:-D__HAVE_68881__ }\%{!ansi:%{!mc68000:%{!m68000:-Dmc68020}}} -D__HPUX_ASM__\ -D_HPUX_SOURCE -D__hp9000s300 -D__hp9000s200 -D__PWB -D__hpux -D__unix"#endif /* default is -msoft-float */#else /* not HPUX_ASM */#if TARGET_DEFAULT & 02  /* -m68881 is the default */#define CPP_SPEC \"%{!msoft-float:-D__HAVE_68881__ }\%{!ansi:%{!mc68000:%{!m68000:-Dmc68020}}}\ -D_HPUX_SOURCE -D__hp9000s300 -D__hp9000s200 -D__PWB -D__hpux -D__unix"#else /* default is -msoft-float */#define CPP_SPEC \"%{m68881:-D__HAVE_68881__ }\%{!ansi:%{!mc68000:%{!m68000:-Dmc68020}}}\ -D_HPUX_SOURCE -D__hp9000s300 -D__hp9000s200 -D__PWB -D__hpux -D__unix"#endif /* default is -msoft-float *//* -m68000 requires special flags to the assembler.  */#define ASM_SPEC \ "%{m68000:-mc68000}%{mc68000:-mc68000}%{!mc68000:%{!m68000:-mc68020}}"/* special directory for gnu libs on hp-ux system */#ifndef STANDARD_STARTFILE_PREFIX#define STANDARD_STARTFILE_PREFIX "/usr/local/lib/gnu/"#endif#endif /* Not HPUX_ASM *//* Names to predefine in the preprocessor for this target machine   (for non-strict-ANSI programs only).  *//* These are the ones defined by HPUX cc, plus mc68000 for uniformity with   GCC on other 68000 systems.  */#define CPP_PREDEFINES "-Dhp9000s200 -Dhp9000s300 -DPWB -Dhpux -Dunix"/* Every structure or union's size must be a multiple of 2 bytes.  */#define STRUCTURE_SIZE_BOUNDARY 16/* hpux doesn't use static area for struct returns. */#undef PCC_STATIC_STRUCT_RETURN/* Generate calls to memcpy, memcmp and memset.  */#define TARGET_MEM_FUNCTIONS/* Function calls do save some fp registers on hpux version 7.  */#undef CALL_USED_REGISTERS#define CALL_USED_REGISTERS						\ {1, 1, 0, 0, 0, 0, 0, 0,						\  1, 1, 0, 0, 0, 0, 0, 1,						\  1, 1, 0, 0, 0, 0, 0, 0}#ifdef HPUX_ASM/* Override parts of tm-m68k.h to fit the HPUX assembler.  */#undef TARGET_VERSION#undef REGISTER_NAMES#undef FUNCTION_PROLOGUE#undef FUNCTION_EPILOGUE#undef ASM_OUTPUT_REG_PUSH#undef ASM_OUTPUT_REG_POP#undef ASM_FILE_START#undef ASM_APP_ON#undef ASM_APP_OFF#undef TEXT_SECTION_ASM_OP#undef DATA_SECTION_ASM_OP#undef ASM_OUTPUT_DOUBLE#undef ASM_OUTPUT_FLOAT#undef ASM_OUTPUT_INT#undef ASM_OUTPUT_SHORT#undef ASM_OUTPUT_CHAR#undef ASM_OUTPUT_BYTE#undef ASM_OUTPUT_ADDR_VEC_ELT#undef ASM_OUTPUT_ADDR_DIFF_ELT#undef ASM_OUTPUT_ALIGN#undef ASM_OUTPUT_SKIP#undef ASM_OUTPUT_COMMON#undef ASM_OUTPUT_LOCAL#undef ASM_FORMAT_PRIVATE_NAME#undef PRINT_OPERAND#undef PRINT_OPERAND_ADDRESS#undef FUNCTION_PROFILER#undef ASM_GLOBALIZE_LABEL#undef ASM_OUTPUT_INTERNAL_LABEL#define TARGET_VERSION fprintf (stderr, " (68k, SGS/hpux syntax)");#define REGISTER_NAMES \{"%d0", "%d1", "%d2", "%d3", "%d4", "%d5", "%d6", "%d7",	\ "%a0", "%a1", "%a2", "%a3", "%a4", "%a5", "%fp", "%sp",	\ "%fp0", "%fp1", "%fp2", "%fp3", "%fp4", "%fp5", "%fp6", "%fp7"}#define FUNCTION_PROLOGUE(FILE, SIZE)     \{ register int regno;						\  register int mask = 0;					\  extern char call_used_regs[];					\  int fsize = (SIZE);						\  if (frame_pointer_needed)					\    { if (fsize < 0x8000)					\        fprintf (FILE, "\tlink.w %%a6,&%d\n", -fsize);		\      else if (TARGET_68020)					\        fprintf (FILE, "\tlink.l %%a6,&%d\n", -fsize);		\      else							\	fprintf (FILE, "\tlink.w %%a6,&0\n\tsub.l &%d,%%sp\n", fsize); }  \  for (regno = 16; regno < FIRST_PSEUDO_REGISTER; regno++)	\    if (regs_ever_live[regno] && ! call_used_regs[regno])	\       mask |= 1 << (regno - 16);				\  if (mask != 0)						\    fprintf (FILE, "\tfmovem &0x%x,-(%%sp)\n", mask & 0xff);       \  mask = 0;							\  for (regno = 0; regno < 16; regno++)				\    if (regs_ever_live[regno] && ! call_used_regs[regno])	\       mask |= 1 << (15 - regno);				\  if (frame_pointer_needed)					\    mask &= ~ (1 << (15-FRAME_POINTER_REGNUM));			\  if (exact_log2 (mask) >= 0)					\    fprintf (FILE, "\tmov.l %s,-(%%sp)\n", reg_names[15 - exact_log2 (mask)]);  \  else if (mask) fprintf (FILE, "\tmovm.l &0x%x,-(%%sp)\n", mask); }#define PROFILE_BEFORE_PROLOGUE#define FUNCTION_PROFILER(FILE, LABEL_NO) \   fprintf (FILE, "\tmov.l &LP%d,%%a0\n\tjsr mcount\n", (LABEL_NO));#define FUNCTION_EPILOGUE(FILE, SIZE) \{ register int regno;						\  register int mask, fmask;					\  register int nregs;						\  int offset, foffset;						\  extern char call_used_regs[];					\  extern int current_function_pops_args;			\  extern int current_function_args_size;			\  int fsize = (SIZE);						\  int big = 0;							\  nregs = 0;  fmask = 0;					\  for (regno = 16; regno < FIRST_PSEUDO_REGISTER; regno++)	\    if (regs_ever_live[regno] && ! call_used_regs[regno])	\      { nregs++; fmask |= 1 << (23 - regno); }			\  foffset = nregs * 12;						\  nregs = 0;  mask = 0;						\  if (frame_pointer_needed) regs_ever_live[FRAME_POINTER_REGNUM] = 0; \  for (regno = 0; regno < 16; regno++)				\    if (regs_ever_live[regno] && ! call_used_regs[regno])	\      { nregs++; mask |= 1 << regno; }				\  offset = foffset + nregs * 4;					\  if (offset + fsize >= 0x8000 && frame_pointer_needed)		\    { fprintf (FILE, "\tmov.l &%d,%%a0\n", -fsize);		\      fsize = 0, big = 1; }					\  if (exact_log2 (mask) >= 0) {					\    if (big)							\      fprintf (FILE, "\tmov.l -%d(%%a6,%%a0.l),%s\n",		\	       offset + fsize, reg_names[exact_log2 (mask)]);	\    else if (! frame_pointer_needed)				\      fprintf (FILE, "\tmov.l (%%sp)+,%s\n",			\	       reg_names[exact_log2 (mask)]);			\    else							\      fprintf (FILE, "\tmov.l -%d(%%a6),%s\n",			\	       offset + fsize, reg_names[exact_log2 (mask)]); }	\  else if (mask) {						\    if (big)							\      fprintf (FILE, "\tmovm.l -%d(%%a6,%%a0.l),&0x%x\n",	\	       offset + fsize, mask);				\    else if (! frame_pointer_needed)				\      fprintf (FILE, "\tmovm.l (%%sp)+,&0x%x\n", mask);		\    else							\      fprintf (FILE, "\tmovm.l -%d(%%a6),&0x%x\n",		\	       offset + fsize, mask); }				\  if (fmask) {							\    if (big)							\      fprintf (FILE, "\tfmovem -%d(%%a6,%%a0.l),&0x%x\n",	\	       foffset + fsize, fmask);				\    else if (! frame_pointer_needed)				\      fprintf (FILE, "\tfmovem (%%sp)+,&0x%x\n", fmask);	\    else							\      fprintf (FILE, "\tfmovem -%d(%%a6),&0x%x\n",		\	       foffset + fsize, fmask); }			\  if (frame_pointer_needed)					\    fprintf (FILE, "\tunlk %%a6\n");				\  if (current_function_pops_args && current_function_args_size)	\    fprintf (FILE, "\trtd &%d\n", current_function_args_size);	\  else fprintf (FILE, "\trts\n"); }/* 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, "\tmov.l %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, "\tmov.l (%%sp)+,%s\n", reg_names[REGNO])#define ASM_FILE_START(FILE)#define ASM_APP_ON ""#define ASM_APP_OFF ""#define TEXT_SECTION_ASM_OP "text"#define DATA_SECTION_ASM_OP "data"#define	ASCII_DATA_ASM_OP "\tbyte"/* This says how to output an assembler line   to define a global common symbol.  */#define ASM_OUTPUT_COMMON(FILE, NAME, SIZE, ROUNDED)  \( fputs ("\tcomm ", (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 ("\tlcomm ", (FILE)),			\  assemble_name ((FILE), (NAME)),		\  fprintf ((FILE), ",%u,2\n", (ROUNDED)))