Permalink
Browse files

Works when let-bound

  • Loading branch information...
1 parent 234b3d3 commit 867baae455c12487e603d6c4746b59d55908daa3 @steshaw committed Apr 10, 2012
Showing with 4 additions and 1 deletion.
  1. +4 −1 haskell/ghcTypeSystemBug.hs
@@ -8,4 +8,7 @@
gen :: [forall a. a -> a]
gen = [id]
-test1 = head gen 1
+-- broken
+-- test1 = head gen 1
+
+test2 = let hg = head gen in hg 1

0 comments on commit 867baae

Please sign in to comment.