[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] GNU Guile branch, master, updated. v2.1.0-238-g5bd4b65

From: Andy Wingo
Subject: [Guile-commits] GNU Guile branch, master, updated. v2.1.0-238-g5bd4b65
Date: Mon, 14 Oct 2013 14:38:32 +0000

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

The branch, master has been updated
       via  5bd4b6585b3733077d0a36265ce057611836e163 (commit)
      from  8d59d55e866666a4ed3b9695638265be62b20af0 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 5bd4b6585b3733077d0a36265ce057611836e163
Author: Andy Wingo <address@hidden>
Date:   Mon Oct 14 16:43:42 2013 +0200

    Reify call-thunk/no-inline.
    * module/language/cps/reify-primitives.scm (reify-primitives): Remove
      call-thunk/no-inline in this late phase.


Summary of changes:
 module/language/cps/reify-primitives.scm |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/module/language/cps/reify-primitives.scm 
index ebd2da0..34700b1 100644
--- a/module/language/cps/reify-primitives.scm
+++ b/module/language/cps/reify-primitives.scm
@@ -101,6 +101,9 @@
                (_ (build-cps-term ($continue k ($void))))))
             (($ $fun)
              (build-cps-term ($continue k ,(visit-fun exp))))
+            (($ $primcall 'call-thunk/no-inline (proc))
+             (build-cps-term
+               ($continue k ($call proc ()))))
             (($ $primcall name args)
               ((or (prim-rtl-instruction name) (branching-primitive? name))

GNU Guile

reply via email to

[Prev in Thread] Current Thread [Next in Thread]