dlugolecki.net.pl
Dziennik
Polecane
Software
projects
/
gedcom-parse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added program to convert a GEDCOM file to standard GEDCOM.
[gedcom-parse.git]
/
gedcom
/
gedcom_lex_common.c
diff --git
a/gedcom/gedcom_lex_common.c
b/gedcom/gedcom_lex_common.c
index 779af3bde742a0ab1366c89ecad485000d40b956..4949346bb9b903a5f891e887b87ebd74aa1a18fe 100644
(file)
--- a/
gedcom/gedcom_lex_common.c
+++ b/
gedcom/gedcom_lex_common.c
@@
-91,9
+91,10
@@
int test_loop(ENCODING enc, const char* code)
/* These are defined as functions here, because xgettext has trouble
extracting the strings out of long pre-processor defined */
/* These are defined as functions here, because xgettext has trouble
extracting the strings out of long pre-processor defined */
-static void error_line_too_long()
+static void error_line_too_long(
const char *line
)
{
{
- gedcom_error(_("Line too long, max %d characters allowed"), MAXGEDCLINELEN);
+ gedcom_error(_("Line too long, max %d characters allowed: %s"),
+ MAXGEDCLINELEN, line);
}
static void error_level_leading_zero()
}
static void error_level_leading_zero()
@@
-155,7
+156,7
@@
static int dummy_conv = 0;
{ if (line_len != (size_t)-1) { \
line_len += strlen(yytext); \
if (line_len > MAXGEDCLINELEN * encoding_width) { \
{ if (line_len != (size_t)-1) { \
line_len += strlen(yytext); \
if (line_len > MAXGEDCLINELEN * encoding_width) { \
- error_line_too_long(
);
\
+ error_line_too_long(
yytext);
\
line_len = (size_t)-1; \
return BADTOKEN; \
} \
line_len = (size_t)-1; \
return BADTOKEN; \
} \