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.315 2003/12/18 21:28:02 marcus Exp $ + // $Id: master.pike.in,v 1.316 2003/12/18 22:39:35 marcus 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:1627:    void _decode (array(object) joined_modules)    {    this_program::joined_modules = joined_modules;    }   };      joinnode handle_import(string path, string|void current_file,    object|void current_handler)   {    array(string) tmp; + #ifdef __amigaos__ +  if(path == ".") +  path = ""; + #endif    if(current_file)    {    tmp=EXPLODE_PATH(current_file);    tmp[-1] = path;    path=combine_path_with_cwd( tmp*"/");    } else {    path = combine_path_with_cwd(path);    }       // FIXME: Need caching!!!