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.400 2007/06/26 17:11:56 grubba Exp $ + // $Id: master.pike.in,v 1.401 2007/06/26 17:15:21 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:760:      //! Find the files in which @[mod] is defined, as they may be hidden away in   //! joinnodes and dirnodes   //!   //! @param mod   //! The module we are looking for.   //!   //! @returns   //! An array of strings with filenames.   //! (one for each file in a joinnode, or just one otherwise) - array(string) module_defined(object mod) + array(string) module_defined(object|program mod)   {    array files = ({}); -  if (!objectp(mod) && programp(mod)) +  if (programp(mod))    return ({ Builtin()->program_defined([program]mod) });       array mods;    if (mod->is_resolv_joinnode)    mods = mod->joined_modules;    else    mods = ({ mod });       foreach (mods;; object mod)    {