Expand box benchmarks

This commit is contained in:
Jonathan Daugherty 2015-06-28 21:04:57 -07:00
parent 55a22a21a5
commit 8d93c71f03

View File

@ -41,8 +41,10 @@ allGroups =
, mkBench "fill" (fill ' ')
, mkBench "hFill" (hFill ' ')
, mkBench "vFill" (vFill ' ')
, mkBench "hBox" (hBox [str "testing", str "testing"])
, mkBench "vBox" (vBox [str "testing", str "testing"])
, mkBench "hBoxFixed" (hBox [str "testing", str "testing"])
, mkBench "vBoxFixed" (vBox [str "testing", str "testing"])
, mkBench "hBoxUnlimited" (hBox [hFill ' ', str "testing"])
, mkBench "vBoxUnlimited" (vBox [vFill ' ', str "testing"])
, mkBench "empty" emptyWidget
, mkBench "hLimit" (hLimit 1 $ str "t")
, mkBench "vLimit" (vLimit 1 $ str "testing")