X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FmkNativeHdr.lc;h=e590043578e7f16d1066c3228e6407c675a2a791;hb=44ffc9c297c8a50e08af060e89f7ebd1c4b70915;hp=2e2ae88c4315678447587a8faac4d7c8df5fdf87;hpb=10521d8418fd3a1cf32882718b5bd28992db36fd;p=ghc-hetmet.git diff --git a/ghc/includes/mkNativeHdr.lc b/ghc/includes/mkNativeHdr.lc index 2e2ae88..e590043 100644 --- a/ghc/includes/mkNativeHdr.lc +++ b/ghc/includes/mkNativeHdr.lc @@ -42,8 +42,8 @@ #define SM_CAFLIST OFFSET(StorageMgrInfo, StorageMgrInfo.CAFlist) #define SM_OLDMUTABLES OFFSET(StorageMgrInfo, StorageMgrInfo.OldMutables) #define SM_OLDLIM OFFSET(StorageMgrInfo, StorageMgrInfo.OldLim) -#define SM_MALLOCPTRLIST OFFSET(StorageMgrInfo, StorageMgrInfo.MallocPtrList) -#define SM_OLDMALLOCPTRLIST OFFSET(StorageMgrInfo, StorageMgrInfo.OldMallocPtrList) +#define SM_FOREIGNOBJLIST OFFSET(StorageMgrInfo, StorageMgrInfo.ForeignObjList) +#define SM_OLDFOREIGNOBJLIST OFFSET(StorageMgrInfo, StorageMgrInfo.OldForeignObjList) #define SM_STABLEPOINTERTABLE OFFSET(StorageMgrInfo, StorageMgrInfo.StablePointerTable) STGRegisterTable MainRegTable; @@ -98,9 +98,9 @@ main() printf("#define SM_OLDLIM %d\n", SM_OLDLIM); #endif #ifndef PAR - printf("#define SM_MALLOCPTRLIST %d\n", SM_MALLOCPTRLIST); + printf("#define SM_FOREIGNOBJLIST %d\n", SM_FOREIGNOBJLIST); #if defined(GCap) || defined(GCgn) - printf("#define SM_OLDMALLOCPTRLIST %d\n", SM_OLDMALLOCPTRLIST); + printf("#define SM_OLDFOREIGNOBJLIST %d\n", SM_OLDFOREIGNOBJLIST); #endif printf("#define SM_STABLEPOINTERTABLE %d\n", SM_STABLEPOINTERTABLE); #endif