From 752f16ce96aecee1268a1f7cf7afc219e8897121 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Thu, 23 Aug 1990 16:33:05 +0000 Subject: [PATCH] Fixed FRAME-DOWN to pass the real frame into GET-CONTEXT-VALUE, rather than the (possibly interpreter) frame. --- code/debug-int.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/code/debug-int.lisp b/code/debug-int.lisp index 0e02c090d..3a418ffb6 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) -- GitLab