Changeset 14542


Ignore:
Timestamp:
Jan 2, 2011, 5:56:36 AM (9 years ago)
Author:
gb
Message:

In CURRENT-FAKE-STACK-FRAME, return NIL when we hit the bottom
of the stack or a bad header.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/arm-threads-utils.lisp

    r14119 r14542  
    4545(defun current-fake-stack-frame ()
    4646  (do* ((p (%get-frame-ptr) (%%frame-backlink p)))
    47        ((zerop p))
     47       ((or (zerop p) (bottom-of-stack-p p nil)))
    4848    (when (fake-stack-frame-p p) (return p))))
    4949
Note: See TracChangeset for help on using the changeset viewer.