suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix prototype when the C compiler has no "no inline" annotation

Browse Source
This commit is contained in:
Matthew Flatt 2013-02-01 10:35:38 -08:00
parent 09d4aa3d79
commit c1bd671b08
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/racket/src/salloc.c
View File

@ -1640,7 +1640,7 @@ void scheme_enable_garbage_collection(int on)
#endif #endif
} }
MZ_DO_NOT_INLINE(uintptr_t scheme_get_deeper_address(void)) MZ_DO_NOT_INLINE(uintptr_t scheme_get_deeper_address(void));
uintptr_t scheme_get_deeper_address(void) uintptr_t scheme_get_deeper_address(void)
{ {

6
src/racket/src/schpriv.h
View File

@ -174,11 +174,11 @@ int scheme_num_types(void);
#endif #endif
#if MZ_USE_NOINLINE #if MZ_USE_NOINLINE
# define MZ_DO_NOT_INLINE(decl) decl __attribute__ ((noinline)); # define MZ_DO_NOT_INLINE(decl) decl __attribute__ ((noinline))
#elif _MSC_VER #elif _MSC_VER
# define MZ_DO_NOT_INLINE(decl) __declspec(noinline) decl; # define MZ_DO_NOT_INLINE(decl) __declspec(noinline) decl
#else #else
# define MZ_DO_NOT_INLINE(decl) # define MZ_DO_NOT_INLINE(decl) decl
#endif #endif