X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fassem.lisp;h=5fa14f2d4b3b3392f05f9bcaa0659f7e16c95058;hb=a157ed0be79751f85b8243c06102eea95af06aa3;hp=797fd831ec23c9a77eaa54f520ad5e160a7f3ded;hpb=aecec1def1de06cf40003917e9091d3ffe1ba16b;p=sbcl.git

diff --git a/src/compiler/assem.lisp b/src/compiler/assem.lisp
index 797fd83..5fa14f2 100644
--- a/src/compiler/assem.lisp
+++ b/src/compiler/assem.lisp
@@ -107,7 +107,7 @@
   #!+sb-dyncount
   (collect-dynamic-statistics nil))
 (sb!c::defprinter (segment)
-  name)
+  type)
 
 (declaim (inline segment-current-index))
 (defun segment-current-index (segment)