aboutsummaryrefslogtreecommitdiff
path: root/gcc-1.40/config/tm-harris.h
diff options
context:
space:
mode:
authorAndrew Lee <alee14498@protonmail.com>2021-08-15 00:34:05 -0400
committerAndrew Lee <alee14498@protonmail.com>2021-08-15 00:34:05 -0400
commit60cc83bf91bfc9bb02f6304b5d6c8234ba6d210f (patch)
treefdc0be85a1ca35e34c3ae2c805fe9b718e3c1091 /gcc-1.40/config/tm-harris.h
parentdd8dfab51b832a654365ed00c06bf802ff628bfa (diff)
downloadlinux-0.01-distro-master.tar.gz
linux-0.01-distro-master.tar.bz2
linux-0.01-distro-master.zip
Added gccHEADmaster
Diffstat (limited to 'gcc-1.40/config/tm-harris.h')
-rw-r--r--gcc-1.40/config/tm-harris.h96
1 files changed, 96 insertions, 0 deletions
diff --git a/gcc-1.40/config/tm-harris.h b/gcc-1.40/config/tm-harris.h
new file mode 100644
index 0000000..a06f001
--- /dev/null
+++ b/gcc-1.40/config/tm-harris.h
@@ -0,0 +1,96 @@
+/* Definitions of target machine for GNU compiler. Harris tahoe version.
+ Copyright (C) 1989 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 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 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, 675 Mass Ave, Cambridge, MA 02139, USA. */
+
+
+#include "tm-tahoe.h"
+
+#undef CPP_PREDEFINES
+#define CPP_PREDEFINES "-Dtahoe -Dunix -Dhcx"
+
+#undef DBX_DEBUGGING_INFO
+#define SDB_DEBUGGING_INFO
+
+#undef TARGET_DEFAULT
+#define TARGET_DEFAULT 1
+
+/* urem and udiv don't exist on this system. */
+#undef UDIVSI3_LIBCALL
+#undef UMODSI3_LIBCALL
+
+/* start the assembly by turning off APP. For the Harris (if not,
+ apparently, for the Tahoe) we want a .file directive as well. */
+
+#undef ASM_FILE_START
+#define ASM_FILE_START(FILE) \
+ do { \
+ int len = strlen (dump_base_name); \
+ char *na = dump_base_name + len; \
+ /* NA gets DUMP_BASE_NAME sans directory names. */ \
+ while (na > dump_base_name) \
+ { \
+ if (na[-1] == '/') \
+ break; \
+ na--; \
+ } \
+ fprintf (FILE, "#NO_APP\n\n"); \
+ fprintf (FILE, "\t.file\t\"%s\"\n", na); \
+ } while (0)
+
+/* Operand of .align is not logarithmic. */
+#undef ASM_OUTPUT_ALIGN
+#define ASM_OUTPUT_ALIGN(FILE,LOG) \
+ LOG ? fprintf (FILE, "\t.align %d\n", 1 << (LOG)) : 0
+
+/* For the same reason, we need .align 2 after casesi. */
+#undef PRINT_OPERAND
+#define PRINT_OPERAND(FILE, X, CODE) \
+{ if (CODE == '@') \
+ putc ('2', FILE); \
+ else if (GET_CODE (X) == REG) \
+ fprintf (FILE, "%s", reg_names[REGNO (X)]); \
+ else if (GET_CODE (X) == MEM) \
+ output_address (XEXP (X, 0)); \
+ else { putc ('$', FILE); output_addr_const (FILE, X); }}
+
+#undef ASM_OUTPUT_LOCAL
+#define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED) \
+( fputs (".bss ", (FILE)), \
+ assemble_name ((FILE), (NAME)), \
+ fprintf ((FILE), ",%u,4\n", (ROUNDED)))
+
+#define ASM_OUTPUT_ASCII(FILE, PTR, SIZE) \
+{ \
+ unsigned char *_p = (PTR); \
+ int _thissize = (SIZE); \
+ fprintf ((FILE), "\t.ascii \""); \
+ for (i = 0; i < _thissize; i++) \
+ { \
+ register int c = _p[i]; \
+ if (c >= ' ' && c < 0177 && c != '\"' && c != '\\') \
+ putc (c, (FILE)); \
+ else \
+ { \
+ fprintf ((FILE), "\\%o", c); \
+ if (i < _thissize - 1 \
+ && _p[i + 1] >= '0' && _p[i + 1] <= '9') \
+ fprintf ((FILE), "\"\n\t.ascii \""); \
+ } \
+ } \
+ fprintf ((FILE), "\"\n"); \
+}