vm: Fix typo when checking for 'madvise' error code.

* libguile/vm.c (return_unused_stack_to_os): Check for EAGAIN, not -EAGAIN.

diff --git a/libguile/vm.c b/libguile/vm.c
index 18f2192490d94e4df5bce15987d415b575092d5a..92d5680599dada9ebf196d496acdf91acc898d7b 100644 (file)
--- a/libguile/vm.c
+++ b/libguile/vm.c
@@ -903,6 +903,7 @@ 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)
         perror ("madvise failed");