pike.git/
src/
lex.c
Branch:
Tag:
Non-build tags
All tags
No tags
1997-01-31
1997-01-31 23:09:03 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
d72bae839bf4ba527698e0d96c2fab09a524399c (
9
lines) (+
7
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
better error messages added
Rev: src/lex.c:1.15
Rev: src/program.c:1.18
4:
||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h"
-
RCSID("$Id: lex.c,v 1.
14
1997/01/
30
03
:
51
:
34
hubbe Exp $");
+
RCSID("$Id: lex.c,v 1.
15
1997/01/
31
23
:
09
:
02
hubbe Exp $");
#include "language.h" #include "array.h" #include "lex.h"
1032:
{ if(errno == EINTR) goto retry;
-
my_yyerror("Couldn't open file to include '%s'.",sp[-1].u.string->str);
+
#ifdef
HAVE_STRERROR
+
my_yyerror("Couldn't open file to include '%s'.
(%s)
",sp[-1].u.string->str
,strerror(errno
)
)
;
+
#else
+
my_yyerror("Couldn't open file to include '%s'. (ERRNO=%d)",sp[-1].u.string->str,errno);
+
#endif
return; }