From 6bd34bd24139e66096ccaf14237c0c09583e46c9 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 17 Jan 2007 15:58:44 +0000
Subject: [PATCH] Fix typo in previous change.

---
 v7/src/runtime/unicode.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/runtime/unicode.scm b/v7/src/runtime/unicode.scm
index 6adddb3de..53f4bf606 100644
--- a/v7/src/runtime/unicode.scm
+++ b/v7/src/runtime/unicode.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: unicode.scm,v 1.31 2007/01/17 15:42:39 cph Exp $
+$Id: unicode.scm,v 1.32 2007/01/17 15:58:44 cph Exp $
 
 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
@@ -145,7 +145,7 @@ USA.
 
 (define (%unicode-code-point? object)
   (and (index-fixnum? object)
-       (fix:< pt char-code-limit)))
+       (fix:< object char-code-limit)))
 
 (define-guarantee unicode-code-point "a Unicode code point")
 
-- 
2.25.1