diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-06-18 21:54:14 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-06-18 21:54:14 +0000 |
commit | 903073d5369763e6a388bc80ae947a514ae9d278 (patch) | |
tree | f5dbf2ccc420ff75f90e49eb567324995a9a5b40 /libguile/root.h | |
parent | 31614d8ec70dd96d67501629e226500afcd0defa (diff) | |
download | guile-903073d5369763e6a388bc80ae947a514ae9d278.tar.gz |
* root.h (scm_root_state): Added scm_cur_loadp.
* root.c (mark_root): Added comment about cur_loadp.
Diffstat (limited to 'libguile/root.h')
-rw-r--r-- | libguile/root.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/root.h b/libguile/root.h index 598bade08..032ad31ba 100644 --- a/libguile/root.h +++ b/libguile/root.h @@ -109,6 +109,7 @@ typedef struct scm_root_state SCM def_inp; SCM def_outp; SCM def_errp; + SCM cur_loadp; SCM fluids; @@ -138,6 +139,7 @@ typedef struct scm_root_state #define scm_def_inp (scm_root->def_inp) #define scm_def_outp (scm_root->def_outp) #define scm_def_errp (scm_root->def_errp) +#define scm_cur_loadp (scm_root->cur_loadp) #define scm_top_level_lookup_closure_var \ (scm_root->top_level_lookup_closure_var) #define scm_system_transformer (scm_root->system_transformer) |