From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Wed, 22 Dec 1993 14:41:17 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: 20090517-FFI~7346
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=98a70c93dc5251c57c704f46d442121a2c03cf3b;p=mit-scheme.git

*** empty log message ***
---

diff --git a/v7/src/sf/usiexp.scm b/v7/src/sf/usiexp.scm
index 8e4715861..e8862b609 100644
--- a/v7/src/sf/usiexp.scm
+++ b/v7/src/sf/usiexp.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: usiexp.scm,v 4.27 1993/12/22 14:27:18 adams Exp $
+$Id: usiexp.scm,v 4.28 1993/12/22 14:41:17 adams Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -466,8 +466,8 @@ MIT in each case. |#
 	(if-expanded (make-type-test expr block (type-proc) (car operands)))
 	(if-not-expanded))))
 
-;; DO NOT make the following integrable! they are required to be procedures
-;; for re-tagging
+;; DO NOT make the following integrable! they are required to be changable
+;; to allow syntaxing to a different tag set
 
 (define ucode-type/character (ucode-type character))
 (define ucode-type/cell (ucode-type cell))