pike.git / src / dumpmaster.pike

version» Context lines:

pike.git/src/dumpmaster.pike:54:    mixed encode_object(object o)    {    if (o->_encode) return o->_encode();    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 + #define CONST(X) if (x == X) return #X    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._Stdio()->Fd(fakeroot(argv[-1]) + ".o","wct")->write(s);    exit(0);   }      mixed resolv() { return UNDEFINED; }