mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

add @control and @prompt stub primitives

Browse source 
* libguile/Makefile.am:
* libguile/control.c:
* libguile/control.h:
* libguile/init.c: Add stub @control and @prompt primitives, for use
  when bootstrapping (ice-9 control).
This commit is contained in:
Andy Wingo 2010-01-31 00:01:11 +01:00
parent 9b7ca73cfe
commit b9c100d008
4 changed files with 104 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/init.c
View file

@ -41,6 +41,7 @@
#include "libguile/boolean.h"
#include "libguile/bytevectors.h"
#include "libguile/chars.h"
#include "libguile/control.h"
#include "libguile/continuations.h"
#include "libguile/debug.h"
#ifdef GUILE_DEBUG_MALLOC
@ -453,6 +454,7 @@ scm_i_init_guile (SCM_STACKITEM *base)
scm_bootstrap_programs ();
scm_bootstrap_vm ();
scm_register_foreign ();
scm_register_control ();
scm_init_strings (); /* Requires array-handle */
scm_init_struct (); /* Requires strings */