From c1f60043eb7564a86f72e5886dfd3eb6be544a05 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 25 Sep 2001 05:37:45 +0000
Subject: [PATCH] Fix typo in previous change.

---
 v7/src/compiler/rtlgen/opncod.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/compiler/rtlgen/opncod.scm b/v7/src/compiler/rtlgen/opncod.scm
index 82437d55a..6d112abe7 100644
--- a/v7/src/compiler/rtlgen/opncod.scm
+++ b/v7/src/compiler/rtlgen/opncod.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: opncod.scm,v 4.69 2001/09/25 05:31:16 cph Exp $
+$Id: opncod.scm,v 4.70 2001/09/25 05:37:45 cph Exp $
 
 Copyright (c) 1988-1999, 2001 Massachusetts Institute of Technology
 
@@ -1092,7 +1092,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 	   (rtl:make-machine-constant (ucode-type character))
 	   (rtl:make-object->datum arg)))
 	 finish
-	 name
+	 'INTEGER->CHAR
 	 expressions)))
     '(0)
     internal-close-coding-for-type-checks)))
-- 
2.25.1