diff --git a/basis/prettyprint/prettyprint.factor b/basis/prettyprint/prettyprint.factor
index d41a68f0c4..c7be48084f 100755
--- a/basis/prettyprint/prettyprint.factor
+++ b/basis/prettyprint/prettyprint.factor
@@ -230,10 +230,14 @@ M: word declarations.
 : pprint-; ( -- ) \ ; pprint-word ;
 
 : (see) ( spec -- )
-    <colon dup synopsis*
-    <block dup definition pprint-elements block>
-    dup definer nip [ pprint-word ] when* declarations.
-    block> ;
+    [
+        12 nesting-limit set
+        100 length-limit set
+        <colon dup synopsis*
+        <block dup definition pprint-elements block>
+        dup definer nip [ pprint-word ] when* declarations.
+        block>
+    ] with-scope ;
 
 M: object see
     [ (see) ] with-use nl ;