From 23e96e60ed026965251423f90654c0668e9a344c Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Mon, 30 Sep 2024 19:06:37 -0700 Subject: refset, replace: adjust diagnostic for unsupported object. * lib.c (refset, replace): Word the bad object diagnostic in terms of it not being a modifiable sequence. This covers cases when the object is something abstractly iterable, like a range. We don't want to say that it's not a sequence. --- lib.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib.c b/lib.c index e38197ee..5a47d19d 100644 --- a/lib.c +++ b/lib.c @@ -13564,7 +13564,7 @@ val refset(val seq, val ind, val newval) } /* fallthrough */ default: - type_mismatch(lit("refset: ~s is not a sequence"), seq, nao); + type_mismatch(lit("refset: ~s is not a modifiable sequence"), seq, nao); } return newval; } @@ -13593,7 +13593,7 @@ val replace(val seq, val items, val from, val to) return replace_obj(seq, items, from, to); /* fallthrough */ default: - type_mismatch(lit("~a: ~s is not a sequence"), self, seq, nao); + type_mismatch(lit("~a: ~s is not a modifiable sequence"), self, seq, nao); } } -- cgit v1.2.3