From 5b3c9ac7efd8530912b6e179e6f716f0d8750a9d Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 25 Mar 2009 12:51:34 +0000
Subject: [PATCH] no-inline for scheme_approx_sp

svn: r14267
---
 src/mzscheme/src/jit.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/mzscheme/src/jit.c b/src/mzscheme/src/jit.c
index cdb82a6908..1df782dbdf 100644
--- a/src/mzscheme/src/jit.c
+++ b/src/mzscheme/src/jit.c
@@ -8406,6 +8406,7 @@ static void check_stack(void)
 }
 #endif
 
+MZ_DO_NOT_INLINE(unsigned long scheme_approx_sp());
 unsigned long scheme_approx_sp()
 {
   unsigned long p;