Skip to content
Browse files

Test case for bug 2810904 (cannot duplicate)

Ignore-this: 3df0c34595983b46c5c7648b3fc11188

darcs-hash:20100521115549-75908-0b228a837681f9a68e24f6f64baf4844d60ac24c.gz
  • Loading branch information...
1 parent d0f2be4 commit 0de2e0c85781359eef37f626c696c2b03e0ad7d0 @jodonoghue committed May 21, 2010
Showing with 15 additions and 0 deletions.
  1. +15 −0 bugs/comctl32_fail.hs
View
15 bugs/comctl32_fail.hs
@@ -0,0 +1,15 @@
+-- Bug 2810904
+
+module Main () where
+
+import Graphics.UI.WX
+import Graphics.UI.WXCore
+
+main = start mainFrame
+
+mainFrame =
+ do
+ f <- frame [text := "test"]
+ button f []
+ -- supposed to crash unless notebook below is present.
+ -- notebook f [visible := False]

0 comments on commit 0de2e0c

Please sign in to comment.
Something went wrong with that request. Please try again.