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.360 2007/01/01 00:28:04 nilsson Exp $ + // $Id: master.pike.in,v 1.361 2009/03/05 11:48:00 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 -  +    // --- Some configurable parameters      #define PIKE_AUTORELOAD   #define GETCWD_CACHE   #define FILE_STAT_CACHE      // This define is searched and replaced by bin/install.pike.   #undef PIKE_MODULE_RELOC      #ifndef PIKE_WARNINGS
pike.git/lib/master.pike.in:1092:    add_constant("strlen", sizeof);    add_constant("write", Files()->_stdout->write);      #define CO(X) add_constant(#X,Builtin.__backend->X)    CO(call_out);    CO(_do_call_outs);    CO(find_call_out);    CO(remove_call_out);    CO(call_out_info);    - #if "¤share_prefix¤"[0]!='¤' + #if "#share_prefix#"[0]!='#'    // add path for architecture-independant files -  add_include_path("¤share_prefix¤/include"); -  add_module_path("¤share_prefix¤/modules"); +  add_include_path("#share_prefix#/include"); +  add_module_path("#share_prefix#/modules");   #endif    - #if "¤lib_prefix¤"[0]!='¤' + #if "#lib_prefix#"[0]!='#'    // add path for architecture-dependant files -  add_include_path("¤lib_prefix¤/include"); -  add_module_path("¤lib_prefix¤/modules"); +  add_include_path("#lib_prefix#/include"); +  add_module_path("#lib_prefix#/modules");   #endif    - #if "¤include_prefix¤"[0]!='¤' -  include_prefix = "¤include_prefix¤"; + #if "#include_prefix#"[0]!='#' +  include_prefix = "#include_prefix#";   #endif    system_module_path=pike_module_path;   }         //! This function is called whenever a inherit is called for.   //! It is supposed to return the program to inherit.   //! The first argument is the argument given to inherit, and the second   //! is the file name of the program currently compiling. Note that the   //! file name can be changed with #line, or set by compile_string, so
pike.git/lib/master.pike.in:4325:    return 0;    }       CompatResolver ret;       if(!zero_type(ret=compat_handler_cache[v])) return ret;       array(string) files;    array(Version) available=({});    - #if "¤share_prefix¤"[0]!='¤' -  if (!(files = get_dir("¤share_prefix¤"))) { + #if "#share_prefix#"[0]!='#' +  if (!(files = get_dir("#share_prefix#"))) {    werror ("Error listing directory %O: %s\n", -  "¤share_prefix¤", strerror (errno())); +  "#share_prefix#", strerror (errno()));    files = ({});    }    foreach(files, string ver)    {    if(sscanf(ver,"%d.%d",int maj, int min))    {    Version x=Version(maj, min) ;    if(x >= v)    available|=({ x });    }    }   #endif    - #if "¤lib_prefix¤"[0]!='¤' -  if (!(files = get_dir("¤lib_prefix¤"))) { + #if "#lib_prefix#"[0]!='#' +  if (!(files = get_dir("#lib_prefix#"))) {    werror ("Error listing directory %O: %s\n", -  "¤lib_prefix¤", strerror (errno())); +  "#lib_prefix#", strerror (errno()));    files = ({});    }    foreach(files, string ver)    {    if(sscanf(ver,"%d.%d",int maj, int min))    {    Version x=Version(maj, min) ;    if(x >= v)    available|=({ x });    }
pike.git/lib/master.pike.in:4396:    if (!compat_handler) {    // Create a new compat handler, that    // falls back to the successor version.    if (tmp <= Version(0, 6)) {    compat_handler = Pike06Resolver(tmp, ret);    } else {    compat_handler = CompatResolver(tmp, ret);    }       string base; - #if "¤lib_prefix¤"[0]!='¤' -  base=combine_path("¤lib_prefix¤",sprintf("%s",tmp)); + #if "#lib_prefix#"[0]!='#' +  base=combine_path("#lib_prefix#",sprintf("%s",tmp));    compat_handler->add_module_path(combine_path(base,"modules"));    compat_handler->add_include_path(combine_path(base,"include"));   #endif    - #if "¤share_prefix¤"[0]!='¤' -  base=combine_path("¤share_prefix¤",sprintf("%s",tmp)); + #if "#share_prefix#"[0]!='#' +  base=combine_path("#share_prefix#",sprintf("%s",tmp));    compat_handler->add_module_path(combine_path(base,"modules"));    compat_handler->add_include_path(combine_path(base,"include"));   #endif       // Kludge to avoid(?) recursive compilation problems. It was    // observed with a pike program containing    //    // #if constant (__builtin.security)    // #endif    //