diff options
-rw-r--r-- | gcc/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/config/alpha/alpha.c | 6 |
2 files changed, 11 insertions, 0 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 74736d6..6f414a0 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2009-08-11 Douglas B Rupp <rupp@gnat.com> + + * config/alpha/alpha.c (alpha_init_builtins): Nullify FWRITE and + FWRITE_UNLOCKED. + 2009-08-11 Vasiliy Fofanov <fofanov@adacore.com> Eric Botcazou <botcazou@adacore.com> Douglas B Rupp <rupp@gnat.com> diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index ccf9288..532e130 100644 --- a/gcc/config/alpha/alpha.c +++ b/gcc/config/alpha/alpha.c @@ -6633,6 +6633,12 @@ alpha_init_builtins (void) dimode_integer_type_node = lang_hooks.types.type_for_mode (DImode, 0); + /* Fwrite on VMS is non-standard. */ +#if TARGET_ABI_OPEN_VMS + implicit_built_in_decls[(int) BUILT_IN_FWRITE] = NULL_TREE; + implicit_built_in_decls[(int) BUILT_IN_FWRITE_UNLOCKED] = NULL_TREE; +#endif + ftype = build_function_type (dimode_integer_type_node, void_list_node); alpha_add_builtins (zero_arg_builtins, ARRAY_SIZE (zero_arg_builtins), ftype); |