diff options
author | Marius Vollmer <mvo@zagadka.de> | 2002-10-16 16:09:22 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2002-10-16 16:09:22 +0000 |
commit | 5ae37f7114c1abf00983456513a9d1ec65bfeadc (patch) | |
tree | d5fc433e8d256d47e44771f24fd40823c21cb331 | |
parent | e37d58d53b30a4c84becaef9f3f830f369d53930 (diff) | |
download | guile-5ae37f7114c1abf00983456513a9d1ec65bfeadc.tar.gz |
(scm_i_thread_root): Do not validate argument.
-rw-r--r-- | libguile/coop-threads.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/libguile/coop-threads.c b/libguile/coop-threads.c index cf099cf60..ae00d3428 100644 --- a/libguile/coop-threads.c +++ b/libguile/coop-threads.c @@ -395,12 +395,9 @@ scm_all_threads (void) scm_root_state * scm_i_thread_root (SCM thread) -#define FUNC_NAME "scm_i_thread_root" { - SCM_VALIDATE_THREAD (1, thread); return (scm_root_state *)((coop_t *)SCM_THREAD_DATA (thread))->data; } -#undef FUNC_NAME SCM scm_join_thread (SCM thread) |