63 #define gfc_is_whitespace(c) ((c==' ') || (c=='\t') || (c=='\f'))  argument
692 #define NAMED_INTCST(a,b,c,d) a,  argument
693 #define NAMED_KINDARRAY(a,b,c,d) a,  argument
694 #define NAMED_FUNCTION(a,b,c,d) a,  argument
695 #define NAMED_SUBROUTINE(a,b,c,d) a,  argument
696 #define NAMED_DERIVED_TYPE(a,b,c,d) a,  argument
709 #define NAMED_INTCST(a,b,c,d) a,  argument
710 #define NAMED_REALCST(a,b,c,d) a,  argument
711 #define NAMED_CMPXCST(a,b,c,d) a,  argument
712 #define NAMED_LOGCST(a,b,c) a,  argument
713 #define NAMED_CHARKNDCST(a,b,c) a,  argument
714 #define NAMED_CHARCST(a,b,c) a,  argument
715 #define DERIVED_TYPE(a,b,c) a,  argument
716 #define NAMED_FUNCTION(a,b,c,d) a,  argument
717 #define NAMED_SUBROUTINE(a,b,c,d) a,  argument
1782   gfc_component *c;  member
2018     c;  member
2139   gfc_resolve_f resolve;  member