|
|
1.1 root 1: /* Definitions of target machine for GNU compiler. Vax sysV version.
2: Copyright (C) 1988 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 2, 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: #include "vax/vax.h"
21:
22: /* Cope with these under SysV */
23:
24: #define SCCS_DIRECTIVE
25:
26: #undef CPP_PREDEFINES
27: #define CPP_PREDEFINES "-Dvax -Dunix -Asystem(unix) -Asystem(svr3) -Acpu(vax) -Amachine(vax)"
28:
29: /* Output #ident as a .ident. */
30:
31: #define ASM_OUTPUT_IDENT(FILE, NAME) fprintf (FILE, "\t.ident \"%s\"\n", NAME);
32:
33: #undef DBX_DEBUGGING_INFO
34: #define SDB_DEBUGGING_INFO
35:
36: #undef LIB_SPEC
37:
38: /* The .file command should always begin the output. */
39: #undef ASM_FILE_START
40: #define ASM_FILE_START(FILE) \
41: output_file_directive ((FILE), main_input_filename)
42:
43: #undef ASM_OUTPUT_ALIGN
44: #define ASM_OUTPUT_ALIGN(FILE,LOG) \
45: fprintf(FILE, "\t.align %d\n", 1 << (LOG))
46:
47: #undef ASM_OUTPUT_LOCAL
48: #define ASM_OUTPUT_LOCAL(FILE,NAME,SIZE,ROUNDED) \
49: ( data_section (), \
50: assemble_name ((FILE), (NAME)), \
51: fprintf ((FILE), ":\n\t.space %u\n", (ROUNDED)))
52:
53: #define ASM_OUTPUT_ASCII(FILE,PTR,LEN) \
54: { \
55: unsigned char *s; \
56: int i; \
57: for (i = 0, s = (PTR); i < (LEN); s++, i++) \
58: { \
59: if ((i % 8) == 0) \
60: fputs ("\n\t.byte\t", (FILE)); \
61: fprintf ((FILE), "%s0x%x", (i%8?",":""), (unsigned)*s); \
62: } \
63: fputs ("\n", (FILE)); \
64: }
65:
66: #undef ASM_OUTPUT_DOUBLE
67: #define ASM_OUTPUT_DOUBLE(FILE,VALUE) \
68: do { char dstr[30]; \
69: REAL_VALUE_TO_DECIMAL (VALUE, "%.20e", dstr); \
70: fprintf (FILE, "\t.double 0d%s\n", dstr); \
71: } while (0)
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.