sequences strings io.styles vectors words quotations mirrors
splitting math.parser classes vocabs sets sorting summary
debugger continuations fry combinators ;
+FROM: namespaces => set ;
IN: inspector
SYMBOL: +number-rows+
-: print-summary ( obj -- ) [ summary ] keep write-object ;
+: print-summary ( obj -- )
+ [ safe-summary ] keep write-object ;
<PRIVATE
M: tuple error. describe ;
: vars-in-scope ( seq -- alist )
- [ [ global eq? not ] filter [ keys ] gather ] keep
+ [ [ global eq? ] reject [ keys ] gather ] keep
'[ dup _ assoc-stack ] H{ } map>assoc ;
: .vars ( -- )