pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
2002-12-03
2002-12-03 21:17:58 by Martin Nilsson <mani@lysator.liu.se>
9852f733bb2e8768a09996c8d3a32ae070b0abcd (
25
lines) (+
17
/-
8
)
[
Show
|
Annotate
]
Branch:
7.9
Improved some _sprintf
Rev: lib/master.pike.in:1.235
6:
// Pike is distributed under GPL, LGPL and MPL. See the file COPYING // for more information. //
-
// $Id: master.pike.in,v 1.
234
2002/12/
01
23
:
47
:
00
mast
Exp $
+
// $Id: master.pike.in,v 1.
235
2002/12/
03
21
:
17
:
58
nilsson
Exp $
#pike __REAL_VERSION__
1059:
string _sprintf(int as) {
-
return sprintf("master()->dirnode(%O)",dirname);
+
return
as=='O' &&
sprintf("master()->dirnode(%O)",dirname);
} };
1074:
string _sprintf(int as) {
-
return sprintf("master()->joinnode(%O)",joined_modules);
+
return
as=='O' &&
sprintf("master()->joinnode(%O)",joined_modules);
} void create(array(object|mapping) _joined_modules)
1518:
return master_read_file(f); }
-
string _sprintf()
+
string _sprintf(
int t
)
{
-
return sprintf("CompatResolver(%
s
)",ver);
+
return
t=='O' &&
sprintf("CompatResolver(%
O
)",ver);
} }
2855:
int `==(Version v) { return CMP(v)== 0; } int _hash() { return major * 4711 + minor ; }
-
string _sprintf() { return sprintf("%d.%d",major,minor); }
+
string _sprintf(
int t
) {
+
switch(t) {
+
case 's':
return sprintf("%d.%d",major,minor);
+
case 'O': return sprintf("%O(%s)", this_program, this_object());
+
}
+
}
//! The version object can be casted into a string. mixed cast(string type)
2978:
return ret; }
-
string _sprintf()
+
string _sprintf(
int t
)
{
-
return "master()";
+
switch(t) {
+
case 't':
return "master
";
+
case 'O': return "master
()";
}
-
+
}