projects
/
m6w6
/
ext-psi
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
|
github
raw
|
inline
| side by side
flush
[m6w6/ext-psi]
/
src
/
parser_proc.c
diff --git
a/src/parser_proc.c
b/src/parser_proc.c
index 6b8b81714bc991535ffc6e1b5526f3af2b476c6c..206056ad4dea8fb87ecee7f8a331a60dc431bd9a 100644
(file)
--- a/
src/parser_proc.c
+++ b/
src/parser_proc.c
@@
-9475,11
+9475,22
@@
static void psi_parser_proc_error(struct psi_parser *P, struct psi_plist *tokens
P->error(PSI_DATA(P), T, PSI_WARNING, "PSI %s at col %u", msg, T->col);
while (i <= last || T->type != PSI_T_EOS) {
P->error(PSI_DATA(P), T, PSI_WARNING, "PSI %s at col %u", msg, T->col);
while (i <= last || T->type != PSI_T_EOS) {
+ const char *pos;
+
if (!psi_plist_get(tokens, i++, &T)) {
break;
}
if (!psi_plist_get(tokens, i++, &T)) {
break;
}
+
+ if (i < last + 1) {
+ pos = "preceding";
+ } else if (i > last + 1) {
+ pos = "following";
+ } else {
+ pos = "offending";
+ }
+
P->error(PSI_DATA(P), T, PSI_WARNING, "PSI %s token '%s' at col %u",
P->error(PSI_DATA(P), T, PSI_WARNING, "PSI %s token '%s' at col %u",
-
i<last+1?"preceding":i>last+1?"following":"offending", T->text->val, T->col
);
+
pos, T ? T->text->val : "<deleted>", T ? T->col : 0
);
}
} else {
P->error(PSI_DATA(P), NULL, PSI_WARNING, "PSI %s", msg);
}
} else {
P->error(PSI_DATA(P), NULL, PSI_WARNING, "PSI %s", msg);