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.227 2002/11/24 16:46:33 grubba Exp $ + // $Id: master.pike.in,v 1.228 2002/11/24 18:20:09 grubba Exp $      #pike __REAL_VERSION__      // Some programs destroys character pairs beginning with the currency   // symbol when running in chinese locale.   #if "ยค/" != "\244/"   #error "master.pike.in is corrupted."   #endif      // --- Some configurable parameters
pike.git/lib/master.pike.in:2504:       return 0;   }      //!   string describe_program(program p)   {    string s;    if(!p) return 0;    -  if(s=get_clean_program_path(p, "program(", ")", "")) +  if(s=get_clean_program_path(p, "object_program(", ")", ""))    return s;       if(mixed tmp=function_object(p))    {    return describe_module(tmp) + function_name(p);    }       if(s=_static_modules.Builtin()->program_defined(p))    return EXPLODE_PATH(s)[-1];