summaryrefslogtreecommitdiffstats
path: root/match.c
diff options
context:
space:
mode:
Diffstat (limited to 'match.c')
-rw-r--r--match.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/match.c b/match.c
index 100089b7..746a622c 100644
--- a/match.c
+++ b/match.c
@@ -1545,7 +1545,6 @@ static val complex_stream(fpip_t fp, val name)
internal_error("bad input source type");
}
-
static val robust_length(val obj)
{
if (obj == nil)
@@ -3738,9 +3737,9 @@ repeat_spec_same_data:
}
}
- if (c.data)
+ if (c.data && car(c.data))
{
- val dataline = first(c.data);
+ val dataline = car(c.data);
cons_bind (new_bindings, success,
match_line_completely(ml_all(c.bindings, specline,