From 19036845bdeba1689f371f27a7d5fa9841ccf523 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Thu, 4 Sep 2008 09:07:53 -0500
Subject: [PATCH] vocab-browser: Display symbols separate from words

---
 unfinished/vocab-browser/vocab-browser.factor | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/unfinished/vocab-browser/vocab-browser.factor b/unfinished/vocab-browser/vocab-browser.factor
index 3f2d2d7b9a..b1e719dbfe 100644
--- a/unfinished/vocab-browser/vocab-browser.factor
+++ b/unfinished/vocab-browser/vocab-browser.factor
@@ -74,7 +74,15 @@ IN: vocab-browser
       [ pprint-class ] each
     ]
   if
-  
+
+  dup vocab words [ class? not ] filter [ symbol? ] filter natural-sort
+  dup empty?
+    [ drop ]
+    [
+      "Symbols" $heading nl
+      print-seq
+    ]
+  if
 
   dup vocab words [ generic? ] filter natural-sort
   dup empty?
@@ -92,6 +100,7 @@ IN: vocab-browser
     [ builtin-class?   not ] filter
     [ tuple-class?     not ] filter
     [ generic?         not ] filter
+    [ symbol?          not ] filter
     [ word?                ] filter
     natural-sort
     [ [ ] [ word-effect-as-string ] bi 2array ] map