pike.git
/
src
/
dumpmaster.pike
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/dumpmaster.pike:1:
/* || This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information. */ string fr; array encoded=({});
-
private function werror = _static_modules.
files
()->_stderr->write;
+
private function werror = _static_modules.
_Stdio
()->_stderr->write;
mapping get_default_module() { return 0; // Use the builitin default. } void handle_error(mixed err) { foreach(encoded, mixed o) {
pike.git/src/dumpmaster.pike:34:
} string fakeroot(string s) { if(fr) s=fr+combine_path(getcwd(),s); return s; } string read_file(string s) {
-
return _static_modules.
files
()->Fd(fakeroot(s),"r")->read();
+
return _static_modules.
_Stdio
()->Fd(fakeroot(s),"r")->read();
} program compile_file(string file) { return compile(cpp(read_file(file),file)); } class Codec { mixed encode_object(object o)
pike.git/src/dumpmaster.pike:57:
werror("Can't encode object %O without _encode function.\n", o); throw(({ "No _encode().\n", backtrace() })); } string nameof(mixed x) { if(mixed tmp=search(all_constants(),x)) return tmp; switch(x) { #define CONST(X) case X: return #X
-
CONST(_static_modules.
files
.Stat);
+
CONST(_static_modules.
_Stdio
.Stat);
CONST(_static_modules.Builtin.__backend); } encoded+=({x}); return UNDEFINED; } } void _main(array(string) argv, array(string) env) { foreach(argv[1..sizeof(argv)-2], string f) sscanf(f, "--fakeroot=%s", fr); program p=compile_file(argv[-1]); string s=encode_value(p, Codec());
-
_static_modules.
files
()->Fd(fakeroot(argv[-1]) + ".o","wct")->write(s);
+
_static_modules.
_Stdio
()->Fd(fakeroot(argv[-1]) + ".o","wct")->write(s);
exit(0); } mixed resolv() { return UNDEFINED; }