blob: f5a9cff55523bf9e71361e281bb9db6ca3772c0d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
*** ghc/includes/RtsAPI.h~ Thu Jun 27 16:38:58 2002
--- ghc/includes/RtsAPI.h Fri Jul 19 11:19:38 2002
***************
*** 122,129 ****
These are used by foreign export and foreign import "wrapper" stubs.
----------------------------------------------------------------------- */
! extern DLL_IMPORT const StgClosure GHCziTopHandler_runIO_closure;
! extern DLL_IMPORT const StgClosure GHCziTopHandler_runNonIO_closure;
#define runIO_closure (&GHCziTopHandler_runIO_closure)
#define runNonIO_closure (&GHCziTopHandler_runNonIO_closure)
--- 122,129 ----
These are used by foreign export and foreign import "wrapper" stubs.
----------------------------------------------------------------------- */
! extern StgClosure GHCziTopHandler_runIO_closure;
! extern StgClosure GHCziTopHandler_runNonIO_closure;
#define runIO_closure (&GHCziTopHandler_runIO_closure)
#define runNonIO_closure (&GHCziTopHandler_runNonIO_closure)
|
