help.syntax: more blocks.

diff --git a/basis/help/syntax/syntax.factor b/basis/help/syntax/syntax.factor
index f2c7f153be9bc7c0129614e938ab2cc56514db92..3c5f9d0ac992d24af8ec4009766abe4345feb8a9 100644 (file)
--- a/basis/help/syntax/syntax.factor
+++ b/basis/help/syntax/syntax.factor
@@ -26,7 +26,14 @@ IN: help.syntax
     [ dup empty? [ >string suffix! SBUF" " clone ] unless ]
     [ [ suffix! ] curry dip ] bi* ;
 
-DEFER: help-block?
+: help-block? ( word -- ? )
+    {
+        $description $heading $subheading $syntax
+        $class-description $error-description $var-description
+        $contract $notes $curious $deprecated $errors
+        $side-effects $content $warning $subsections $nl
+        $list $table $example $unchecked-example $code
+    } member-eq? ;
 
 : push-help-space ( accum sbuf -- accum sbuf )
     dup empty? [
@@ -102,14 +109,6 @@ DEFER: help-block?
 : help-code? ( word -- ? )
     { $example $unchecked-example $code } member-eq? ;
 
-: help-block? ( word -- ? )
-    {
-        $description $heading $subheading $syntax
-        $class-description $error-description $var-description
-        $contract $notes $curious $deprecated $errors
-        $side-effects $content $warning $subsections $nl
-    } member-eq? ;
-
 : help-values? ( word -- ? )
     { $values $inputs $outputs } member-eq? ;