summaryrefslogtreecommitdiffstats
path: root/match.c
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 /match.c
parentc6de88f486896be891e73009dbe2ea0411bf89e1 (diff)
downloadtxr-047116716e98766487f4a808ad53e097565dede2.tar.gz
txr-047116716e98766487f4a808ad53e097565dede2.tar.bz2
txr-047116716e98766487f4a808ad53e097565dede2.zip
* match.c (h_skip): Bugfix: bad agument list in debugf call.
Diffstat (limited to 'match.c')
-rw-r--r--match.c3
1 files changed, 2 insertions, 1 deletions
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);
}