From afb75c7cfed243833a28090f3e51bc718ab71319 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 28 Apr 2014 17:49:01 -0600
Subject: [PATCH] linux: close "/proc/self/maps" after finding the stack base

---
 racket/src/racket/src/eval.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/racket/src/racket/src/eval.c b/racket/src/racket/src/eval.c
index bc26e97e04..9d380632a5 100644
--- a/racket/src/racket/src/eval.c
+++ b/racket/src/racket/src/eval.c
@@ -518,7 +518,8 @@ static uintptr_t adjust_stack_base(uintptr_t bnd) {
 	      break;
 	  }
 	  /* printf("%p vs. %p: %d\n", (void*)bnd, (void*)p, p - bnd); */
-	  return p;
+	  bnd = p;
+          break;
 	}
       }
       free(buf);