Mercurial > hg > octave-lyh
comparison src/parse.y @ 5312:80c1aa832cb2
[project @ 2005-04-28 01:54:46 by jwe]
author | jwe |
---|---|
date | Thu, 28 Apr 2005 01:54:46 +0000 |
parents | 15031c6fab31 |
children | b427cca320b8 |
comparison
equal
deleted
inserted
replaced
5311:46de0f964c1b | 5312:80c1aa832cb2 |
---|---|
3330 | 3330 |
3331 return script_file_executed; | 3331 return script_file_executed; |
3332 } | 3332 } |
3333 | 3333 |
3334 bool | 3334 bool |
3335 load_fcn_from_file (symbol_record *sym_rec, bool exec_script) | 3335 load_fcn_from_file (const std::string& nm, bool exec_script) |
3336 { | 3336 { |
3337 bool script_file_executed = false; | 3337 bool script_file_executed = false; |
3338 | |
3339 std::string nm = sym_rec->name (); | |
3340 | 3338 |
3341 string_vector names (2); | 3339 string_vector names (2); |
3342 | 3340 |
3343 names[0] = nm + ".oct"; | 3341 names[0] = nm + ".oct"; |
3344 names[1] = nm + ".m"; | 3342 names[1] = nm + ".m"; |
3373 | 3371 |
3374 unwind_protect::run_frame ("load_fcn_from_file"); | 3372 unwind_protect::run_frame ("load_fcn_from_file"); |
3375 } | 3373 } |
3376 | 3374 |
3377 return script_file_executed; | 3375 return script_file_executed; |
3376 } | |
3377 | |
3378 bool | |
3379 load_fcn_from_file (symbol_record *sym_rec, bool exec_script) | |
3380 { | |
3381 return load_fcn_from_file (sym_rec->name (), exec_script); | |
3378 } | 3382 } |
3379 | 3383 |
3380 void | 3384 void |
3381 source_file (const std::string file_name) | 3385 source_file (const std::string file_name) |
3382 { | 3386 { |