pike.git / src / dumpmaster.pike

version» Context lines:

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. - || $Id: dumpmaster.pike,v 1.9 2002/10/11 02:06:25 nilsson Exp $ + || $Id: dumpmaster.pike,v 1.10 2002/10/11 02:39:03 nilsson Exp $   */    - #define UNDEFINED (([])[0]) -  +    string fr;      array encoded=({});      void handle_error(mixed err)   {    foreach(encoded, mixed o)    {    werror("***Failed to encode %t: %O\n",o,o);   #if constant(_describe)    _describe(o);   #endif    }       werror("%O\n",err);   }      void compile_error(string file,int line,string err)   { -  werror(sprintf("%s:%s:%s\n",file, line?(string)line:"-",err)); +  werror("%s:%s:%s\n", file, line?(string)line:"-", err);   }      string fakeroot(string s)   {    if(fr) s=fr+combine_path(getcwd(),s);    return s;   }      string read_file(string s)   {
pike.git/src/dumpmaster.pike:53:    switch(x)    {   #define CONST(X) case X: return #X    CONST(_static_modules.files.Stat);    CONST(_static_modules.Builtin.__backend);    }    encoded+=({x});    return UNDEFINED;    }   } - void _main(string *argv, string *env) +  + void _main(array(string) argv, array(string) env)   {    foreach(argv[1..sizeof(argv)-2], string f) -  sscanf(f,"--fakeroot=%s",fr); +  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);    exit(0);   }    -  - mixed resolv() { return ([])[0]; } + mixed resolv() { return UNDEFINED; }