summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--module/system/vm/disassembler.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/module/system/vm/disassembler.scm b/module/system/vm/disassembler.scm
index b339b5cbe..138f267d9 100644
--- a/module/system/vm/disassembler.scm
+++ b/module/system/vm/disassembler.scm
@@ -286,12 +286,7 @@ address of that offset."
((prompt)
(match arg
((_ ... target)
- (add-label! (+ offset target) "H"))))
- ((call call/values)
- (let* ((MVRA (+ offset len))
- (RA (+ MVRA 1)))
- (add-label! MVRA "MVRA")
- (add-label! RA "RA"))))))
+ (add-label! (+ offset target) "H")))))))
(lp (+ offset len))))))
(let lp ((offset start) (n 1))
(when (< offset end)