/* Definitions for Intel 386 running SCO Unix System V 3.2 Version 5.   Copyright (C) 1992, 1995, 1996, 1997, 1998, 1999, 2000, 2002   Free Software Foundation, Inc.   Contributed by Kean Johnston (hug@netcom.com)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 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 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, 59 Temple Place - Suite 330,Boston, MA 02111-1307, USA.  */#define TARGET_VERSION fprintf (stderr, " (i386, SCO OpenServer 5 Syntax)");#undef LPREFIX#define LPREFIX				".L"#undef ALIGN_ASM_OP#define ALIGN_ASM_OP			"\t.align\t"#undef ASCII_DATA_ASM_OP#define ASCII_DATA_ASM_OP		"\t.ascii\t"#undef IDENT_ASM_OP#define IDENT_ASM_OP			"\t.ident\t"#undef COMMON_ASM_OP#define COMMON_ASM_OP			"\t.comm\t"#undef SET_ASM_OP#define SET_ASM_OP			"\t.set\t"#undef LOCAL_ASM_OP#define LOCAL_ASM_OP			"\t.local\t"#undef ASM_SHORT#define ASM_SHORT			"\t.value\t"#undef ASM_LONG#define ASM_LONG			"\t.long\t"#undef ASM_QUAD#undef TYPE_ASM_OP#define TYPE_ASM_OP			"\t.type\t"#undef SIZE_ASM_OP#define SIZE_ASM_OP			"\t.size\t"#undef STRING_ASM_OP#define STRING_ASM_OP			"\t.string\t"#undef SKIP_ASM_OP#define SKIP_ASM_OP			"\t.zero\t"#undef GLOBAL_ASM_OP#define GLOBAL_ASM_OP			"\t.globl\t"#undef EH_FRAME_SECTION_ASM_OP#define EH_FRAME_SECTION_NAME_COFF	".ehfram"#define EH_FRAME_SECTION_NAME_ELF	".eh_frame"#define EH_FRAME_SECTION_NAME	\  ((TARGET_ELF) ? EH_FRAME_SECTION_NAME_ELF : EH_FRAME_SECTION_NAME_COFF)/* Avoid problems (long sectino names, forward assembler refs) with DWARF   exception unwinding when we're generating COFF */#define DWARF2_UNWIND_INFO	\  ((TARGET_ELF) ? 1 : 0 )  #undef READONLY_DATA_SECTION_ASM_OP#define READONLY_DATA_SECTION_ASM_OP_COFF	"\t.section\t.rodata, \"x\""#define READONLY_DATA_SECTION_ASM_OP_ELF	"\t.section\t.rodata"#define READONLY_DATA_SECTION_ASM_OP		\  ((TARGET_ELF)					\   ? READONLY_DATA_SECTION_ASM_OP_ELF		\   : READONLY_DATA_SECTION_ASM_OP_COFF)#undef INIT_SECTION_ASM_OP#define INIT_SECTION_ASM_OP_ELF		"\t.section\t.init"/* Rename these for COFF because crt1.o will try to run them.  */#define INIT_SECTION_ASM_OP_COFF	"\t.section\t.ctor ,\"x\""#define INIT_SECTION_ASM_OP	\  ((TARGET_ELF) ? INIT_SECTION_ASM_OP_ELF : INIT_SECTION_ASM_OP_COFF)#undef CTORS_SECTION_ASM_OP#define CTORS_SECTION_ASM_OP_ELF	"\t.section\t.ctors,\"aw\""#define CTORS_SECTION_ASM_OP_COFF	INIT_SECTION_ASM_OP_COFF#define CTORS_SECTION_ASM_OP	\ ((TARGET_ELF) ? CTORS_SECTION_ASM_OP_ELF : CTORS_SECTION_ASM_OP_COFF)#undef DTORS_SECTION_ASM_OP#define DTORS_SECTION_ASM_OP_ELF	"\t.section\t.dtors, \"aw\""#define DTORS_SECTION_ASM_OP_COFF	FINI_SECTION_ASM_OP_COFF#define DTORS_SECTION_ASM_OP	\ ((TARGET_ELF) ? DTORS_SECTION_ASM_OP_ELF : DTORS_SECTION_ASM_OP_COFF)#undef FINI_SECTION_ASM_OP#define FINI_SECTION_ASM_OP_ELF		"\t.section\t.fini"#define FINI_SECTION_ASM_OP_COFF	"\t.section\t.dtor, \"x\""#define FINI_SECTION_ASM_OP	\ ((TARGET_ELF) ? FINI_SECTION_ASM_OP_ELF : FINI_SECTION_ASM_OP_COFF)#undef BSS_SECTION_ASM_OP#define BSS_SECTION_ASM_OP		"\t.data"#undef TEXT_SECTION_ASM_OP#define TEXT_SECTION_ASM_OP		"\t.text"#undef DATA_SECTION_ASM_OP#define DATA_SECTION_ASM_OP		"\t.data"#undef TYPE_OPERAND_FMT#define TYPE_OPERAND_FMT		"@%s"#undef APPLY_RESULT_SIZE#define APPLY_RESULT_SIZE						\(TARGET_ELF) ? size : 116#ifndef ASM_DECLARE_RESULT#define ASM_DECLARE_RESULT(FILE, RESULT)#endif#define SCO_DEFAULT_ASM_COFF(FILE,NAME)					\do {									\      ASM_OUTPUT_LABEL (FILE, NAME);					\  } while (0)#undef ASM_DECLARE_FUNCTION_NAME#define ASM_DECLARE_FUNCTION_NAME(FILE, NAME, DECL)			\  do {									\    if (TARGET_ELF) {							\      ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "function");		\      ASM_DECLARE_RESULT (FILE, DECL_RESULT (DECL));			\      ASM_OUTPUT_LABEL (FILE, NAME);					\    } else								\      SCO_DEFAULT_ASM_COFF(FILE, NAME);					\} while (0)#undef ASM_DECLARE_FUNCTION_SIZE#define ASM_DECLARE_FUNCTION_SIZE(FILE, FNAME, DECL)			\  do {									\    if (TARGET_ELF && !flag_inhibit_size_directive)			\      ASM_OUTPUT_MEASURED_SIZE (FILE, FNAME);				\  } while (0)#undef ASM_DECLARE_OBJECT_NAME#define ASM_DECLARE_OBJECT_NAME(FILE, NAME, DECL)			\  do {									\    if (TARGET_ELF) {							\      HOST_WIDE_INT size;						\									\      ASM_OUTPUT_TYPE_DIRECTIVE (FILE, NAME, "object");			\									\      size_directive_output = 0;					\      if (!flag_inhibit_size_directive					\	  && (DECL) && DECL_SIZE (DECL))				\	{								\	  size_directive_output = 1;					\	  size = int_size_in_bytes (TREE_TYPE (DECL));			\	  ASM_OUTPUT_SIZE_DIRECTIVE (FILE, NAME, size);			\	}								\									\      ASM_OUTPUT_LABEL (FILE, NAME);					\    } else								\      SCO_DEFAULT_ASM_COFF(FILE, NAME);					\  } while (0)#undef ASM_FILE_START_1#define ASM_FILE_START_1(FILE)#undef ASM_FILE_START#define ASM_FILE_START(FILE)						\do {									\  output_file_directive((FILE),main_input_filename);			\  fprintf ((FILE), "\t.version\t\"01.01\"\n");				\} while (0)#undef ASM_FINISH_DECLARE_OBJECT#define ASM_FINISH_DECLARE_OBJECT(FILE, DECL, TOP_LEVEL, AT_END)	 \do {									 \  if (TARGET_ELF) {							 \     const char *name = XSTR (XEXP (DECL_RTL (DECL), 0), 0);		 \     HOST_WIDE_INT size;						 \     if (!flag_inhibit_size_directive && DECL_SIZE (DECL)		 \         && ! AT_END && TOP_LEVEL					 \	 && DECL_INITIAL (DECL) == error_mark_node			 \	 && !size_directive_output)					 \       {								 \	 size_directive_output = 1;					 \	 size = int_size_in_bytes (TREE_TYPE (DECL));			 \	 ASM_OUTPUT_SIZE_DIRECTIVE (FILE, name, size);			 \       }								 \    }									 \} while (0)#undef ASM_GENERATE_INTERNAL_LABEL#define ASM_GENERATE_INTERNAL_LABEL(LABEL, PREFIX, NUM)			\do {									\  if (TARGET_ELF)							\    sprintf (LABEL, "*.%s%ld", (PREFIX), (long)(NUM));			\  else									\    sprintf (LABEL, ".%s%ld", (PREFIX), (long)(NUM));			\} while (0)#undef ASM_OUTPUT_ALIGNED_COMMON#define ASM_OUTPUT_ALIGNED_COMMON(FILE, NAME, SIZE, ALIGN)		\do {									\  fprintf ((FILE), "%s", COMMON_ASM_OP);				\  assemble_name ((FILE), (NAME));					\  if (TARGET_ELF)							\    fprintf ((FILE), ",%u,%u\n", (SIZE), (ALIGN) / BITS_PER_UNIT);	\  else									\    fprintf ((FILE), ",%u\n", (SIZE));					\} while (0)#undef ASM_OUTPUT_ALIGNED_LOCAL#define ASM_OUTPUT_ALIGNED_LOCAL(FILE, NAME, SIZE, ALIGN)		\do {									\  if (TARGET_ELF) {							\    fprintf ((FILE), "%s", LOCAL_ASM_OP);				\    assemble_name ((FILE), (NAME));					\    fprintf ((FILE), "\n");						\    ASM_OUTPUT_ALIGNED_COMMON (FILE, NAME, SIZE, ALIGN);		\  } else {								\    int align = exact_log2 (ALIGN);					\    if (align > 2) align = 2;						\    if (TARGET_SVR3_SHLIB)						\      data_section ();							\    else								\      bss_section ();							\    ASM_OUTPUT_ALIGN ((FILE), align == -1 ? 2 : align);			\    fprintf ((FILE), "%s\t", "\t.lcomm");				\    assemble_name ((FILE), (NAME));					\    fprintf ((FILE), ",%u\n", (SIZE));					\   }									\} while (0)/* A C statement (sans semicolon) to output to the stdio stream   FILE the assembler definition of uninitialized global DECL named   NAME whose size is SIZE bytes and alignment is ALIGN bytes.   Try to use asm_output_aligned_bss to implement this macro.  */#define ASM_OUTPUT_ALIGNED_BSS(FILE, DECL, NAME, SIZE, ALIGN) \asm_output_aligned_bss (FILE, DECL, NAME, SIZE, ALIGN)#undef ESCAPES#define ESCAPES \"\1\1\1\1\1\1\1\1btn\1fr\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\\0\0\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\\\0\0\0\\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\1\\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1\1"#undef STRING_LIMIT#define STRING_LIMIT	((unsigned) 256)#undef ASM_OUTPUT_LIMITED_STRING#define ASM_OUTPUT_LIMITED_STRING(FILE, STR)				\  do									\    {									\      register const unsigned char *_limited_str =			\        (const unsigned char *) (STR);					\      register unsigned ch;						\      fprintf ((FILE), "%s\"", STRING_ASM_OP);				\      for (; (ch = *_limited_str); _limited_str++)			\        {								\	  register int escape;						\	  switch (escape = ESCAPES[ch])					\	    {								\	    case 0:							\	      putc (ch, (FILE));					\	      break;							\	    case 1:							\	      fprintf ((FILE), "\\%03o", ch);				\	      break;							\	    default:							\	      putc ('\\', (FILE));					\	      putc (escape, (FILE));					\	      break;							\	    }								\        }								\      fprintf ((FILE), "\"\n");						\    }									\  while (0)#undef ASM_OUTPUT_ASCII#define ASM_OUTPUT_ASCII(FILE, STR, LENGTH)				\do {									\      register const unsigned char *_ascii_bytes =			\        (const unsigned char *) (STR);					\      register const unsigned char *limit = _ascii_bytes + (LENGTH);	\      register unsigned bytes_in_chunk = 0;				\      for (; _ascii_bytes < limit; _ascii_bytes++)			\        {								\	  register unsigned const char *p;				\	  if (bytes_in_chunk >= 64)					\	    {								\	      fputc ('\n', (FILE));					\	      bytes_in_chunk = 0;					\	    }								\	  for (p = _ascii_bytes; p < limit && *p != '\0'; p++)		\	    continue;							\	  if (p < limit && (p - _ascii_bytes) <= (long) STRING_LIMIT)	\	    {								\	      if (bytes_in_chunk > 0)					\		{							\		  fputc ('\n', (FILE));					\		  bytes_in_chunk = 0;					\		}							\	      ASM_OUTPUT_LIMITED_STRING ((FILE), _ascii_bytes);		\	      _ascii_bytes = p;						\	    }								\	  else								\	    {								\	      if (bytes_in_chunk == 0)					\		fputs ("\t.byte\t", (FILE));				\	      else							\		fputc (',', (FILE));					\	      fprintf ((FILE), "0x%02x", *_ascii_bytes);		\	      bytes_in_chunk += 5;					\	    }								\	}								\      if (bytes_in_chunk > 0)						\        fprintf ((FILE), "\n");						\} while (0) #undef ASM_OUTPUT_CASE_LABEL#define ASM_OUTPUT_CASE_LABEL(FILE,PREFIX,NUM,JUMPTABLE)		\do {									\  if (TARGET_ELF)							\    ASM_OUTPUT_ALIGN ((FILE), 2);					\  ASM_OUTPUT_INTERNAL_LABEL((FILE),(PREFIX),(NUM));			\} while (0)#undef ASM_OUTPUT_IDENT#define ASM_OUTPUT_IDENT(FILE, NAME) \  fprintf (FILE, "%s\"%s\"\n", IDENT_ASM_OP, NAME);#undef ASM_OUTPUT_EXTERNAL_LIBCALL#define ASM_OUTPUT_EXTERNAL_LIBCALL(FILE, FUN)				\  if (TARGET_ELF) (*targetm.asm_out.globalize_label) (FILE, XSTR (FUN, 0))#undef ASM_OUTPUT_INTERNAL_LABEL#define ASM_OUTPUT_INTERNAL_LABEL(FILE,PREFIX,NUM)			\  fprintf (FILE, ".%s%d:\n", PREFIX, NUM)/* The prefix to add to user-visible assembler symbols.  */#undef USER_LABEL_PREFIX#define USER_LABEL_PREFIX ""/*  * We rename 'gcc_except_table' to the shorter name in preparation * for the day when we're ready to do DWARF2 eh unwinding under COFF. *//* #define EXCEPTION_SECTION()		named_section (NULL, ".gccexc", 1) *//* Switch into a generic section.  */#define TARGET_ASM_NAMED_SECTION default_elf_asm_named_section #undef ASM_OUTPUT_SKIP#define ASM_OUTPUT_SKIP(FILE,SIZE) \do {									\  if (TARGET_ELF)							\    fprintf (FILE, "%s%u\n", SKIP_ASM_OP, (SIZE));			\  else									\    fprintf ((FILE), "%s.,.+%u\n", SET_ASM_OP, (SIZE));		\} while (0)#undef CTOR_LIST_BEGIN#define CTOR_LIST_BEGIN							\do {									\  asm (CTORS_SECTION_ASM_OP);						\  if (TARGET_ELF)							\    STATIC func_ptr __CTOR_LIST__[1] = { (func_ptr) (-1) };		\  else									\    asm ("pushl $0");							\} while (0)#undef CTOR_LIST_END#define CTOR_LIST_END							\do {									\  if (TARGET_ELF) {							\    asm (CTORS_SECTION_ASM_OP);						\    STATIC func_ptr __CTOR_LIST__[1] = { (func_ptr) (0) };		\  } else {								\    CTOR_LIST_BEGIN;							\  }									\} while (0)