pike.git / lib / master.pike.in

version» Context lines:

pike.git/lib/master.pike.in:864:    return Pike_7_4_master::get_compat_master(major, minor);    // 7.5 & 7.6    if ((major == 7) && (minor < 7))    return this_program::this;    return get_compat_master(major, minor);    }       /* No missing symbols. */   }    + //! Pike 7.8 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.7 and 7.8. + //! + //! @deprecated predef::MasterObject + //! + //! @seealso + //! @[get_compat_master()], @[master()], @[predef::MasterObject] + protected class Pike_7_8_master + { +  inherit Pike_7_6_master; +  +  local protected object Pike_7_8_compat_handler; +  local mixed resolv_or_error(string identifier, string|void current_file, +  void|object current_handler) +  { +  if (!Pike_7_8_compat_handler) { +  Pike_7_8_compat_handler = global::get_compilation_handler(7, 8); +  } +  return Pike_7_8_compat_handler->resolv_or_error(identifier, current_file, +  current_handler); +  } +  local mixed resolv(string identifier, string|void current_file) +  { +  if (!Pike_7_8_compat_handler) { +  Pike_7_8_compat_handler = global::get_compilation_handler(7, 8); +  } +  return Pike_7_8_compat_handler->resolv(identifier, current_file); +  } +  object get_compat_master(int major, int minor) +  { +  if ((major < 7) || ((major == 7) && (minor < 7))) +  return Pike_7_6_master::get_compat_master(major, minor); +  // 7.5 & 7.6 +  if ((major == 7) && (minor < 9)) +  return this_program::this; +  return get_compat_master(major, minor); +  } + } +    //! Namespaces for compat masters.   //!   //! This inherit is used to provide compatibility namespaces   //! for @[get_compat_master()].   //!   //! @seealso   //! @[get_compat_master()] - protected inherit Pike_7_6_master; + protected inherit Pike_7_8_master;      //! @appears error   //! Throws an error. A more readable version of the code   //! @expr{throw( ({ sprintf(f, @@args), backtrace() }) )@}.   void error(sprintf_format f, sprintf_args ... args) {    if (sizeof(args)) f = sprintf(f, @args);    throw( ({ f, backtrace()[..<1] }) );   }      // FIXME: Should the pikeroot-things be private?
pike.git/lib/master.pike.in:5844:      //! Return a master object compatible with the specified version of Pike.   //!   //! This function is used to implement the various compatibility versions   //! of @[master()].   //!   //! @seealso   //! @[get_compilation_handler()], @[master()]   object get_compat_master(int major, int minor)   { -  if ((major < 7) || ((major == 7) && (minor < 7))) -  return Pike_7_6_master::get_compat_master(major, minor); -  // 7.7 and later. +  if ((major < 7) || ((major == 7) && (minor < 9))) +  return Pike_7_8_master::get_compat_master(major, minor); +  // 7.9 and later.    return this;   }