comparison src/parse.y @ 3095:528f4270e904

[project @ 1997-11-14 03:58:45 by jwe]
author jwe
date Fri, 14 Nov 1997 03:59:32 +0000
parents 18d64612e67a
children 8ce6fed79320
comparison
equal deleted inserted replaced
3094:f8e971946a4f 3095:528f4270e904
2871 2871
2872 if (! error_state) 2872 if (! error_state)
2873 { 2873 {
2874 file = file_ops::tilde_expand (file); 2874 file = file_ops::tilde_expand (file);
2875 2875
2876 parse_and_execute (file, false, "source"); 2876 parse_fcn_file (true, file);
2877 2877
2878 if (error_state) 2878 if (error_state)
2879 error ("source: error sourcing file `%s'", file.c_str ()); 2879 error ("source: error sourcing file `%s'", file.c_str ());
2880 } 2880 }
2881 else 2881 else