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.390 2007/01/01 04:50:15 nilsson Exp $ + // $Id: master.pike.in,v 1.391 2007/01/25 00:11:38 bill 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:1192:    add_include_path("¤lib_prefix¤/include");    add_module_path("¤lib_prefix¤/modules");   #endif      #if "¤include_prefix¤"[0]!='¤'    include_prefix = "¤include_prefix¤";   #endif   #if "¤doc_prefix¤"[0]!='¤'    doc_prefix = "¤doc_prefix¤";   #endif +  + #if constant(__embedded_resource_directory) +  // for use with embedded interpreters +  // add path for architecture-dependant files +  add_include_path(__embedded_resource_directory + "/lib/include"); +  add_module_path(__embedded_resource_directory + "/lib/modules"); + #endif +     system_module_path=pike_module_path;    if (master() && master() != this_object()) {    // getenv() and putenv() will get confused if we don't do this.    environment = master()->environment || environment;    }   }         //! This function is called whenever a inherit is called for.   //! It is supposed to return the program to inherit.