mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-18 07:12:26 -08:00
Code Issues Projects Releases Packages Wiki Activity

Move the definition of sched_yield() up for scope reasons.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-03-29 19:34:12 +02:00
parent fc62d7927f
commit 616bcfcf0c
1 changed files with 8 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

16
src/c/threads/queue.d
View file

@ -23,6 +23,14 @@
#define print_lock(a,b,...) (void)0
#ifndef HAVE_SCHED_H
static int
sched_yield()
{
ecl_musleep(0.0, 1);
}
#endif
void ECL_INLINE
ecl_get_spinlock(cl_env_ptr the_env, cl_object *lock)
{
@ -33,14 +41,6 @@ ecl_get_spinlock(cl_env_ptr the_env, cl_object *lock)
}
}
#ifndef HAVE_SCHED_H
int
sched_yield()
{
ecl_musleep(0.0, 1);
}
#endif
void ECL_INLINE
ecl_giveup_spinlock(cl_object *lock)
{