diff options
Diffstat (limited to 'module/system/vm/disassembler.scm')
-rw-r--r-- | module/system/vm/disassembler.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/vm/disassembler.scm b/module/system/vm/disassembler.scm index f0b1a1076..f46b160c6 100644 --- a/module/system/vm/disassembler.scm +++ b/module/system/vm/disassembler.scm @@ -615,7 +615,7 @@ address of that offset." (lambda () (disassemble-one code (/ pos 4))) (lambda (len elt) - (define frame-size 2) + (define frame-size 3) (match elt ((_ proc . _) (let lp ((slot (- proc frame-size))) |