Output gets printed twice

[erikd@…]

Simple program:

main =

println $ show [ 1 .. 6 ]

prints out:

[1, 2, 3, 4, 5, 6] [1, 2, 3, 4, 5, 6]

when it should print just a single line:

[1, 2, 3, 4, 5, 6]

[erikd]

More info, this does the wrong thing:

main =

println $ show [ 1 .. 6 ]

while this:

main () =

println $ show [ 1 .. 6 ]

does the right thing.

I suspect that the first one should actually be disallowed.

[benl]

The check on the type of the main fn got broken when we moved to support making executables from modules not called Main.