Mercurial > octave
comparison src/input.cc @ 217:cd2e49fb4f6b
[project @ 1993-11-13 09:16:01 by jwe]
author | jwe |
---|---|
date | Sat, 13 Nov 1993 09:30:40 +0000 |
parents | 13c6086c325c |
children | a99f28f5e351 |
comparison
equal
deleted
inserted
replaced
216:e83d64b26659 | 217:cd2e49fb4f6b |
---|---|
265 | 265 |
266 if (name && *name) | 266 if (name && *name) |
267 instream = fopen (name, "r"); | 267 instream = fopen (name, "r"); |
268 | 268 |
269 if (instream == (FILE *) NULL && warn) | 269 if (instream == (FILE *) NULL && warn) |
270 message (name, "no such file or directory"); | 270 warning ("%s: no such file or directory", name); |
271 | 271 |
272 if (reading_m_file || reading_script_file) | 272 if (reading_m_file || reading_script_file) |
273 mf_instream = instream; | 273 mf_instream = instream; |
274 else | 274 else |
275 rl_instream = instream; | 275 rl_instream = instream; |