diff options
author | Andy Wingo <wingo@pobox.com> | 2025-02-20 12:38:28 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2025-02-20 12:38:28 +0100 |
commit | c8a169d38825d5a21da5392b355ca5fc9f33fa55 (patch) | |
tree | 38357c5b1d3186fb3281ba1f038c61ccb48c7390 | |
parent | 5d3f561d7dbcee370dc764cd5ba4210c62ce13de (diff) | |
download | guile-c8a169d38825d5a21da5392b355ca5fc9f33fa55.tar.gz |
Fix string-utf8-length to have unboxed representation
* module/language/cps/utils.scm (primcall-raw-representations): Add
string-utf8-length.
-rw-r--r-- | module/language/cps/utils.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/cps/utils.scm b/module/language/cps/utils.scm index f9092d0b3..1f09fe7c2 100644 --- a/module/language/cps/utils.scm +++ b/module/language/cps/utils.scm @@ -405,7 +405,7 @@ by a label, respectively." word-ref word-ref/immediate untag-char vector-length vtable-size bv-length - string-length string-ref + string-length string-utf8-length string-ref symbol-hash) '(u64)) ((untag-fixnum |