pike.git
/
lib
/
master.pike.in
version
»
Context lines:
10
20
40
80
file
none
3
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.
354
2004/07/04
14
:
51
:
19
mast
Exp $
+
// $Id: master.pike.in,v 1.
355
2004/07/04
16
:
28
:
23
srb
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:88:
// Have to access some stuff without going through the resolver. private constant Builtin = _static_modules.Builtin; private constant Files = _static_modules.files; #define Stat Files.Stat #define capitalize(X) (upper_case((X)[..0])+(X)[1..]) #define write(X ...) (Files()->_stdout->write(X)) #define trim_all_whites(X) (Builtin()->string_trim_all_whites (X))
+
//! @appears void werror(string msg, mixed ... args)
+
//!
+
//! Write to standard error.
+
//!
+
void werror(mixed ... args) {
+
_werror(@args);
+
}
+
#ifdef RESOLV_DEBUG #if constant (thread_local) static object resolv_msg_depth = thread_local(); // NOTE: May be used before __INIT has completed. #define GET_RESOLV_MSG_DEPTH (resolv_msg_depth && resolv_msg_depth->get()) #define INC_RESOLV_MSG_DEPTH() (resolv_msg_depth && resolv_msg_depth->set (resolv_msg_depth->get() + 1)) #define DEC_RESOLV_MSG_DEPTH() (resolv_msg_depth && resolv_msg_depth->set (resolv_msg_depth->get() - 1)) #else static int resolv_msg_depth;
pike.git/lib/master.pike.in:1051:
"add_module_path", "remove_module_path", "add_program_path", "remove_program_path", "describe_backtrace", "describe_error", "get_backtrace", "normalize_path", "getenv", "putenv",
+
"werror",
#ifdef GETCWD_CACHE "cd", "getcwd", #endif }); string include_prefix;