body :: HParser Body
body = addRange $
      withBraces' $ \explicit -> 
        do
          lexHOLE
          return (\r -> Body_Hole r 0)
        <|>
        do 
          (is, ds) <- importsThenTopdecls explicit
          let groupedDecls = CollectFunctionBindings.decls ds
          return $ \r -> Body_Body r is groupedDecls
body :: HParser Body
body = addRange $
      withBraces' $ \explicit -> 
        do
          lexHOLE
          return (\r -> Body_Hole r 0)
        <|>
        do 
          (is, ds) <- importsThenTopdecls explicit
          let groupedDecls = CollectFunctionBindings.decls ds
          return $ \r -> Body_Body r is groupedDecls
body = addRange $
      withBraces' $ \explicit -> 
        do
          lexHOLE
          return (\r -> Body_Hole r 0)
        <|>
        do 
          (is, ds) <- importsThenTopdecls explicit
          let groupedDecls = CollectFunctionBindings.decls ds
          return $ \r -> Body_Body r is groupedDecls