diff --git a/libguile/__scm.h b/libguile/__scm.h index 60659b8b8..635686aaa 100644 --- a/libguile/__scm.h +++ b/libguile/__scm.h @@ -337,15 +337,11 @@ typedef void *scm_t_subr; #ifdef vms -# ifndef CHEAP_CONTINUATIONS - typedef int jmp_buf[17]; - extern int setjump(jmp_buf env); - extern int longjump(jmp_buf env, int ret); -# define setjmp setjump -# define longjmp longjump -# else -# include -# endif +typedef int jmp_buf[17]; +extern int setjump(jmp_buf env); +extern int longjump(jmp_buf env, int ret); +# define setjmp setjump +# define longjmp longjump #else /* ndef vms */ # ifdef _CRAY1 typedef int jmp_buf[112]; diff --git a/libguile/feature.c b/libguile/feature.c index a9fb1f0e2..ebb77cb08 100644 --- a/libguile/feature.c +++ b/libguile/feature.c @@ -111,9 +111,6 @@ scm_init_feature() #ifndef GO32 scm_add_feature("char-ready?"); #endif -#ifndef CHEAP_CONTINUATIONS - scm_add_feature ("full-continuation"); -#endif #if SCM_USE_PTHREAD_THREADS scm_add_feature ("threads"); #endif