summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--match.c3
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index e2bb7ce1..1f3f9e76 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2011-10-23 Kaz Kylheku <kaz@kylheku.com>
+
+ * match.c (h_skip): Bugfix: bad agument list in debugf call.
+
2011-10-22 Kaz Kylheku <kaz@kylheku.com>
Task #11474
diff --git a/match.c b/match.c
index b6578a7f..06145609 100644
--- a/match.c
+++ b/match.c
@@ -582,7 +582,8 @@ static val h_skip(match_line_ctx c, match_line_ctx *cout)
val last_good_result = nil, last_good_pos = nil;
if (!rest(c.specline)) {
- debuglf(lit("skip to end of line ~a:~a"), c.file, c.data_lineno);
+ debuglf(c.spec_lineno,
+ lit("skip to end of line ~a:~a"), c.file, c.data_lineno, nao);
return cons(c.bindings, t);
}