pike.git/ src/ lex.c

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;    }