diff --git a/pcl/gray-streams.lisp b/pcl/gray-streams.lisp
index c1b05a1927039d2f917bae5c51c9c115288165bd..f5a94ae14b55d7a0f89828965eb751478cb194db 100644
--- a/pcl/gray-streams.lisp
+++ b/pcl/gray-streams.lisp
@@ -4,7 +4,7 @@
 ;;; the Public domain, and is provided 'as is'.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/gray-streams.lisp,v 1.2 1998/06/02 02:43:15 dtc Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/pcl/gray-streams.lisp,v 1.3 2000/06/06 09:56:45 dtc Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -95,6 +95,9 @@
   t)
 
 
+(eval-when (compile)
+  (pushnew 'compile pcl::*defgeneric-times*))
+
 ;;; Character input streams.
 ;;;
 ;;; A character input stream can be created by defining a class that