From a92ff5d66182d992d02dfaad4c446ad074582368 Mon Sep 17 00:00:00 2001 From: Sergei Trofimovich Date: Mon, 17 Apr 2017 12:56:20 +0100 Subject: hs_add_root() RTS API removal Before ghc-7.2 hs_add_root() had to be used to initialize haskell modules when haskell was called from FFI. commit a52ff7619e8b7d74a9d933d922eeea49f580bca8 ("Change the way module initialisation is done (#3252, #4417)") removed needs for hs_add_root() and made function a no-op. For backward compatibility '__stginit_' symbol was not removed. This change removes no-op hs_add_root() function and unused '__stginit_' symbol from each haskell module. Signed-off-by: Sergei Trofimovich Test Plan: ./validate Reviewers: simonmar, austin, bgamari, erikd Reviewed By: simonmar Subscribers: rwbarton, thomie Differential Revision: https://phabricator.haskell.org/D3460 --- testsuite/tests/concurrent/should_run/conc059_c.c | 3 --- 1 file changed, 3 deletions(-) (limited to 'testsuite/tests/concurrent') diff --git a/testsuite/tests/concurrent/should_run/conc059_c.c b/testsuite/tests/concurrent/should_run/conc059_c.c index f15fbdd735..55510c12cf 100644 --- a/testsuite/tests/concurrent/should_run/conc059_c.c +++ b/testsuite/tests/concurrent/should_run/conc059_c.c @@ -6,12 +6,9 @@ #include #endif -void __stginit_Test(void); - int main(int argc, char *argv[]) { hs_init(&argc,&argv); - hs_add_root(__stginit_Test); f(500000); #if mingw32_HOST_OS Sleep(100); -- cgit v1.2.1