115   body <- blockConstructor (blockSpec (rootLabel tree')) tree'
293      , blockConstructor    :: BlockNode m il bl -> BlockParser m il bl bl  function
451         addRange n <$> blockConstructor (blockSpec (rootLabel n)) n
461      , blockConstructor    = fmap mconcat . renderChildren  function
474      , blockConstructor    = \node -> do  function
561      , blockConstructor    = \_ -> return $! mempty  function
589      , blockConstructor    = \node ->  function
606     blockConstructor    = \node ->  function
672      , blockConstructor    = \node -> do  function
726      , blockConstructor    = \node -> do  function
777      , blockConstructor    = \node ->  function
833      , blockConstructor    = fmap mconcat . renderChildren  function
896      , blockConstructor    = \node -> do  function
957      , blockConstructor    = \_ -> return thematicBreak  function
983      , blockConstructor    = \node ->  function
1054      , blockConstructor    = \node -> do  function
1111      , blockConstructor    = \node ->  function