From 497f0d4032d0b03d9851a03e69badbc1c821af75 Mon Sep 17 00:00:00 2001
From: ssmith <ssmith>
Date: Thu, 12 Jan 1995 22:39:50 +0000
Subject: [PATCH] Fixed bug: editted target-register so that it always calls
 allocate-alias- register.  If it is not called, then any assigns to machine
 registers will not "lock" the register.  This was a problem when the
 procedure would assign the return value and then use the same register to
 compute where to go next.

---
 v8/src/compiler/machines/i386/lapgen.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v8/src/compiler/machines/i386/lapgen.scm b/v8/src/compiler/machines/i386/lapgen.scm
index 0cc4fa22c..7eff85c42 100644
--- a/v8/src/compiler/machines/i386/lapgen.scm
+++ b/v8/src/compiler/machines/i386/lapgen.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: lapgen.scm,v 1.3 1995/01/11 21:09:46 ssmith Exp $
+$Id: lapgen.scm,v 1.4 1995/01/12 22:39:50 ssmith Exp $
 
 Copyright (c) 1992-1993 Massachusetts Institute of Technology
 
@@ -309,7 +309,7 @@ MIT in each case. |#
 
 (define (target-register target)
   (delete-dead-registers!)
-  (or (register-alias target 'GENERAL)
+  (or ;(register-alias target 'GENERAL)
       (allocate-alias-register! target 'GENERAL)))  
 
 (define-integrable (target-register-reference target)
-- 
2.25.1