URL https://opencores.org/ocsvn/open8_urisc/open8_urisc/trunk

Subversion Repositories open8_urisc

[/] [open8_urisc/] [trunk/] [gnu/] [binutils/] [binutils/] [dwarf-mode.el] - Diff between revs 15 and 161

Rev 15	Rev 161
Line 45...	Line 45...
`(forward-char)`	`(forward-char)`
`(point)))`	`(point)))`
`(save-excursion`	`(save-excursion`
`(apply #'call-process dwarf-objdump-program nil (current-buffer) nil`	`(apply #'call-process dwarf-objdump-program nil (current-buffer) nil`
`"-Wi" (concat "--dwarf-start=0x" die)`	`"-Wi" (concat "--dwarf-start=0x" die)`
`dwarf-file`	`(expand-file-name dwarf-file)`
`(if new-depth (list (concat "--dwarf-depth="`	`(if new-depth (list (concat "--dwarf-depth="`
`(int-to-string new-depth))))))`	`(int-to-string new-depth))))))`
`(set-buffer-modified-p nil)))`	`(set-buffer-modified-p nil)))`

`(defun dwarf-insert-substructure-button (die)`	`(defun dwarf-insert-substructure-button (die)`
Line 134...	Line 134...
`(erase-buffer)`	`(erase-buffer)`
`(save-excursion`	`(save-excursion`
`(call-process dwarf-objdump-program`	`(call-process dwarf-objdump-program`
`nil (current-buffer) nil`	`nil (current-buffer) nil`
`"-Wi" "--dwarf-depth=1"`	`"-Wi" "--dwarf-depth=1"`
`dwarf-file))`	`(expand-file-name dwarf-file)))`
`(set-buffer-modified-p nil)))`	`(set-buffer-modified-p nil)))`

`;;;###autoload`	`;;;###autoload`
`(define-derived-mode dwarf-mode special-mode "DWARF"`	`(define-derived-mode dwarf-mode special-mode "DWARF"`
`"Major mode for browsing DWARF output.`	`"Major mode for browsing DWARF output.`