summaryrefslogtreecommitdiff
path: root/libguile/fluids.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/fluids.h')
-rw-r--r--libguile/fluids.h14
1 files changed, 12 insertions, 2 deletions
diff --git a/libguile/fluids.h b/libguile/fluids.h
index 7b67318be..c80d1e696 100644
--- a/libguile/fluids.h
+++ b/libguile/fluids.h
@@ -95,8 +95,10 @@ SCM scm_fluid_p (SCM fl);
SCM scm_fluid_ref (SCM fluid);
SCM scm_fluid_set_x (SCM fluid, SCM value);
-SCM scm_internal_with_fluids (SCM fluids, SCM vals,
- SCM (*cproc)(void *), void *cdata);
+SCM scm_c_with_fluids (SCM fluids, SCM vals,
+ SCM (*cproc)(void *), void *cdata);
+SCM scm_c_with_fluid (SCM fluid, SCM val,
+ SCM (*cproc)(void *), void *cdata);
SCM scm_with_fluids (SCM fluids, SCM vals, SCM thunk);
SCM scm_make_initial_fluids (void);
@@ -106,6 +108,14 @@ void scm_swap_fluids_reverse (SCM fluids, SCM vals);
void scm_init_fluids (void);
+#if SCM_DEBUG_DEPRECATED == 0
+
+/* Use scm_c_with_fluids instead. */
+SCM scm_internal_with_fluids (SCM fluids, SCM vals,
+ SCM (*cproc)(void *), void *cdata);
+
+#endif
+
#endif /* !FLUIDSH */
/*