grid-proto-0.2.0.1: examples/Text.hs

module Text where

import GridProto

main :: IO ()
main = runGridProto example ()

example :: GridProto ()
example = defaultGridProto
  { title = "Text Example"
  , viewFn = const view
  }

view :: View
view = drawString wh1 (0,0) "hello" <> drawString wh1 (0,1) "world"