diff --git a/editor/editor.lisp b/editor/editor.lisp index 6671ea7..8b9beb3 100644 --- a/editor/editor.lisp +++ b/editor/editor.lisp @@ -805,18 +805,17 @@ Additionally ensures correct line numbers on the way, as a bonus." (compile-fail-prompt c (car source) (cdr source))) nil)))) (unless (null bytes) - (let* () - (with-open-file (output bin-name :direction :output - :element-type '(unsigned-byte 8) - :if-exists :supersede) - (dolist (byte bytes) - (write-byte byte output))) - (clear-screen) - (usc::send-data-to-c64 (coerce bytes 'vector) - 'draw-transfer-progress) - (clear-screen) - (redisplay-view (current-view *editor*)) - (redisplay-status-line :completely-p t)))))) + (with-open-file (output bin-name :direction :output + :element-type '(unsigned-byte 8) + :if-exists :supersede) + (dolist (byte bytes) + (write-byte byte output))) + (clear-screen) + (usc::send-data-to-c64 (coerce bytes 'vector) + 'draw-transfer-progress) + (clear-screen) + (redisplay-view (current-view *editor*)) + (redisplay-status-line :completely-p t)))))