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.475 2010/07/28 22:50:57 mast Exp $ + // $Id: master.pike.in,v 1.476 2010/07/28 22:58:01 mast Exp $      #pike __REAL_VERSION__   //#pragma strict_types      //! @appears predef::MasterObject   //!   //! Master control program for Pike.   //!   //! @seealso   //! @[predef::master()], @[predef::replace_master()]
pike.git/lib/master.pike.in:5092:    if (!objectp (value) || !value->is_resolv_dirnode ||    program_path_to_name (value->dirname) != name)    break check_dirnode;    ENC_MSG (" joinnode has consistent name %O\n", name);    if (string|array ref = compare_resolved (name, what, resolv (name),    module_object))    ENC_RETURN (ref);    }    }    +  else if (what->is_pike_master) { +  ENC_MSG (" is a master object\n"); +  ENC_RETURN ("o/master"); +  } +     program prog;    if ((prog = objects_reverse_lookup (what)))    ENC_MSG (" found program in objects: %O\n", prog);   #if 0    else if ((prog = object_program (what)))    ENC_MSG (" got program of object: %O\n", prog);   #endif       if (prog) {    if (prog == encoded) ENC_RETURN ("o");