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

More symbols that had not been renamed

Browse source
This commit is contained in:
jgarcia 2007-01-18 16:29:02 +00:00
parent 9101c3849b
commit 9113c159dc
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/c/threads_win32.d
View file

@ -135,8 +135,8 @@ initialize_process_bindings(cl_object process, cl_object initial_bindings)
* bindings */
if (initial_bindings != OBJNULL) {
hash = cl__make_hash_table(@'eq', MAKE_FIXNUM(1024),
make_singlefloat(1.5),
make_singlefloat(0.7),
ecl_make_singlefloat(1.5),
ecl_make_singlefloat(0.7),
Cnil); /* no need for locking */
} else {
hash = si_copy_hash_table(cl_env.bindings_hash);