pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:1:   // -*- Pike -*-   //   // Master Control Program for Pike.   //   // 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: master.pike.in,v 1.426 2008/05/29 17:36:41 grubba Exp $ + // $Id: master.pike.in,v 1.427 2008/05/29 18:12:12 grubba Exp $      #pike __REAL_VERSION__   //#pragma strict_types      // Some programs destroys character pairs beginning with the currency   // symbol when running in chinese locale.   #if "ยค/" != "\244/"   #error "master.pike.in is corrupted."   #endif   
pike.git/lib/master.pike.in:156:    extern string current_path;    int cd(string s);    string getcwd();   #endif    string combine_path_with_cwd(string path);   #ifdef FILE_STAT_CACHE    extern int invalidate_time;    extern mapping(string:multiset(string)) dir_cache;    local array(mixed) master_file_stat(string x)    { -  return (array)global::master_file_stat(x); +  Stat st = global::master_file_stat(x); +  return st && (array)st;    }   #endif    mapping (string:array(string)) environment;    mixed getenv(string|void s);    void putenv(string var, string val);    void add_include_path(string tmp);    void remove_include_path(string tmp);    void add_module_path(string tmp);    void remove_module_path(string tmp);    void add_program_path(string tmp);
pike.git/lib/master.pike.in:469:      static class Pike_7_2_master   {    inherit Pike_7_0_master;   #ifdef PIKE_MODULE_RELOC    string relocate_module(string s);    string unrelocate_module(string s);   #endif    extern int compat_major;    extern int compat_minor; + #ifdef FILE_STAT_CACHE    Stat master_file_stat(string x); -  + #endif    object low_cast_to_object(string oname, string current_file,    object|void current_handler);    object findmodule(string fullname, object|void handler);    local static object Pike_7_2_compat_handler;    local mixed resolv(string identifier, string|void current_file)    {    if (!Pike_7_2_compat_handler) {    Pike_7_2_compat_handler = global::get_compilation_handler(7, 2);    }    return Pike_7_2_compat_handler->resolv(identifier, current_file);
pike.git/lib/master.pike.in:493:    static int canclip;    static string stupid_describe(mixed m, int maxlen);    static string stupid_describe_comma_list(array x, int maxlen);    class Describer {};    string describe_function(function f);    class CompatResolver {};    class Version {};    extern object currentversion;    extern mapping(object:object) compat_handler_cache;    object get_compilation_handler(int major, int minor); -  string _sprintf(); +  local string _sprintf(int|void t) +  { +  return UNDEFINED; +  }    object get_compat_master(int major, int minor)    {    if ((major > 0) || (minor > 6)) return Pike_7_0_master::this;    return Pike_7_0_master::get_compat_master(major, minor);    }   }      static class Pike_7_4_master   {    inherit Pike_7_2_master;