summaryrefslogtreecommitdiff
path: root/libguile/root.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2002-10-03 22:56:52 +0000
committerMarius Vollmer <mvo@zagadka.de>2002-10-03 22:56:52 +0000
commitd4719ab89265bff48f083b4e029b801c8f69a906 (patch)
tree75ac6a641565668598610e31dff9cb054b046192 /libguile/root.c
parent3b1df924800707bb8f0343f593cf2035fea4f031 (diff)
downloadguile-d4719ab89265bff48f083b4e029b801c8f69a906.tar.gz
* root.h (scm_root_state): Added new "active_asyncs" slot.
* root.c (scm_make_root): Initialize it to SCM_EOL.
Diffstat (limited to 'libguile/root.c')
-rw-r--r--libguile/root.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/root.c b/libguile/root.c
index dd174db5b..6f7d20297 100644
--- a/libguile/root.c
+++ b/libguile/root.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1995,1996,1997,1998,1999,2000, 2001 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1996,1997,1998,1999,2000, 2001, 2002 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
@@ -128,6 +128,9 @@ scm_make_root (SCM parent)
= root_state->parent
= SCM_BOOL_F;
}
+
+ root_state->active_asyncs = SCM_EOL;
+
SCM_REDEFER_INTS;
SCM_NEWSMOB (root, scm_tc16_root, root_state);
root_state->handle = root;