[Emacs-diffs] master bb5641d 1/2: Compilation warning fix for disass.el

[Lars Ingebrigtsen]

branch: master
commit bb5641d3cc4baecba408ad9d88a33dcd54f12297
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Compilation warning fix for disass.el
    
    * lisp/emacs-lisp/disass.el (disassemble-1): Remove a
    string-as-unibyte that probably doesn't do anything, because the
    string in question should be unibyte anyway.  If the assert fails,
    revert the patch.
---
 lisp/emacs-lisp/disass.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/disass.el b/lisp/emacs-lisp/disass.el
index 3fc2224..7625ff8 100644
--- a/lisp/emacs-lisp/disass.el
+++ b/lisp/emacs-lisp/disass.el
@@ -168,7 +168,8 @@ OBJ should be a call to BYTE-CODE generated by the byte 
compiler."
       (fetch-bytecode obj)
       (setq bytes (aref obj 1)
            constvec (aref obj 2)))
-    (let ((lap (byte-decompile-bytecode (string-as-unibyte bytes) constvec))
+    (cl-assert (not (multibyte-string-p bytes)))
+    (let ((lap (byte-decompile-bytecode bytes constvec))
          op arg opname pc-value)
       (let ((tagno 0)
            tmp