X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fsunos-os.c;h=9278a72628ac7f8fb58e807dad2c602f4af5559f;hb=1de12891f900d156ed035a097561ecd7755a256a;hp=e88e9501cf8694aeed59de31b69cf457f4fc10b2;hpb=a41c057bfe9d8b0b53d2765b8559f18327f28813;p=sbcl.git diff --git a/src/runtime/sunos-os.c b/src/runtime/sunos-os.c index e88e950..9278a72 100644 --- a/src/runtime/sunos-os.c +++ b/src/runtime/sunos-os.c @@ -177,10 +177,10 @@ boolean is_valid_lisp_addr(os_vm_address_t addr) if(in_range_p(addr, READ_ONLY_SPACE_START, READ_ONLY_SPACE_SIZE) || in_range_p(addr, STATIC_SPACE_START , STATIC_SPACE_SIZE) || #ifdef LISP_FEATURE_GENCGC - in_range_p(addr, DYNAMIC_SPACE_START, DYNAMIC_SPACE_SIZE) + in_range_p(addr, DYNAMIC_SPACE_START , dynamic_space_size) #else - in_range_p(addr, DYNAMIC_0_SPACE_START, DYNAMIC_SPACE_SIZE) || - in_range_p(addr, DYNAMIC_1_SPACE_START, DYNAMIC_SPACE_SIZE) + in_range_p(addr, DYNAMIC_0_SPACE_START, dynamic_space_size) || + in_range_p(addr, DYNAMIC_1_SPACE_START, dynamic_space_size) #endif ) return 1;