# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1482809339 18000
# Node ID 571d38c4dec3f248b805066c92bbccbc73e484cb
# Parent  1099c2dbc3ad492c5edabf14e48894658de10744
Remove unused function

diff -r 1099c2dbc3ad -r 571d38c4dec3 src/debugger.lisp
--- 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)