diff options
author | Ian Lynagh <igloo@earth.li> | 2011-10-09 22:46:08 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-10-09 22:46:08 +0100 |
commit | 41cfaef3258eb5deb87adec427942b7b743eabef (patch) | |
tree | afd4513af745f7b735fb5d7d45b3137b21da1965 /testsuite/tests/dynlibs | |
parent | 809f807a325d5554e15d8100f3e626f9eb769055 (diff) | |
download | haskell-41cfaef3258eb5deb87adec427942b7b743eabef.tar.gz |
Add a test for #5373 (-rtsopts, dynamic libs and OSX / Windows)
Diffstat (limited to 'testsuite/tests/dynlibs')
-rw-r--r-- | testsuite/tests/dynlibs/Makefile | 11 | ||||
-rw-r--r-- | testsuite/tests/dynlibs/T5373.stdout | 2 | ||||
-rw-r--r-- | testsuite/tests/dynlibs/T5373A.hs | 4 | ||||
-rw-r--r-- | testsuite/tests/dynlibs/T5373B.hs | 4 | ||||
-rw-r--r-- | testsuite/tests/dynlibs/T5373C.hs | 4 | ||||
-rw-r--r-- | testsuite/tests/dynlibs/all.T | 8 |
6 files changed, 32 insertions, 1 deletions
diff --git a/testsuite/tests/dynlibs/Makefile b/testsuite/tests/dynlibs/Makefile index d0efb6ef3b..d5561ae736 100644 --- a/testsuite/tests/dynlibs/Makefile +++ b/testsuite/tests/dynlibs/Makefile @@ -9,7 +9,7 @@ T3807: $(RM) T3807-export.o T3807-load.o $(RM) T3807test.so $(RM) T3807-load - '$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make -dynamic -fPIC -shared T3807Export.hs T3807-export.c -o T3807test.so -lHSrts-ghc`'$(TEST_HC)' $(TEST_HC_OPTS) --numeric-version` + '$(TEST_HC)' $(TEST_HC_OPTS) -v0 --make -dynamic -fPIC -shared T3807Export.hs T3807-export.c -o T3807test.so -lHSrts-ghc`'$(TEST_HC)' $(TEST_HC_OPTS) --numeric-version` -rtsopts '$(TEST_HC)' $(TEST_HC_OPTS) -no-auto-link-packages -no-hs-main T3807-load.c -o T3807-load -ldl ./T3807-load @@ -30,3 +30,12 @@ T4464: '$(TEST_HC)' $(TEST_HC_OPTS) -v0 T4464C.c HS4464.dll.a -o t4464.exe ./t4464.exe +.PHONY: T5373 +T5373: + '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373A + '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373B -rtsopts + '$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373C -rtsopts=some + -./T5373A +RTS -\? 2>&1 | grep "Most RTS options are disabled" + -./T5373B +RTS -\? 2>&1 | grep "Most RTS options are disabled" + -./T5373C +RTS -\? 2>&1 | grep "Most RTS options are disabled" + diff --git a/testsuite/tests/dynlibs/T5373.stdout b/testsuite/tests/dynlibs/T5373.stdout new file mode 100644 index 0000000000..f06de0a815 --- /dev/null +++ b/testsuite/tests/dynlibs/T5373.stdout @@ -0,0 +1,2 @@ +T5373A: Most RTS options are disabled. Link with -rtsopts to enable them. +T5373C: Most RTS options are disabled. Link with -rtsopts to enable them. diff --git a/testsuite/tests/dynlibs/T5373A.hs b/testsuite/tests/dynlibs/T5373A.hs new file mode 100644 index 0000000000..0570fb18e1 --- /dev/null +++ b/testsuite/tests/dynlibs/T5373A.hs @@ -0,0 +1,4 @@ + +main :: IO () +main = return () + diff --git a/testsuite/tests/dynlibs/T5373B.hs b/testsuite/tests/dynlibs/T5373B.hs new file mode 100644 index 0000000000..0570fb18e1 --- /dev/null +++ b/testsuite/tests/dynlibs/T5373B.hs @@ -0,0 +1,4 @@ + +main :: IO () +main = return () + diff --git a/testsuite/tests/dynlibs/T5373C.hs b/testsuite/tests/dynlibs/T5373C.hs new file mode 100644 index 0000000000..0570fb18e1 --- /dev/null +++ b/testsuite/tests/dynlibs/T5373C.hs @@ -0,0 +1,4 @@ + +main :: IO () +main = return () + diff --git a/testsuite/tests/dynlibs/all.T b/testsuite/tests/dynlibs/all.T index dd1c20fc50..3a2cf82501 100644 --- a/testsuite/tests/dynlibs/all.T +++ b/testsuite/tests/dynlibs/all.T @@ -18,3 +18,11 @@ test('T4464', run_command, ['$MAKE --no-print-directory -s T4464']) +test('T5373', + extra_clean(['T5373A.hi', 'T5373B.hi', 'T5373C.hi', + 'T5373A.o', 'T5373B.o', 'T5373C.o', + 'T5373A', 'T5373B', 'T5373C', + 'T5373A.exe', 'T5373B.exe', 'T5373C.exe']), + run_command, + ['$MAKE --no-print-directory -s T5373']) + |