guile-commits
[Top][All Lists]
Advanced

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

[Guile-commits] GNU Guile branch, wip-rtl-cps, updated. v2.1.0-177-g9be2


From: Noah Lavine
Subject: [Guile-commits] GNU Guile branch, wip-rtl-cps, updated. v2.1.0-177-g9be266c
Date: Sat, 16 Feb 2013 16:46:17 +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".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=9be266c32e468e81c72b0affc88da81e6cb9ee1c

The branch, wip-rtl-cps has been updated
  discards  b4f139a1f353075520fb444c842bed212b341272 (commit)
       via  9be266c32e468e81c72b0affc88da81e6cb9ee1c (commit)

This update added new revisions after undoing existing revisions.  That is
to say, the old revision is not a strict subset of the new revision.  This
situation occurs when you --force push a change and generate a repository
containing something like this:

 * -- * -- B -- O -- O -- O (b4f139a1f353075520fb444c842bed212b341272)
            \
             N -- N -- N (9be266c32e468e81c72b0affc88da81e6cb9ee1c)

When this happens we assume that you've already had alert emails for all
of the O revisions, and so we here report only the revisions in the N
branch from the common base, B.

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 9be266c32e468e81c72b0affc88da81e6cb9ee1c
Author: Noah Lavine <address@hidden>
Date:   Fri Feb 15 23:10:58 2013 -0500

    Clean Up the Register Allocator
    
    * module/language/cps/compile-rtl.scm: code clean-ups in the register
      allocator.

-----------------------------------------------------------------------

Summary of changes:
 module/language/cps/compile-rtl.scm |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/module/language/cps/compile-rtl.scm 
b/module/language/cps/compile-rtl.scm
index 921dab2..eb3afed 100644
--- a/module/language/cps/compile-rtl.scm
+++ b/module/language/cps/compile-rtl.scm
@@ -131,8 +131,9 @@
        (let ((total
               (fold
                (lambda (name counter)
-                 (set! (register (car names)) counter)
-                 (1+ counter)))))
+                 (set! (register name) counter)
+                 (1+ counter))
+               0 names)))
          (visit body counter)
          counter))
       


hooks/post-receive
-- 
GNU Guile



reply via email to

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