[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 05/13: More slot-allocation simplification
From: |
Andy Wingo |
Subject: |
[Guile-commits] 05/13: More slot-allocation simplification |
Date: |
Wed, 22 Jul 2015 15:32:27 +0000 |
wingo pushed a commit to branch master
in repository guile.
commit f63b2e4814761f805d3e7897bc543ebd3543b008
Author: Andy Wingo <address@hidden>
Date: Mon Jul 20 10:57:52 2015 +0200
More slot-allocation simplification
* module/language/cps/slot-allocation.scm (allocate-slots): Remove
unreachable clause.
---
module/language/cps/slot-allocation.scm | 14 +-------------
1 files changed, 1 insertions(+), 13 deletions(-)
diff --git a/module/language/cps/slot-allocation.scm
b/module/language/cps/slot-allocation.scm
index 400f9e3..c60f0f2 100644
--- a/module/language/cps/slot-allocation.scm
+++ b/module/language/cps/slot-allocation.scm
@@ -542,19 +542,7 @@ are comparable with eqv?. A tmp slot may be used."
(hashq-set! call-allocations label
(make-call-allocation proc-slot arg-moves
dead-slot-map))
(hashq-set! call-allocations k
- (make-call-allocation proc-slot result-moves #f))))
-
- (_
- (let* ((proc-slot (compute-call-proc-slot post-live))
- (call-slots (map (cut + proc-slot <>) (iota (length uses))))
- (pre-live (fold allocate! pre-live uses call-slots))
- (arg-moves (parallel-move (map (cut vector-ref slots <>) uses)
- call-slots
- (compute-tmp-slot pre-live
- call-slots))))
- (bump-nlocals! (+ proc-slot (length uses)))
- (hashq-set! call-allocations label
- (make-call-allocation proc-slot arg-moves #f))))))
+ (make-call-allocation proc-slot result-moves #f))))))
(define (allocate-values label k uses pre-live post-live)
(match (lookup-cont k dfg)
- [Guile-commits] branch master updated (90aabcc -> aa7f0e2), Andy Wingo, 2015/07/22
- [Guile-commits] 04/13: CPS1 slot-allocation simplification, Andy Wingo, 2015/07/22
- [Guile-commits] 05/13: More slot-allocation simplification,
Andy Wingo <=
- [Guile-commits] 03/13: Utils refactors, Andy Wingo, 2015/07/22
- [Guile-commits] 07/13: Fix bad return shuffles for multiply-used $kreceive conts, Andy Wingo, 2015/07/22
- [Guile-commits] 01/13: Reify primitives in CPS2, Andy Wingo, 2015/07/22
- [Guile-commits] 09/13: Fix CPS2 compute-successors, Andy Wingo, 2015/07/22
- [Guile-commits] 06/13: Fix error printing some wrong-num-args backtraces, Andy Wingo, 2015/07/22
- [Guile-commits] 02/13: Add intset-prev and intset-fold-right, Andy Wingo, 2015/07/22
- [Guile-commits] 11/13: Compile CPS2 directly to bytecode, Andy Wingo, 2015/07/22
- [Guile-commits] 08/13: intset-intersect bugfix, Andy Wingo, 2015/07/22
- [Guile-commits] 10/13: Slot allocation and bytecode compilation from CPS2., Andy Wingo, 2015/07/22
- [Guile-commits] 12/13: Remove CPS1 language, Andy Wingo, 2015/07/22