Return to tm-harris.h CVS log

Up to [GCC 1.x] / gcc / config

Annotation of gcc/config/tm-harris.h, revision 1.1.1.3

1.1       root        1: /* Definitions of target machine for GNU compiler.  Harris tahoe version.
                      2:    Copyright (C) 1989 Free Software Foundation, Inc.
                      3: 
                      4: This file is part of GNU CC.
                      5: 
                      6: GNU CC is free software; you can redistribute it and/or modify
                      7: it under the terms of the GNU General Public License as published by
                      8: the Free Software Foundation; either version 1, or (at your option)
                      9: any later version.
                     10: 
                     11: GNU CC is distributed in the hope that it will be useful,
                     12: but WITHOUT ANY WARRANTY; without even the implied warranty of
                     13: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
                     14: GNU General Public License for more details.
                     15: 
                     16: You should have received a copy of the GNU General Public License
                     17: along with GNU CC; see the file COPYING.  If not, write to
                     18: the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
                     19: 
                     20: 
                     21: #include "tm-tahoe.h"
                     22: 
                     23: #undef CPP_PREDEFINES
                     24: #define CPP_PREDEFINES "-Dtahoe -Dunix -Dhcx"
                     25: 
                     26: #undef DBX_DEBUGGING_INFO
                     27: #define SDB_DEBUGGING_INFO
                     28: 
                     29: #undef TARGET_DEFAULT
                     30: #define TARGET_DEFAULT 1
                     31: 
                     32: /* urem and udiv don't exist on this system.  */
                     33: #undef UDIVSI3_LIBCALL
                     34: #undef UMODSI3_LIBCALL
                     35: 
1.1.1.3 ! root       36: /* start the assembly by turning off APP.  For the Harris (if not,
        !            37:    apparently, for the Tahoe) we want a .file directive as well. */
        !            38: 
        !            39: #undef ASM_FILE_START
        !            40: #define ASM_FILE_START(FILE) \
        !            41:   do {                                                 \
        !            42:     int len = strlen (dump_base_name);                 \
        !            43:     char *na = dump_base_name + len;                   \
        !            44:     /* NA gets DUMP_BASE_NAME sans directory names.  */        \
        !            45:     while (na > dump_base_name)                                \
        !            46:       {                                                        \
        !            47:         if (na[-1] == '/')                             \
        !            48:           break;                                       \
        !            49:         na--;                                          \
        !            50:       }                                                        \
        !            51:     fprintf (FILE, "#NO_APP\n\n");                     \
        !            52:     fprintf (FILE, "\t.file\t\"%s\"\n", na);           \
        !            53:   } while (0)
        !            54: 
1.1       root       55: /* Operand of .align is not logarithmic.  */
                     56: #undef ASM_OUTPUT_ALIGN
                     57: #define ASM_OUTPUT_ALIGN(FILE,LOG)  \
                     58:   LOG ? fprintf (FILE, "\t.align %d\n", 1 << (LOG)) : 0
                     59: 
                     60: /* For the same reason, we need .align 2 after casesi.  */
                     61: #undef PRINT_OPERAND
                     62: #define PRINT_OPERAND(FILE, X, CODE)  \
                     63: { if (CODE == '@')                                                     \
                     64:     putc ('2', FILE);                                                  \
                     65:   else if (GET_CODE (X) == REG)                                                \
                     66:     fprintf (FILE, "%s", reg_names[REGNO (X)]);                                \
                     67:   else if (GET_CODE (X) == MEM)                                                \
                     68:     output_address (XEXP (X, 0));                                      \
                     69:   else { putc ('$', FILE); output_addr_const (FILE, X); }}
                     70: 
                     71: #undef ASM_OUTPUT_LOCAL
                     72: #define ASM_OUTPUT_LOCAL(FILE, NAME, SIZE, ROUNDED)  \
                     73: ( fputs (".bss ", (FILE)),                     \
                     74:   assemble_name ((FILE), (NAME)),              \
1.1.1.2   root       75:   fprintf ((FILE), ",%u,4\n", (ROUNDED)))
1.1       root       76: 
                     77: #define ASM_OUTPUT_ASCII(FILE, PTR, SIZE)              \
                     78: {                                                      \
                     79:   unsigned char *_p = (PTR);                           \
                     80:   int _thissize = (SIZE);                              \
                     81:   fprintf ((FILE), "\t.ascii \"");                     \
                     82:   for (i = 0; i < _thissize; i++)                      \
                     83:     {                                                  \
                     84:       register int c = _p[i];                          \
                     85:       if (c >= ' ' && c < 0177 && c != '\"' && c != '\\') \
                     86:        putc (c, (FILE));                               \
                     87:       else                                             \
                     88:        {                                               \
                     89:          fprintf ((FILE), "\\%o", c);                  \
                     90:          if (i < _thissize - 1                         \
                     91:              && _p[i + 1] >= '0' && _p[i + 1] <= '9')  \
                     92:            fprintf ((FILE), "\"\n\t.ascii \"");        \
                     93:        }                                               \
                     94:     }                                                  \
                     95:   fprintf ((FILE), "\"\n");                            \
                     96: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.