mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 22:40:34 +02:00
Code Activity

builtin-ref takes immediate parameter

Browse source 
* module/language/cps/compile-bytecode.scm (compile-function):
* module/language/cps/reify-primitives.scm (builtin-ref):
* module/language/cps/slot-allocation.scm (compute-needs-slot):
  Builtin-ref uses immediate parameter.
This commit is contained in:
Andy Wingo 2017-11-01 15:27:38 +01:00
parent d7ecf35d70
commit 56d639bfe5
3 changed files with 4 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/language/cps/slot-allocation.scm
View file

@ -340,8 +340,6 @@ the definitions that are live before and after LABEL, as intsets."
'ursh/immediate 'ulsh/immediate) #f
(x y))
(defs+ x))
(($ $primcall 'builtin-ref #f (idx))
defs)
(_
(defs+* (get-uses label))))))
(($ $kreceive arity k)