pike.git
/
lib
/
master.pike.in
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/lib/master.pike.in:1791:
add_constant("__joinnode", joinnode); add_constant("write", write); add_constant("werror", werror); // To make it possible to overload get_dir and file_stat later on. // It's not possible to replace efuns with normal functions in .o-files add_constant("get_dir", high_master_get_dir ); add_constant("file_stat", lambda( string f, int|void d ) { return file_stat(f,d);} );
+
object rnd = Builtin.RandomSystem();
+
add_constant("random", rnd->random);
+
add_constant("random_string", rnd->random_string);
+
#define CO(X) add_constant(#X,Builtin.__backend->X) CO(call_out); CO(_do_call_outs); CO(find_call_out); CO(remove_call_out); CO(call_out_info); #if "#share_prefix#"[0]!='#' // add path for architecture-independant files add_include_path("#share_prefix#/include");
pike.git/lib/master.pike.in:3391:
default: exit(1, "Unknown path type %s\n", opts[1]); } exit(0); } exit(0, format_paths()); case "execute": main_resolv( "Gmp.bignum" );
-
random_seed((time() ^ (getpid()<<8)));
+
argv = tmp->get_args(argv,1); program prog; mixed compile_err = catch {; if (intp (opts[1])) prog = compile_string ("mixed run() {}"); else { string code = opts[1]; while(sscanf(code, "%sCHAR(%1s)%s", code, string c, string rest)==3) code += c[0] + rest;
pike.git/lib/master.pike.in:3473:
"\n" "pike binary..."+_pike_file_name+"\n"+ format_paths() + "\n" "Features......"+ main_resolv( "Tools.Install.features" )()*"\n "+ "\n"); exit(0); } main_resolv( "Gmp.bignum" );
-
random_seed(time() ^ (getpid()<<8));
+
if(sizeof(argv)==1) { if(run_tool) { werror("Pike -x specificed without tool name.\n" "Available tools:\n"); mapping t = ([]); int i; object ts = main_resolv("Tools.Standalone", get_compilation_handler(compat_major,