[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 06/11: Simplify definition of SCM_SYSCALL.
From: |
Andy Wingo |
Subject: |
[Guile-commits] 06/11: Simplify definition of SCM_SYSCALL. |
Date: |
Sun, 17 Jun 2018 07:46:22 -0400 (EDT) |
wingo pushed a commit to branch master
in repository guile.
commit 2f39771c845c3fa288bf34416f9649d5fde9c814
Author: Andy Wingo <address@hidden>
Date: Sun Jun 17 09:35:31 2018 +0200
Simplify definition of SCM_SYSCALL.
* libguile/_scm.h (SCM_SYSCALL): Simplify definition.
---
libguile/_scm.h | 30 +-----------------------------
1 file changed, 1 insertion(+), 29 deletions(-)
diff --git a/libguile/_scm.h b/libguile/_scm.h
index 70de31b..5bf3acb 100644
--- a/libguile/_scm.h
+++ b/libguile/_scm.h
@@ -90,29 +90,7 @@
/* ASYNC_TICK after finding EINTR in order to handle pending signals, if
any. See comment in scm_syserror. */
-#ifndef SCM_SYSCALL
-#ifdef vms
-# ifndef __GNUC__
-# include <ssdef.h>
-# define SCM_SYSCALL(line) \
- do \
- { \
- errno = 0; \
- line; \
- if (EVMSERR == errno && (vaxc$errno>>3)==(SS$_CONTROLC>>3)) \
- scm_async_tick (); \
- else \
- break; \
- } \
- while (1)
-# endif /* ndef __GNUC__ */
-#endif /* def vms */
-#endif /* ndef SCM_SYSCALL */
-
-#ifndef SCM_SYSCALL
-# ifdef EINTR
-# if (EINTR > 0)
-# define SCM_SYSCALL(line) \
+#define SCM_SYSCALL(line) \
do \
{ \
errno = 0; \
@@ -124,13 +102,7 @@
} \
} \
while (errno == EINTR)
-# endif /* (EINTR > 0) */
-# endif /* def EINTR */
-#endif /* ndef SCM_SYSCALL */
-#ifndef SCM_SYSCALL
-# define SCM_SYSCALL(line) line;
-#endif /* ndef SCM_SYSCALL */
- [Guile-commits] branch master updated (601d0ea -> f84ce54), Andy Wingo, 2018/06/17
- [Guile-commits] 01/11: Remove unused macro in vm-engine, Andy Wingo, 2018/06/17
- [Guile-commits] 02/11: Remove unused vm_error_unbound, Andy Wingo, 2018/06/17
- [Guile-commits] 06/11: Simplify definition of SCM_SYSCALL.,
Andy Wingo <=
- [Guile-commits] 09/11: Remove unused getters for register backing store base, Andy Wingo, 2018/06/17
- [Guile-commits] 10/11: Add configure check for auxiliary stacks, Andy Wingo, 2018/06/17
- [Guile-commits] 03/11: Call out to expand_stack through new VM intrinsic, Andy Wingo, 2018/06/17
- [Guile-commits] 08/11: Remove #ifdef cases for VMS and Cray., Andy Wingo, 2018/06/17
- [Guile-commits] 05/11: Move some definitions out of _scm.h, Andy Wingo, 2018/06/17
- [Guile-commits] 07/11: Move "min" and "max" macros out of _scm.h, Andy Wingo, 2018/06/17
- [Guile-commits] 11/11: Refactor handling of auxiliary stacks and setjmp/longjmp, Andy Wingo, 2018/06/17
- [Guile-commits] 04/11: Fix libguile subcomponent headers not to include <libguile.h>, Andy Wingo, 2018/06/17