[honu] wrap blocks inside a definition context (with let)

collects/honu/core/private/parse2.rkt

@@ -278,7 +278,8 @@
                         (values (left current) stream)
                         (let ()
                           (define body (parse-all #'(stuff ...)))
-                          (do-parse #'(rest ...) precedence left body)))]
+                          (with-syntax ([body body])
+                            (do-parse #'(rest ...) precedence left #'(let () body)))))]
                      ;; expression or function application
                      [(#%parens args ...)
                       (if current

collects/honu/scribblings/honu.scrbl

@@ -12,12 +12,12 @@
 Honu's main goal is to support syntactic abstraction mechanisms similar to
 Racket. Currently, Honu is a prototype and may change without notice.
 
+@defmodulelang[honu]
+
 @table-of-contents[]
 
 @; ----------------------------------------------------------------------
 
-@defmodulelang[honu]
-
 @section{Get started}
 To use Honu in a module, write the following line at the top of the file.