summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-06-13 23:21:06 -0700
committerKaz Kylheku <kaz@kylheku.com>2024-06-13 23:21:06 -0700
commit176dd45c7614da1c7e524556409741076b9e062d (patch)
treee870b402b4e5edd31bc072617a74f02f92ea7ed0
parent683e006094b166173fe4f1cd0338708b5defa71c (diff)
downloadtxr-176dd45c7614da1c7e524556409741076b9e062d.tar.gz
txr-176dd45c7614da1c7e524556409741076b9e062d.tar.bz2
txr-176dd45c7614da1c7e524556409741076b9e062d.zip
perm: small streamlining in string case.
* combi.c (perm_str): We don't have to convert the string to a list and then vector, since we have vec_seq.
-rw-r--r--combi.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/combi.c b/combi.c
index 9afe1305..82442af8 100644
--- a/combi.c
+++ b/combi.c
@@ -213,7 +213,7 @@ static val perm_str(val str, val k)
if (k == zero) {
return cons(string(L""), nil);
} else {
- val state = perm_init(vec_list(list_str(str)), k, nil);
+ val state = perm_init(vec_seq(str), k, nil);
if (!state)
return nil;
return generate(func_f0(state, perm_while_fun),