From 444648441ad7550e8afad8c7dfaa00605d727eba Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sun, 24 Jun 2018 12:32:13 +0200
Subject: [PATCH] vm: Fix another typo.

Fix typo introduced in efc33cd1497c00c5ebf961e834efc1d85f3e28ac.

* libguile/vm.c (return_unused_stack_to_os): Remove extra 'while'.
---
 libguile/vm.c | 1 -
 1 file changed, 1 deletion(-)

diff --git a/libguile/vm.c b/libguile/vm.c
index 92d568059..c8ec6e1b2 100644
--- a/libguile/vm.c
+++ b/libguile/vm.c
@@ -902,7 +902,6 @@ return_unused_stack_to_os (struct scm_vm *vp)
 
       do
         ret = madvise ((void *) lo, hi - lo, MADV_DONTNEED);
-      while (ret && errno == -EAGAIN);
       while (ret && errno == EAGAIN);
 
       if (ret)