X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fwin32-os.c;h=baac264184965557a700c19266688ed069e20c3e;hb=1de12891f900d156ed035a097561ecd7755a256a;hp=0e6bc1c443fe3fa8379ff09310b7f0fc2f26876f;hpb=a41c057bfe9d8b0b53d2765b8559f18327f28813;p=sbcl.git diff --git a/src/runtime/win32-os.c b/src/runtime/win32-os.c index 0e6bc1c..baac264 100644 --- a/src/runtime/win32-os.c +++ b/src/runtime/win32-os.c @@ -282,7 +282,7 @@ is_valid_lisp_addr(os_vm_address_t addr) struct thread *th; if(in_range_p(addr, READ_ONLY_SPACE_START, READ_ONLY_SPACE_SIZE) || in_range_p(addr, STATIC_SPACE_START , STATIC_SPACE_SIZE) || - in_range_p(addr, DYNAMIC_SPACE_START , DYNAMIC_SPACE_SIZE)) + in_range_p(addr, DYNAMIC_SPACE_START , dynamic_space_size)) return 1; for_each_thread(th) { if(((os_vm_address_t)th->control_stack_start <= addr) && (addr < (os_vm_address_t)th->control_stack_end))