1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00

Consider $code to make 'ptr representation

* module/language/cps/utils.scm (compute-var-representations): For the
wasm target, these values are (ref $kvarargs), not i64.  Will need to
distinguish from bytevector pointers at some point, though.
This commit is contained in:
Andy Wingo 2023-05-12 10:58:44 +02:00
parent db826ab909
commit aa2cfe7cf6

View file

@ -418,7 +418,7 @@ by a label, respectively."
'tail-pointer-ref/immediate))
(intmap-add representations var 'ptr))
(($ $code)
(intmap-add representations var 'u64))
(intmap-add representations var 'ptr))
(_
(intmap-add representations var 'scm))))
(vars