mdb (gud) under xemacs)

[Lengyel Sandor]

I am trying to run mdb under xemacs.
Set up ..emacs as required.

M-x mdb seem to start the gud correctly.
Once the file name is entered I get the following traceback:

Signaling: (wrong-type-argument listp #<keymap "MDB" 0 entries 0xb21>)
  nconc(#<keymap "MDB" 0 entries 0xb21> #<keymap comint-mode-map 13
entries 0xaa0>)
  gud-new-keymap(#<keymap comint-mode-map 13 entries 0xaa0>)
  (use-local-map (gud-new-keymap (current-local-map)))
)
  (if (and (current-local-map) (lookup-key ... ...)) nil (use-local-map
(gud-new-keymap ...)) (define-key (current-local-map) [menu-bar debug]
(cons gud-menu-name ...)))
)
  gud-make-debug-menu()
  gud-mode()
  gud-common-init("mdb calculator" gud-mdb-massage-args
gud-mdb-marker-filter gud-mdb-find-file)
  (lambda (command-line) "Run mdb (the Mercury debugger) on program
FILE\nwith mdb's I/O in buffer *mdb-FILE*,\nand with the program's I/O
in buffer *FILE*.\nThe directory containing FILE becomes the initial
working directory\nand source-file directory for your debugger."
(interactive (list ...)) (setq gud-menu-name "MDB") (setq
gud-buffer-name-prefix "mdb") (setq gud-show-commands t) (setq
gud-redirect-io t) (gud-common-init command-line (quote
gud-mdb-massage-args) (quote gud-mdb-marker-filter) (quote
gud-mdb-find-file)) (gud-mdb-define-menu-entries)
(gud-mdb-add-menu-entries) (save-excursion (set-buffer gud-prog-buffer)
(gud-mdb-add-menu-entries)) (setq comint-prompt-regexp "^mdb> ") (setq
paragraph-start comint-prompt-regexp) (run-hooks (quote
mdb-mode-hook)))("mdb calculator")
  call-interactively(mdb)
  command-execute(mdb t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)


Do I do anything wrong?

The gud.el is from mercury-rotd-1999-04-04.

Thank you.


-- 
 Lengyel Sándor

Hass, alkoss, gyarapits,
S a haza fényre derül. (Kölcsey)