From 82e8f26057526f0cb56122bbccae2b5eb5f1c5d2 Mon Sep 17 00:00:00 2001
From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Wed, 15 Oct 1997 01:22:00 +0000
Subject: [PATCH] Fix typo.

---
 v7/src/microcode/char.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/microcode/char.c b/v7/src/microcode/char.c
index 9c0da8d06..ec31b30bf 100644
--- a/v7/src/microcode/char.c
+++ b/v7/src/microcode/char.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: char.c,v 9.31 1997/10/15 01:17:07 adams Exp $
+$Id: char.c,v 9.32 1997/10/15 01:22:00 adams Exp $
 
 Copyright (c) 1987-1991 Massachusetts Institute of Technology
 
@@ -59,7 +59,7 @@ DEFUN (arg_ascii_integer, (n), int n)
 DEFINE_PRIMITIVE ("CHAR?", Prim_char_p, 1, 1, 0)
 {
   PRIMITIVE_HEADER (1);
-  PRIMITIVE_RETURN (BOOLEAN_TO_OBJECT (CHARACTER_P (arg_ref (1))));
+  PRIMITIVE_RETURN (BOOLEAN_TO_OBJECT (CHARACTER_P (ARG_REF (1))));
 }
 
 DEFINE_PRIMITIVE ("MAKE-CHAR", Prim_make_char, 2, 2, 0)
-- 
2.25.1