mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-28 16:00:22 +02:00
c3240d09b2
* libguile/vm-engine.c (string-length, string-ref)
(make-vector, vector-ref, vector-set!)
(allocate-struct, struct-ref, struct-set!): Take indexes and return
lengths as untagged u64 values.
* libguile/vm.c (vm_error_not_a_string): New helper.
* module/language/tree-il/compile-cps.scm (convert):
* module/language/cps/constructors.scm (inline-vector):
* module/language/cps/closure-conversion.scm (convert-one): Untag
arguments to {string,vector,struct}-{ref,set!}, make-vector, and
allocate-struct. Tag return values from {string,vector}-length.
* module/language/cps/slot-allocation.scm (compute-var-representations):
vector-length and string-length define u64 slots.
* module/language/cps/effects-analysis.scm: make-vector no longer causes
a &type-check effect.
* module/language/cps/types.scm: Update to expect &u64 values for
lengths and indexes.
|
||
|---|---|---|
| .. | ||
| ice-9 | ||
| language | ||
| oop | ||
| rnrs | ||
| scripts | ||
| srfi | ||
| sxml | ||
| system | ||
| texinfo | ||
| web | ||
| Makefile.am | ||
| rnrs.scm | ||
| statprof.scm | ||
| texinfo.scm | ||