diff --git a/code/debug-int.lisp b/code/debug-int.lisp index 0e02c090dc1d252d43e312d303b3378e89d5379d..3a418ffb6e0dc612b1aea85b71787bb438bc0ac1 100644 --- a/code/debug-int.lisp +++ b/code/debug-int.lisp @@ -785,11 +785,11 @@ (possibly-an-interpreted-frame (compute-calling-frame (get-context-value - frame + real c::old-fp-save-offset (c::compiled-debug-function-old-fp c-d-f)) (get-context-value - frame + real c::return-pc-save-offset (c::compiled-debug-function-return-pc c-d-f)) frame)