pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
1999-12-29
1999-12-29 18:46:00 by Martin Stjernholm <mast@lysator.liu.se>
58f1af06b323366567b4f56d948bc38441fa975f (
9
lines) (+
6
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Show line number 0 as "-" in compilation errors and warnings.
Rev: lib/master.pike.in:1.90
1:
/* -*- Pike -*- *
-
* $Id: master.pike.in,v 1.
89
1999/12/
28
03
:
40
:
19
mast Exp $
+
* $Id: master.pike.in,v 1.
90
1999/12/
29
18
:
46
:
00
mast Exp $
* * Master-file for Pike. *
1118:
#endif /* constant(thread_local) */ )) {
-
werror(sprintf("%s:%
d
:%s\n",trim_file_name(file),line,err));
+
werror(sprintf("%s:%
s
:%s\n",trim_file_name(file),
+
line
?(string)line:"-"
,err));
} else if(objectp(val) || programp(val) ||
1149:
)) { if(want_warnings)
-
werror(sprintf("%s:%
d
: Warning: %s\n",trim_file_name(file),line,err));
+
werror(sprintf("%s:%
s
: Warning: %s\n",trim_file_name(file),
+
line
?(string)line:"-"
,err));
} else if (objectp(val) && val->compile_warning) { val->compile_warning(file, line, err); }