pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:150:   #define INC_RESOLV_MSG_DEPTH() 0   #define DEC_RESOLV_MSG_DEPTH() 0   #define resolv_debug(X...) do {} while (0)   #endif // !RESOLV_DEBUG      constant no_value = (<>);   constant NoValue = typeof (no_value);      // Some API compatibility stuff.    - //! Pike 7.2 master compatibility interface. + //! Pike 7.4 master compatibility interface.   //!   //! Most of the interface is implemented via mixin,   //! or overloading by more recent masters.   //!   //! This interface is used for compatibility with - //! Pike 7.2. + //! Pike 7.4.   //!   //! @deprecated predef::MasterObject   //!   //! @seealso   //! @[get_compat_master()], @[master()], @[predef::MasterObject] - protected class Pike_7_2_master + protected class Pike_7_4_master   {    extern array(string) pike_include_path;    extern array(string) pike_module_path;    extern array(string) pike_program_path;   #ifdef GETCWD_CACHE    extern string current_path;    int cd(string s);    string getcwd();   #endif    string combine_path_with_cwd(string path);
pike.git/lib/master.pike.in:219:    //! possible.       string|mapping(string:string) getenv(string|void s);    void putenv(string|void varname, string|void value);       // compat_environment is the mapping returned by `environment    // (if any).    // compat_environment_copy is used to keep track of any changes    // performed destructively on the compat_environment mapping.    // Both should be zero if not in use. +  // Removed in Pike 7.8.    protected mapping(string:array(string)) compat_environment;    protected mapping(string:array(string)) compat_environment_copy;      #pragma no_deprecation_warnings    local __deprecated__(mapping(string:array(string))) `environment()    {    if (compat_environment) return compat_environment;    compat_environment_copy = ([]);   #ifdef __NT__    // Can't use the cached environment returned by getenv(), since
pike.git/lib/master.pike.in:260:   #pragma deprecation_warnings       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);    void remove_program_path(string tmp);    mapping(string:program|NoValue) programs;    -  //! Make a new instance of a class. -  //! -  //! @note -  //! This function should not be used. It is here for -  //! compatibility reasons only. -  local __deprecated__ object new(mixed prog, mixed ... args) -  { -  if(stringp(prog)) -  prog=cast_to_program(prog,backtrace()[-2][0]); -  return prog(@args); -  } -  +     void create();    extern mapping(program:object) objects;    object cast_to_object(string oname, string current_file);    class dirnode {};    extern string _master_file_name;    void _main(array(string) orig_argv, array(string) env);    extern mixed inhibit_compile_errors;    void set_inhibit_compile_errors(mixed f);    string trim_file_name(string s);    void compile_error(string file,int line,string err);
pike.git/lib/master.pike.in:297:    string basename(string x);    object low_cast_to_object(string oname, string current_file);    extern int want_warnings;    program compile_string(string data, void|string name);    program compile_file(string file);      #if constant(_static_modules.Builtin.mutex)    extern object compilation_mutex;   #endif    -  local __deprecated__(function) clone = new; +     constant master_efuns = ({});    class joinnode {};    extern mapping(string:mixed) fc;    extern string _pike_file_name;    void compile_warning(string file,int line,string err);    string read_include(string f);    -  string describe_program(program p); +     class Codec {};       constant bt_max_string_len = 1;    constant out_of_date_warning = 1;   #ifdef PIKE_FAKEROOT    extern object o;    string fakeroot(string s);   #endif   #ifdef PIKE_AUTORELOAD    extern int autoreload_on;
pike.git/lib/master.pike.in:353:   #endif    extern int compat_major;    extern int compat_minor;    Stat master_file_stat(string x);    object low_cast_to_object(string oname, string current_file,    object|void current_handler);    object findmodule(string fullname, object|void handler);    extern multiset no_resolv;    extern string ver;    mapping get_default_module(); -  local protected 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); -  } +     void runtime_warning(string where, string what, mixed ... args);    protected int clipped;    protected int canclip;    protected string stupid_describe(mixed m, int maxlen);    protected string stupid_describe_comma_list(array x, int maxlen);    class Describer {};    string describe_function(function f);    class CompatResolver {};    int(0..1) asyncp();    class Version {};    extern object currentversion;    extern mapping(object:object) compat_handler_cache;    object get_compilation_handler(int major, int minor); -  string _sprintf(int|void t); -  object get_compat_master(int major, int minor) -  { -  // 0.0 .. 7.2 -  if ((major < 7) || (major == 7) && (minor < 3)) -  return this_program::this; -  return get_compat_master(major, minor); -  } +     -  /* No missing symbols. */ - } +  // ---    - //! Pike 7.4 master compatibility interface. - //! - //! Most of the interface is implemented via mixin, - //! or overloading by more recent masters. - //! - //! This interface is used for compatibility with - //! Pike 7.3 and 7.4. - //! - //! @deprecated predef::MasterObject - //! - //! @seealso - //! @[get_compat_master()], @[master()], @[predef::MasterObject] - protected class Pike_7_4_master - { -  inherit Pike_7_2_master; +    #ifdef RESOLV_DEBUG    void resolv_debug (sprintf_format fmt, sprintf_args... args);   #endif    void error(sprintf_format f, sprintf_args ... args); - #ifdef GETCWD_CACHE -  protected extern string current_path; - #endif +     constant no_value = (<>);    constant NoValue = typeof (no_value);    string programs_reverse_lookup (program prog);    program objects_reverse_lookup (object obj);    string fc_reverse_lookup (object obj); -  // Hide clone() and new(). -  private local __deprecated__ object new(mixed prog, mixed ... args){} -  private local __deprecated__(function) clone = new; +     void unregister(program p);    program low_cast_to_program(string pname,    string current_file,    object|void handler,    void|int mkobj);    extern string include_prefix;    extern mapping(string:string) predefines;    // FIXME: Not in 7.7!    extern CompatResolver parent_resolver;    void add_predefine (string name, string value);
pike.git/lib/master.pike.in:469:    local protected object Pike_7_4_compat_handler;    local mixed resolv(string identifier, string|void current_file)    {    if (!Pike_7_4_compat_handler) {    Pike_7_4_compat_handler = global::get_compilation_handler(7, 4);    }    return Pike_7_4_compat_handler->resolv(identifier, current_file);    }    object get_compat_master(int major, int minor)    { -  if ((major < 7) || ((major == 7) && (minor < 3))) -  return Pike_7_2_master::get_compat_master(major, minor); -  // 7.3 & 7.4 -  if ((major == 7) && (minor < 5)) +  // 0.0 .. 7.4 +  if ((major < 7) || (major == 7) && (minor < 5))    return this_program::this;    return get_compat_master(major, minor); -  +     }       /* No missing symbols. */   }      //! Pike 7.6 master compatibility interface.   //!   //! Most of the interface is implemented via mixin,   //! or overloading by more recent masters.   //!