diff options
| author | Richard Henderson <rth@cygnus.com> | 1999-10-15 11:07:48 -0700 |
|---|---|---|
| committer | Richard Henderson <rth@gcc.gnu.org> | 1999-10-15 11:07:48 -0700 |
| commit | 104dfaa8c0bdc7e0538287334bdf8372f1631b2c (patch) | |
| tree | 53a35e1d7cd0e768b90efc076810b3d0586b534c /gcc/config/i370 | |
| parent | 76ed0c0a4bd74a140e0de578eb94f2fd969646bd (diff) | |
| download | gcc-104dfaa8c0bdc7e0538287334bdf8372f1631b2c.zip gcc-104dfaa8c0bdc7e0538287334bdf8372f1631b2c.tar.gz gcc-104dfaa8c0bdc7e0538287334bdf8372f1631b2c.tar.bz2 | |
Based on patch from Michael Gschwind <mikeg@watson.ibm.com>:
* unroll.c (unroll_loop): Cast return value of alloca.
* i370/i370.c: Include function.h and toplev.h.
(i370_label_scan): Remove c++ commented abort.
* i370/i370.h (HANDLE_PRAGMA): Takes three arguments.
(ASM_OUTPUT_LABELREF): Fix TOUPPER/else broken 16 Sept.
* i370/xm-i370.h (HOST_BITS_PER_LONGLONG): Define.
* i370/xm-mvs.h, i370/xm-oe.h: Likewise.
From-SVN: r30021
Diffstat (limited to 'gcc/config/i370')
| -rw-r--r-- | gcc/config/i370/i370.c | 4 | ||||
| -rw-r--r-- | gcc/config/i370/i370.h | 8 | ||||
| -rw-r--r-- | gcc/config/i370/xm-i370.h | 1 | ||||
| -rw-r--r-- | gcc/config/i370/xm-mvs.h | 1 | ||||
| -rw-r--r-- | gcc/config/i370/xm-oe.h | 1 |
5 files changed, 8 insertions, 7 deletions
diff --git a/gcc/config/i370/i370.c b/gcc/config/i370/i370.c index e683027..6957b5d 100644 --- a/gcc/config/i370/i370.c +++ b/gcc/config/i370/i370.c @@ -33,9 +33,10 @@ Boston, MA 02111-1307, USA. */ #include "insn-flags.h" #include "output.h" #include "insn-attr.h" -/* #include "function.h" */ +#include "function.h" #include "flags.h" #include "recog.h" +#include "toplev.h" extern FILE *asm_out_file; @@ -473,7 +474,6 @@ i370_label_scan (void) last week, and so we punt for now. */ debug_rtx (insn); -// abort(); for (j=0; j < XVECLEN (body, 0); j++) { int labelno; diff --git a/gcc/config/i370/i370.h b/gcc/config/i370/i370.h index 45da9fa..4ecc07d 100644 --- a/gcc/config/i370/i370.h +++ b/gcc/config/i370/i370.h @@ -152,7 +152,8 @@ extern int mvs_function_name_length; text can be read. CH is the first character after the #pragma. The result of the expression is the terminating character found (newline or EOF). */ -#define HANDLE_PRAGMA(FILE, NODE) handle_pragma ((FILE), (NODE)) +#define HANDLE_PRAGMA(FILE, ungetc_unused, NODE) \ + handle_pragma ((FILE), (NODE)) #endif /* TARGET_HLASM */ /* Define maximum length of page minus page escape overhead. */ @@ -1137,10 +1138,7 @@ enum reg_class else \ ch = '@'; \ for (bp = temp; *bp; bp++) \ - { \ - *bp = TOUPPER (*bp); \ - else if (*bp == '_') *bp = ch; \ - } \ + *bp = (*bp == '_' ? ch : TOUPPER (*bp)); \ fprintf (FILE, "%s", temp); \ } diff --git a/gcc/config/i370/xm-i370.h b/gcc/config/i370/xm-i370.h index ac75363..b80efb9 100644 --- a/gcc/config/i370/xm-i370.h +++ b/gcc/config/i370/xm-i370.h @@ -31,6 +31,7 @@ Boston, MA 02111-1307, USA. */ #define HOST_BITS_PER_SHORT 16 #define HOST_BITS_PER_INT 32 #define HOST_BITS_PER_LONG 32 +#define HOST_BITS_PER_LONGLONG 64 #define HOST_FLOAT_FORMAT IBM_FLOAT_FORMAT #define HOST_EBCDIC 1 diff --git a/gcc/config/i370/xm-mvs.h b/gcc/config/i370/xm-mvs.h index d764eb3..f43a840 100644 --- a/gcc/config/i370/xm-mvs.h +++ b/gcc/config/i370/xm-mvs.h @@ -31,6 +31,7 @@ Boston, MA 02111-1307, USA. */ #define HOST_BITS_PER_SHORT 16 #define HOST_BITS_PER_INT 32 #define HOST_BITS_PER_LONG 32 +#define HOST_BITS_PER_LONGLONG 64 #define HOST_FLOAT_FORMAT IBM_FLOAT_FORMAT #define HOST_EBCDIC 1 diff --git a/gcc/config/i370/xm-oe.h b/gcc/config/i370/xm-oe.h index 22e7bfa..370ec09 100644 --- a/gcc/config/i370/xm-oe.h +++ b/gcc/config/i370/xm-oe.h @@ -34,6 +34,7 @@ Boston, MA 02111-1307, USA. */ #define HOST_BITS_PER_SHORT 16 #define HOST_BITS_PER_INT 32 #define HOST_BITS_PER_LONG 32 +#define HOST_BITS_PER_LONGLONG 64 #define HOST_FLOAT_FORMAT IBM_FLOAT_FORMAT #define HOST_EBCDIC 1 |