diff --git a/lib/master.pike.in b/lib/master.pike.in index 08e13f8448727adeca3fceb71fa91a5ddbb44cb8..7eaabdd8fcdefdb9c8b5daf1f7be7f00a9d98598 100644 --- a/lib/master.pike.in +++ b/lib/master.pike.in @@ -1,4 +1,4 @@ -/* $Id: master.pike.in,v 1.24 1998/04/29 16:00:57 grubba Exp $ +/* $Id: master.pike.in,v 1.25 1998/04/30 15:29:49 grubba Exp $ * * Master-file for Pike. * @@ -532,6 +532,9 @@ mixed resolv(string identifier, string|void current_file) return UNDEFINED; } +// These are useful if you want to start other Pike processes +// with the same options as this one was started with. +string _pike_file_name; string _master_file_name; /* This function is called when all the driver is done with all setup @@ -549,6 +552,8 @@ void _main(string *orig_argv, string *env) string a,b; mixed *q; + _pike_file_name = orig_argv[0]; + foreach(env,a) if(sscanf(a,"%s=%s",a,b)) environment[a]=b; // add path for architecture-shared files