From 9b2db7be3276b7ee360e7eb5794afa7f9941d923 Mon Sep 17 00:00:00 2001 From: Janus Weil Date: Mon, 18 May 2009 15:56:44 +0200 Subject: [PATCH] intrinsic.c (add_sym): Fix my last commit (r147655), which broke bootstrap. 2009-05-18 Janus Weil * intrinsic.c (add_sym): Fix my last commit (r147655), which broke bootstrap. From-SVN: r147662 --- gcc/fortran/ChangeLog | 5 +++++ gcc/fortran/intrinsic.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 7a37d0e123b..f7e47fc496a 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2009-05-18 Janus Weil + + * intrinsic.c (add_sym): Fix my last commit (r147655), + which broke bootstrap. + 2009-05-18 Richard Guenther PR fortran/40168 diff --git a/gcc/fortran/intrinsic.c b/gcc/fortran/intrinsic.c index 5d2747a1526..0b16a727778 100644 --- a/gcc/fortran/intrinsic.c +++ b/gcc/fortran/intrinsic.c @@ -303,7 +303,7 @@ add_sym (const char *name, gfc_isym_id id, enum klass cl, int actual_ok, bt type type = (bt) va_arg (argp, int); kind = va_arg (argp, int); optional = va_arg (argp, int); - intent = va_arg (argp, int); + intent = (sym_intent) va_arg (argp, int); if (sizing != SZ_NOTHING) nargs++; -- 2.30.2