diff options
| author | Craig Burley <burley@gnu.org> | 1998-07-12 00:42:47 -0400 |
|---|---|---|
| committer | Dave Love <fx@gcc.gnu.org> | 1998-07-12 04:42:47 +0000 |
| commit | c264f1132eff86fec981bbbbfe2527663b82e941 (patch) | |
| tree | d415a88bcc22bcecfe176c6596720e0fc347559e /gcc | |
| parent | 3792922a1b72b6295589b53c29345be0b38a8e94 (diff) | |
| download | gcc-c264f1132eff86fec981bbbbfe2527663b82e941.zip gcc-c264f1132eff86fec981bbbbfe2527663b82e941.tar.gz gcc-c264f1132eff86fec981bbbbfe2527663b82e941.tar.bz2 | |
com.c (ffecom_expr_): Die if padding for constant is non-zero.
Sat Jul 11 18:24:37 1998 Craig Burley <burley@gnu.org>
* com.c (ffecom_expr_) [FFEBLD_opCONTER]: Die if padding
for constant is non-zero.
* com.c (__eprintf): Delete this function, it is obsolete.
From-SVN: r21078
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/f/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/f/com.c | 24 |
2 files changed, 8 insertions, 23 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index fb5e0bd..16be691 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,10 @@ +Sat Jul 11 18:24:37 1998 Craig Burley <burley@gnu.org> + + * com.c (ffecom_expr_) [FFEBLD_opCONTER]: Die if padding + for constant is non-zero. + + * com.c (__eprintf): Delete this function, it is obsolete. + 1998-07-09 Dave Love <d.love@dl.ac.uk> * intdoc.in (HOSTNM_func, HOSTNM_subr): Update last change. diff --git a/gcc/f/com.c b/gcc/f/com.c index 322b103..17993a9 100644 --- a/gcc/f/com.c +++ b/gcc/f/com.c @@ -2883,6 +2883,7 @@ ffecom_expr_ (ffebld expr, tree dest_tree, ffebld dest, return list; case FFEBLD_opCONTER: + assert (ffebld_conter_pad (expr) == 0); item = ffecom_constantunion (&ffebld_constant_union (ffebld_conter (expr)), bt, kt, tree_type); @@ -14817,29 +14818,6 @@ start_function (tree name, tree type, int nested, int public) /* Here are the public functions the GNU back end needs. */ -/* This is used by the `assert' macro. It is provided in libgcc.a, - which `cc' doesn't know how to link. Note that the C++ front-end - no longer actually uses the `assert' macro (instead, it calls - my_friendly_assert). But all of the back-end files still need this. */ -void -__eprintf (string, expression, line, filename) -#ifdef __STDC__ - const char *string; - const char *expression; - unsigned line; - const char *filename; -#else - char *string; - char *expression; - unsigned line; - char *filename; -#endif -{ - fprintf (stderr, string, expression, line, filename); - fflush (stderr); - abort (); -} - tree convert (type, expr) tree type, expr; |