summaryrefslogtreecommitdiff
path: root/testsuite/tests/codeGen/should_compile/2578.hs
blob: c851b54f88ec7d2f6c66c19580184b6306983731 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

{-# LANGUAGE EmptyDataDecls #-}

-- This used to give warnings:
--     ld: atom sorting error for _Main_MyType_closure_tbl and _Main_MyType2_closure_tbl in q.o
--     ld: atom sorting error for _Main_MyType_closure_tbl and _Main_MyType2_closure_tbl in q.o
--     ld: atom sorting error for _Main_MyType_closure_tbl and _Main_MyType2_closure_tbl in q.o
-- when compiling on OS X (trac #2578).

module Main (main) where

data MyType
data MyType2

main :: IO ()
main = print ()