571d38c4dec3

Remove unused function
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Mon, 26 Dec 2016 22:28:59 -0500
parents 1099c2dbc3ad
children e8402b50111c
branches/tags (none)
files src/debugger.lisp

Changes

--- a/src/debugger.lisp	Sat Dec 24 14:47:21 2016 -0500
+++ b/src/debugger.lisp	Mon Dec 26 22:28:59 2016 -0500
@@ -102,11 +102,6 @@
               (or disassembly "")
               bits))))
 
-(defun disassemble-instructions (array start)
-  (iterate
-    (for i :from start :below (length array) :by 2)
-    (collect (instruction-information array i) :result-type vector)))
-
 (defun dump-disassembly (array &optional (start 0) (end (length array)))
   (iterate
     (for i :from start :below end :by 2)