mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-28 16:00:22 +02:00
* continuations.h: support ia64 register backing store.
(struct scm_t_contregs): add ia64 register backing store.
This commit is contained in:
parent
043a5b0f94
commit
95aaa8a7c5
1 changed files with 9 additions and 0 deletions
|
@ -45,6 +45,10 @@
|
|||
|
||||
#include "libguile/__scm.h"
|
||||
|
||||
#ifdef __ia64__
|
||||
#include <sys/ucontext.h>
|
||||
extern unsigned long __libc_ia64_register_backing_store_base;
|
||||
#endif
|
||||
|
||||
|
||||
/* a continuation SCM is a non-immediate pointing to a heap cell with:
|
||||
|
@ -62,6 +66,11 @@ typedef struct
|
|||
SCM throw_value;
|
||||
jmp_buf jmpbuf;
|
||||
SCM dynenv;
|
||||
#ifdef __ia64__
|
||||
ucontext_t ctx;
|
||||
void *backing_store;
|
||||
unsigned long backing_store_size;
|
||||
#endif /* __ia64__ */
|
||||
SCM_STACKITEM *base; /* base of the live stack, before it was saved. */
|
||||
size_t num_stack_items; /* size of the saved stack. */
|
||||
unsigned long seq; /* dynamic root identifier. */
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue