* input.c (feed_input): Add file, line parms.
* lex.c (begin_definition_of_inclass_inline, feed_defarg): Adjust.
(real_yylex): Check linemode before input_redirected().
* typeck.c (c_expand_return): Downgrade pedwarn about returning NULL
from op new to warning.
From-SVN: r28276
+1999-07-26 Jason Merrill <jason@yorick.cygnus.com>
+
+ * input.c (feed_input): Add file, line parms.
+ * lex.c (begin_definition_of_inclass_inline, feed_defarg): Adjust.
+ (real_yylex): Check linemode before input_redirected().
+
+ * typeck.c (c_expand_return): Downgrade pedwarn about returning NULL
+ from op new to warning.
+
1999-07-26 Mark Mitchell <mark@codesourcery.com>
* cp-tree.h (ncp_convert): Rename to perform_implicit_conversion.
extern int yy_get_token ();
#endif
-extern void feed_input PROTO((char *, int));
+extern void feed_input PROTO((char *, int, char *, int));
extern void put_input PROTO((int));
extern void put_back PROTO((int));
extern int getch PROTO((void));
inline
void
-feed_input (str, len)
+feed_input (str, len, file, line)
char *str;
int len;
+ char *file;
+ int line;
{
struct input_source *inp = allocate_input ();
my_friendly_abort (990710);
cpp_push_buffer (&parse_in, str, len);
CPP_BUFFER (&parse_in)->manual_pop = 1;
+ CPP_BUFFER (&parse_in)->nominal_fname
+ = CPP_BUFFER (&parse_in)->fname = file;
+ CPP_BUFFER (&parse_in)->lineno = line;
#else
inp->str = str;
inp->length = len;
putback.buffer = NULL;
putback.buffer_size = 0;
putback.index = -1;
+ lineno = line;
+ input_filename = file;
#endif
inp->next = input;
inp->filename = input_filename;
if (context)
push_cp_function_context (context);
- feed_input (pi->buf, pi->len);
- lineno = pi->lineno;
- input_filename = pi->filename;
+ feed_input (pi->buf, pi->len, pi->filename, pi->lineno);
yychar = PRE_PARSED_FUNCTION_DECL;
yylval.ttype = build_tree_list ((tree) pi, pi->fndecl);
/* Pass back a handle to the rest of the inline functions, so that they
tree f, p;
{
tree d = TREE_PURPOSE (p);
- feed_input (DEFARG_POINTER (d), DEFARG_LENGTH (d));
+ char *file;
+ int line;
if (TREE_CODE (f) == FUNCTION_DECL)
{
- lineno = DECL_SOURCE_LINE (f);
- input_filename = DECL_SOURCE_FILE (f);
+ line = DECL_SOURCE_LINE (f);
+ file = DECL_SOURCE_FILE (f);
}
+ else
+ {
+ line = lineno;
+ file = input_filename;
+ }
+
+ feed_input (DEFARG_POINTER (d), DEFARG_LENGTH (d), file, line);
yychar = DEFARG_MARKER;
yylval.ttype = p;
}
case EOF:
end_of_file = 1;
token_buffer[0] = 0;
- if (input_redirected ())
- value = END_OF_SAVED_INPUT;
- else if (linemode)
+ if (linemode)
value = END_OF_LINE;
+ else if (input_redirected ())
+ value = END_OF_SAVED_INPUT;
else
value = ENDFILE;
break;
|| DECL_NAME (current_function_decl) == ansi_opname[(int) VEC_NEW_EXPR])
&& !TYPE_NOTHROW_P (TREE_TYPE (current_function_decl))
&& null_ptr_cst_p (retval))
- cp_pedwarn ("operator new should throw an exception, not return NULL");
+ cp_warning ("operator new should throw an exception, not return NULL");
if (retval == NULL_TREE)
{