mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

Switch use of $closure to $const-fun

Browse source 
Well, I think this is one of the necessary steps anyway.

* module/language/cps/compile-js.scm (compile-exp*): Switch use
of $closure to use the newer name, $const-fun.
This commit is contained in:
Christopher Lemmer Webber 2021-05-11 11:08:51 -04:00
parent 280312a9c3
commit b03b359b5b
No known key found for this signature in database
GPG key ID: 4BC025925FF8F4D3
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/language/cps/compile-js.scm
View file

@ -184,7 +184,7 @@
(make-const val)) (make-const val))
(($ $primcall name args) (($ $primcall name args)
(make-primcall name (map make-id args))) (make-primcall name (map make-id args)))
(($ $closure label nfree) (($ $const-fun label nfree)
(make-closure (make-kid label) nfree)) (make-closure (make-kid label) nfree))
(($ $values (val)) (($ $values (val))
;; FIXME: ;; FIXME: