From xemacs-m  Thu Mar 20 20:31:04 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id UAA28746
	for <xemacs-beta@xemacs.org>; Thu, 20 Mar 1997 20:31:03 -0600 (CST)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id DAA02746; Fri, 21 Mar 1997 03:31:03 +0100 (MET)
Sender: hniksic@public.srce.hr
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: `M-x disassemble' not working?
X-URL: ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/
X-Attribution: Hrv
X-Face: &}4JQk=L;e.~x+|eo]#DGk@x3~ed!.~lZ}YQcYb7f[WL9L'Z*+OyA\nA
        EL1M(".[qvI#a2E6WYI5>>e7'@_)3Ol9p|Nn2wNa/;~06jL*B%tTcn/X
        vhAu7qeES0\|MF%$;sI#yn1+y"
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 21 Mar 1997 03:31:02 +0100
Message-ID: <kighgi6rn6h.fsf@jagor.srce.hr>
Lines: 24

I find this intolerable -- disassemble doesn't seem to work in XEmacs
20 (compiled with MULE, but I don't think it matters, since the error
is in char<->int troubles).  The trouble spot is using `int-to-string'
on characters in `disassemble-1'.  Simply changing the three
occurences of `int-to-string' to `char-to-string' doesn't help
matters, as then you get things like `call ^A' instead of `call 1',
etc.

Signaling: (wrong-type-argument numberp ?\^G)
  int-to-string(?\^G)
  disassemble-1(#<compiled-function (from "xmine.elc") nil "...(378)" [1 nil total height width xmine-buffer-init switch-to-buffer xmine-buffer xmine-int-height xmine-int-width make-vector xmine-field xmine-init-mines 99 round float xmine-%-of-mines 100 xmine-number-of-mines insert-string "\n" set-extent-end-glyph make-extent make-glyph xmine-glyph-dir "splash.xpm" "\n\n" xmine-field-button-at xmine-button-create "mine" "0" set-extent-begin-glyph "pad.xpm" make-annotation xmine-new-up text xmine-new-down xmine-new-ann set-extent-property action1 (lambda ... ...) action2 xmine-count-glyph xmine-count-ann xmine-quit-up xmine-quit-down xmine-quit-ann (lambda ... ...) xmine-attach-numbers 0 ...] 9> 0)
  disassemble-internal(xmine-field-create 0 nil)
  #<compiled-function (from "disass.elc") (object &optional buffer indent interactive-p) "...(83)" [object byte-code lambda nil indent 0 interactive-p buffer "*Disassemble*" disassemble-internal] 5 ("/home/hniksic/work/xemacs-20.1-b6/mule/lisp/bytecomp/disass.elc" . 762) (list (intern ...) nil 0 t)>(xmine-field-create nil 0 t)
  call-interactively(disassemble)
  command-execute(disassemble t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)


-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
You'll notice that perl is not itself written in Perl.
                                                 -- The Perl FAQ

