ruby-changes:4466
From: ko1@a...
Date: Thu, 10 Apr 2008 20:33:30 +0900 (JST)
Subject: [ruby-changes:4466] knu - Ruby:r15957 (ruby_1_8): * misc/rdebug.el, misc/README: Remove rdebug.el as per request
knu 2008-04-10 20:32:55 +0900 (Thu, 10 Apr 2008)
New Revision: 15957
Removed files:
branches/ruby_1_8/misc/rdebug.el
Modified files:
branches/ruby_1_8/ChangeLog
branches/ruby_1_8/misc/README
Log:
* misc/rdebug.el, misc/README: Remove rdebug.el as per request
from the maintainer; bug#19043. Fortunately this file was added
after the last release, so it is kind of safe to remove it.
http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/ChangeLog?r1=15957&r2=15956&diff_format=u
http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/misc/rdebug.el
http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/misc/README?r1=15957&r2=15956&diff_format=u
Index: ruby_1_8/ChangeLog
===================================================================
--- ruby_1_8/ChangeLog (revision 15956)
+++ ruby_1_8/ChangeLog (revision 15957)
@@ -1,3 +1,9 @@
+Thu Apr 10 20:29:13 2008 Akinori MUSHA <knu@i...>
+
+ * misc/rdebug.el, misc/README: Remove rdebug.el as per request
+ from the maintainer; bug#19043. Fortunately this file was added
+ after the last release, so it is kind of safe to remove it.
+
Thu Apr 10 20:08:37 2008 Akinori MUSHA <knu@i...>
* enum.c (enum_first, enum_group_by): New methods:
Index: ruby_1_8/misc/rdebug.el
===================================================================
--- ruby_1_8/misc/rdebug.el (revision 15956)
+++ ruby_1_8/misc/rdebug.el (revision 15957)
@@ -1,136 +0,0 @@
-;; This file adds support for ruby-debug (rdebug) in Emacs.
-;; Copyright (C) 2007 Martin Nordholts <enselic@g...>
-;;
-;; This file is based on 'rubydb3x.el' that comes with Ruby which is
-;; Copyright (C) Yukihiro Matsumoto aka Matz
-;;
-;; Installation:
-;; -------------
-;;
-;; 1. Make sure you have ruby-debug on your system (test by running
-;; the commmand 'rdebug -v' in a shell).
-;;
-;; 2. Copy this file into e.g. ~/.elisp and make sure this is in
-;; your ~/.emacs:
-;;
-;; (add-to-list 'load-path "~/.elisp")
-;; (load-library "rdebug")
-;;
-;; you can then start the debugger with M-x rdebug
-;;
-;; 3. Setup convenient keybindings etc. This is what I have:
-;;
-;; (global-set-key [f9] 'gud-step)
-;; (global-set-key [f10] 'gud-next)
-;; (global-set-key [f11] 'gud-cont)
-;;
-;; (global-set-key "\C-c\C-d" 'rdebug)
-;;
-;; 4. Debug like crazy!
-;;
-;; Bugs:
-;; -----
-;;
-;; Basic functionality works fine, though there might be a bug hiding somewhere.
-
-(require 'gud)
-(provide 'rdebug)
-
-;; ======================================================================
-;; rdebug functions
-
-;;; History of argument lists passed to rdebug.
-(defvar gud-rdebug-history nil)
-
-(if (fboundp 'gud-overload-functions)
- (defun gud-rdebug-massage-args (file args)
- (cons file args))
- (defun gud-rdebug-massage-args (file args)
- args))
-
-;; There's no guarantee that Emacs will hand the filter the entire
-;; marker at once; it could be broken up across several strings. We
-;; might even receive a big chunk with several markers in it. If we
-;; receive a chunk of text which looks like it might contain the
-;; beginning of a marker, we save it here between calls to the
-;; filter.
-(defvar gud-rdebug-marker-acc "")
-(make-variable-buffer-local 'gud-rdebug-marker-acc)
-
-(defun gud-rdebug-marker-filter (string)
- (setq gud-rdebug-marker-acc (concat gud-rdebug-marker-acc string))
- (let ((output ""))
-
- ;; Process all the complete markers in this chunk.
- (while (string-match "\\([^:\n]*\\):\\([0-9]+\\):.*\n"
- gud-rdebug-marker-acc)
- (setq
-
- ;; Extract the frame position from the marker.
- gud-last-frame
- (cons (substring gud-rdebug-marker-acc (match-beginning 1) (match-end 1))
- (string-to-int (substring gud-rdebug-marker-acc
- (match-beginning 2)
- (match-end 2))))
-
-
- ;; Append any text before the marker to the output we're going
- ;; to return - we don't include the marker in this text.
- output (concat output
- (substring gud-rdebug-marker-acc 0 (match-beginning 0)))
-
- ;; Set the accumulator to the remaining text.
- gud-rdebug-marker-acc (substring gud-rdebug-marker-acc (match-end 0))))
-
- (setq output (concat output gud-rdebug-marker-acc)
- gud-rdebug-marker-acc "")
-
- output))
-
-(defun gud-rdebug-find-file (f)
- (save-excursion
- (let ((buf (find-file-noselect f)))
- (set-buffer buf)
-;; (gud-make-debug-menu)
- buf)))
-
-(defvar rdebug-command-name "rdebug"
- "File name for executing rdebug.")
-
-;;;###autoload
-(defun rdebug (command-line)
- "Run rdebug on program FILE in buffer *gud-FILE*.
-The directory containing FILE becomes the initial working directory
-and source-file directory for your debugger."
- (interactive
- (list (read-from-minibuffer "Run rdebug (like this): "
- (if (consp gud-rdebug-history)
- (car gud-rdebug-history)
- (concat rdebug-command-name " "))
- nil nil
- '(gud-rdebug-history . 1))))
-
- (if (not (fboundp 'gud-overload-functions))
- (gud-common-init command-line 'gud-rdebug-massage-args
- 'gud-rdebug-marker-filter 'gud-rdebug-find-file)
- (gud-overload-functions '((gud-massage-args . gud-rdebug-massage-args)
- (gud-marker-filter . gud-rdebug-marker-filter)
- (gud-find-file . gud-rdebug-find-file)))
- (gud-common-init command-line rdebug-command-name))
-
- (gud-def gud-break "break %d%f:%l" "\C-b" "Set breakpoint at current line in current file.")
-; (gud-def gud-remove "delete %d%f:%l" "\C-d" "Remove breakpoint at current line in current file.")
- (gud-def gud-step "step" "\C-s" "Step one source line with display.")
- (gud-def gud-next "next" "\C-n" "Step one line (skip functions).")
- (gud-def gud-cont "cont" "\C-r" "Continue with display.")
- (gud-def gud-finish "finish" "\C-f" "Finish executing current function.")
- (gud-def gud-up "up %p" "<" "Up N stack frames (numeric arg).")
- (gud-def gud-down "down %p" ">" "Down N stack frames (numeric arg).")
- (gud-def gud-print "p %e" "\C-p" "Evaluate ruby expression at point.")
-
- (setq comint-prompt-regexp "^(rdb:-) ")
- (if (boundp 'comint-last-output-start)
- (set-marker comint-last-output-start (point)))
- (set (make-local-variable 'paragraph-start) comint-prompt-regexp)
- (run-hooks 'rdebug-mode-hook)
- )
Index: ruby_1_8/misc/README
===================================================================
--- ruby_1_8/misc/README (revision 15956)
+++ ruby_1_8/misc/README (revision 15957)
@@ -4,4 +4,3 @@
rubydb2x.el ruby debugger support for emacs 19.2x or before
rubydb3x.el ruby debugger support for emacs 19.3x or later
ruby-electric.el emacs minor mode providing electric commands
-rdebug.el ruby-debug (rdebug) support for emacs 19.3x or later
--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/