summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-10-23 03:12:46 -0400
committerKaz Kylheku <kaz@kylheku.com>2011-10-23 03:12:46 -0400
commit047116716e98766487f4a808ad53e097565dede2 (patch)
treea71c2b62f75bf6f52bd386693cfea845165a841d
parentc6de88f486896be891e73009dbe2ea0411bf89e1 (diff)
downloadtxr-047116716e98766487f4a808ad53e097565dede2.tar.gz
txr-047116716e98766487f4a808ad53e097565dede2.tar.bz2
txr-047116716e98766487f4a808ad53e097565dede2.zip
* match.c (h_skip): Bugfix: bad agument list in debugf call.
-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);
}