Feature #4871 » 0002-vm.c-check_env-print-debug-messages-to-stderr.patch
| vm.c | ||
|---|---|---|
|
static int
|
||
|
check_env(rb_env_t * const env)
|
||
|
{
|
||
|
printf("---\n");
|
||
|
printf("envptr: %p\n", (void *)&env->block.dfp[0]);
|
||
|
printf("envval: %10p ", (void *)env->block.dfp[1]);
|
||
|
fprintf(stderr, "---\n");
|
||
|
fprintf(stderr, "envptr: %p\n", (void *)&env->block.dfp[0]);
|
||
|
fprintf(stderr, "envval: %10p ", (void *)env->block.dfp[1]);
|
||
|
dp(env->block.dfp[1]);
|
||
|
printf("lfp: %10p\n", (void *)env->block.lfp);
|
||
|
printf("dfp: %10p\n", (void *)env->block.dfp);
|
||
|
fprintf(stderr, "lfp: %10p\n", (void *)env->block.lfp);
|
||
|
fprintf(stderr, "dfp: %10p\n", (void *)env->block.dfp);
|
||
|
if (env->prev_envval) {
|
||
|
printf(">>\n");
|
||
|
fprintf(stderr, ">>\n");
|
||
|
check_env_value(env->prev_envval);
|
||
|
printf("<<\n");
|
||
|
fprintf(stderr, "<<\n");
|
||
|
}
|
||
|
return 1;
|
||
|
}
|
||
- « Previous
- 1
- 2
- Next »