diff --git a/hemlock/struct.lisp b/hemlock/struct.lisp
index a19b340e090e15e3b295f1713f18b47ab1af67a8..a1c62d45e6e0b9617b843b68fda8bf88fb5d08af 100644
--- a/hemlock/struct.lisp
+++ b/hemlock/struct.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/struct.lisp,v 1.6 1998/05/04 01:27:20 dtc Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/struct.lisp,v 1.7 1998/10/04 08:27:32 dtc Rel $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -466,7 +466,7 @@
 			; device-columns long.
   ;;
   ;; This terminal's baud rate, or NIL for infinite.
-  (speed nil :type (or (unsigned-byte 16) null)))
+  (speed nil :type (or (unsigned-byte 24) null)))
 
 
 ;;;; Device screen hunks and window-group.