Changeset 10264


Ignore:
Timestamp:
Jul 31, 2008, 5:45:54 PM (11 years ago)
Author:
rme
Message:

When printing lisp registers, note whether EDX is unboxed
by virtue of DF being set.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lisp-kernel/lisp-debug.c

    r10171 r10264  
    189189    char *s;
    190190
    191     if (tcr && (tcr->node_regs_mask & bit_for_regnum(r)) == 0)
    192       s = "marked as unboxed";
     191    if (r == REG_EDX && (xpGPR(xp, REG_EFL) & EFL_DF))
     192      s = "marked as unboxed (DF set)";
     193    else if (tcr && (tcr->node_regs_mask & bit_for_regnum(r)) == 0)
     194      s = "marked as unboxed (node_regs_mask)";
    193195    else
    194196      s = print_lisp_object(val);
Note: See TracChangeset for help on using the changeset viewer.