{-# LANGUAGE QuasiQuotes #-}

renderSemantic :: Monad m => FormRender m a
renderSemantic aform fragment = do
renderSemantic aform fragment = do
    let widget = [whamlet|
$newline
|]
    return widget