* Re: [elpa] master d7bac58 3/5: Wrong require again.
[not found] ` <20160804030326.B379D220169@vcs.savannah.gnu.org>
@ 2016-08-04 4:43 ` Stefan Monnier
2016-08-04 13:45 ` Rocky Bernstein
0 siblings, 1 reply; 6+ messages in thread
From: Stefan Monnier @ 2016-08-04 4:43 UTC (permalink / raw)
To: emacs-devel; +Cc: rocky
> (require 'cl-lib)
> +(require 'cl)
These two libraries are pretty much identical, except that they use
different names, so there's no point requiring both (`cl' is the old
deprecated one, and `cl-lib' is the new shiny one).
Do you want me to update the code to use `cl-lib' exclusively?
Stefan
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [elpa] master ecf1577 1/5: Avoid reading a binary as a source file
[not found] ` <20160804030326.835FA2200F4@vcs.savannah.gnu.org>
@ 2016-08-04 4:44 ` Stefan Monnier
2016-08-04 13:52 ` Rocky Bernstein
0 siblings, 1 reply; 6+ messages in thread
From: Stefan Monnier @ 2016-08-04 4:44 UTC (permalink / raw)
To: emacs-devel; +Cc: rocky
> -; (require 'term)
> +;; (require 'term)
> +(require 'files)
Which "files" package is that? The one that comes with Emacs is
preloaded, so it never needs to be `required' explicitly.
Stefan
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [elpa] master d7bac58 3/5: Wrong require again.
2016-08-04 4:43 ` [elpa] master d7bac58 3/5: Wrong require again Stefan Monnier
@ 2016-08-04 13:45 ` Rocky Bernstein
2016-08-04 22:05 ` Stefan Monnier
0 siblings, 1 reply; 6+ messages in thread
From: Rocky Bernstein @ 2016-08-04 13:45 UTC (permalink / raw)
To: Stefan Monnier; +Cc: emacs-devel
[-- Attachment #1: Type: text/plain, Size: 589 bytes --]
On Thu, Aug 4, 2016 at 12:43 AM, Stefan Monnier <monnier@iro.umontreal.ca>
wrote:
> > (require 'cl-lib)
> > +(require 'cl)
>
> These two libraries are pretty much identical, except that they use
> different names, so there's no point requiring both (`cl' is the old
> deprecated one, and `cl-lib' is the new shiny one).
>
> Do you want me to update the code to use `cl-lib' exclusively?
>
Yes, please. You know more about this than I. See also:
https://github.com/realgud/realgud/commit/bbb86b7010cac192f05c274c57115423f8cc5cc7#commitcomment-18512997
>
>
> Stefan
>
[-- Attachment #2: Type: text/html, Size: 1403 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [elpa] master ecf1577 1/5: Avoid reading a binary as a source file
2016-08-04 4:44 ` [elpa] master ecf1577 1/5: Avoid reading a binary as a source file Stefan Monnier
@ 2016-08-04 13:52 ` Rocky Bernstein
0 siblings, 0 replies; 6+ messages in thread
From: Rocky Bernstein @ 2016-08-04 13:52 UTC (permalink / raw)
To: Stefan Monnier; +Cc: emacs-devel
[-- Attachment #1: Type: text/plain, Size: 639 bytes --]
Ok. Fixed in elpa now.
And that code improvement a while back to loc-changes using zerop, if you
could make, that'd be fine as well.
In general if you want to create push changes to elpa please do so. Or if
it's something you want to comment about make a branch and push to that.
Dealing with diffs via email is for me error prone.
On Thu, Aug 4, 2016 at 12:44 AM, Stefan Monnier <monnier@iro.umontreal.ca>
wrote:
> > -; (require 'term)
> > +;; (require 'term)
> > +(require 'files)
>
> Which "files" package is that? The one that comes with Emacs is
> preloaded, so it never needs to be `required' explicitly.
>
>
> Stefan
>
[-- Attachment #2: Type: text/html, Size: 1119 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: [elpa] master d7bac58 3/5: Wrong require again.
2016-08-04 13:45 ` Rocky Bernstein
@ 2016-08-04 22:05 ` Stefan Monnier
2016-08-04 22:05 ` Rocky Bernstein
0 siblings, 1 reply; 6+ messages in thread
From: Stefan Monnier @ 2016-08-04 22:05 UTC (permalink / raw)
To: Rocky Bernstein; +Cc: emacs-devel
>> Do you want me to update the code to use `cl-lib' exclusively?
> Yes, please. You know more about this than I. See also:
The (untested) patch below should do it. Do you want me to push it to
elpa.git?
Stefan
diff --git a/packages/realgud/ChangeLog b/packages/realgud/ChangeLog
index bc3f48c..d0bb58b 100644
--- a/packages/realgud/ChangeLog
+++ b/packages/realgud/ChangeLog
@@ -1,3 +1,26 @@
+2016-08-04 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * realgud.el: Add missing cl-lib dependency.
+ * <most-other-files>: Remove unneeded (require 'cl) and replace the
+ other ones with (require 'cl-lib)
+
+ * test/test-common-helper.el (realgud-test-info):
+ * realgud/common/regexp.el (realgud-loc-pat):
+ * realgud/common/lochist.el (realgud-loc-hist):
+ * realgud/common/buffer/info.el (realgud-backtrace-info):
+ * realgud/common/loc.el (realgud-loc): Use `cl-defstruct'.
+
+ * realgud/common/run.el (realgud:run-process, realgud:run-debugger):
+ Use cl-remove-if and cl-remove-duplicates.
+
+ * realgud/common/track.el (realgud-track-bp-loc): Fix typo.
+
+ * test/test-track.el:
+ * test/test-regexp.el:
+ * test/test-regexp-ruby.el:
+ * test/test-regexp-rdebug.el:
+ * test/test-core.el: Use lexical-binding rather than lexical-let.
+
2010-11-27 rocky <rocky@gnu.org>
* dbgr/debugger/trepan/init.el, dbgr/lang/ruby.el,
diff --git a/packages/realgud/realgud.el b/packages/realgud/realgud.el
index b16cc48..026dbb4 100644
--- a/packages/realgud/realgud.el
+++ b/packages/realgud/realgud.el
@@ -3,11 +3,10 @@
;; Author: Rocky Bernstein <rocky@gnu.org>
;; Version: 1.4.3
;; Package-Type: multi
-;; Package-Requires: ((load-relative "1.2") (loc-changes "1.2") (test-simple "1.2.0"))
+;; Package-Requires: ((load-relative "1.2") (loc-changes "1.2") (test-simple "1.2.0") (cl-lib "0.5") (emacs "24"))
;; URL: http://github.com/realgud/realgud/
-;; Compatibility: GNU Emacs 24.x
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
diff --git a/packages/realgud/realgud/common/attach.el b/packages/realgud/realgud/common/attach.el
index f0efbff..aefd62f 100644
--- a/packages/realgud/realgud/common/attach.el
+++ b/packages/realgud/realgud/common/attach.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,7 +17,6 @@
;;; Emacs Commands to associate or attach a source buffer to a command
;;; buffer and vice versa.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '("buffer/command" "buffer/source")
"realgud-buffer-")
diff --git a/packages/realgud/realgud/common/backtrack-mode.el b/packages/realgud/realgud/common/backtrack-mode.el
index aaf89c9..a4bbfc5 100644
--- a/packages/realgud/realgud/common/backtrack-mode.el
+++ b/packages/realgud/realgud/common/backtrack-mode.el
@@ -20,7 +20,6 @@
;; process shell arround Compare with backtrace-mode.el which
;; handles backtraces inside the debugger
-(eval-when-compile (require 'cl))
(require 'shell)
(require 'load-relative)
diff --git a/packages/realgud/realgud/common/buffer/info.el b/packages/realgud/realgud/common/buffer/info.el
index 571b614..246f302 100644
--- a/packages/realgud/realgud/common/buffer/info.el
+++ b/packages/realgud/realgud/common/buffer/info.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@@ -16,12 +16,12 @@
;;; A mode based off of org mode to show debugger information
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib))
(require 'org)
(require 'load-relative)
-(defstruct realgud-backtrace-info
+(cl-defstruct realgud-backtrace-info
"debugger object/structure specific to debugger info."
(cmdbuf nil) ;; buffer of the associated debugger process
)
diff --git a/packages/realgud/realgud/common/cmds.el b/packages/realgud/realgud/common/cmds.el
index 4b2f3eb..8f02555 100644
--- a/packages/realgud/realgud/common/cmds.el
+++ b/packages/realgud/realgud/common/cmds.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
diff --git a/packages/realgud/realgud/common/fringe.el b/packages/realgud/realgud/common/fringe.el
index 745d85b..c50153b 100644
--- a/packages/realgud/realgud/common/fringe.el
+++ b/packages/realgud/realgud/common/fringe.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2012, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2012, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -86,9 +86,6 @@ position.")
"Overlay arrow variable which contains the 3rd most recent debugger
position.")
-(eval-when-compile (require 'cl))
-
-
;; FIXME: since overlay overlay-arrow-list can be global, and perhaps
;; has to stay that way since some Emacs code may expect that, we
;; should use different global overlay arrow variables for the
diff --git a/packages/realgud/realgud/common/helper.el b/packages/realgud/realgud/common/helper.el
index 705100d..7467b2b 100644
--- a/packages/realgud/realgud/common/helper.el
+++ b/packages/realgud/realgud/common/helper.el
@@ -12,8 +12,7 @@
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
-(require 'cl-lib)
-(require 'cl)
+(eval-when-compile (require 'cl-lib)) ;For setf.
;;; Miscellaneous utility functions
(require 'load-relative)
diff --git a/packages/realgud/realgud/common/loc.el b/packages/realgud/realgud/common/loc.el
index 00c75a0..76584c0 100644
--- a/packages/realgud/realgud/common/loc.el
+++ b/packages/realgud/realgud/common/loc.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -18,6 +18,8 @@
;; This describes a debugger location structure and has code for
;; working with them.
+(eval-when-compile (require 'cl-lib))
+
(require 'load-relative)
(require 'loc-changes)
(require-relative-list '("fringe" "follow") "realgud-")
@@ -30,7 +32,7 @@
(declare-function realgud-get-cmdbuf-from-srcbuf 'realgud-buffer-helper)
(declare-function realgud-srcbuf? 'realgud-buffer-source)
-(defstruct realgud-loc
+(cl-defstruct realgud-loc
"Our own location type. Even though a mark contains a
file-name (via a buffer) and a line number (via an offset), we
want to save the values that were seen/requested originally."
diff --git a/packages/realgud/realgud/common/lochist.el b/packages/realgud/realgud/common/lochist.el
index 33fcf49..786e8e3 100644
--- a/packages/realgud/realgud/common/lochist.el
+++ b/packages/realgud/realgud/common/lochist.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2012, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2012, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -20,6 +20,7 @@
;;; Code:
+(eval-when-compile (require 'cl-lib))
(require 'ring)
(require 'org)
(require 'load-relative)
@@ -32,7 +33,7 @@
:type 'integer
:group 'realgud)
-(defstruct realgud-loc-hist
+(cl-defstruct realgud-loc-hist
"A list of source-code positions recently encountered"
(position -1)
(ring (make-ring realgud-loc-hist-size)))
diff --git a/packages/realgud/realgud/common/regexp.el b/packages/realgud/realgud/common/regexp.el
index 127d7c2..e21de25 100644
--- a/packages/realgud/realgud/common/regexp.el
+++ b/packages/realgud/realgud/common/regexp.el
@@ -27,9 +27,9 @@
;; Variables defining regular expressions (regexp:s).
;;
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib))
-(defstruct realgud-loc-pat
+(cl-defstruct realgud-loc-pat
"Information to match and extract position and other related information typically
output by a debugger inside a process shell"
(num) ;; General number. Could be for example
diff --git a/packages/realgud/realgud/common/run.el b/packages/realgud/realgud/common/run.el
index a24e123..f78bd35 100644
--- a/packages/realgud/realgud/common/run.el
+++ b/packages/realgud/realgud/common/run.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,7 +17,7 @@
; (require 'term)
-(require 'cl)
+(require 'cl-lib)
(require 'shell)
(require 'load-relative)
(require-relative-list '("core" "track" "utils") "realgud-")
@@ -152,7 +152,7 @@ marginal icons is reset."
(if (boundp 'starting-directory)
(realgud-cmdbuf-info-starting-directory= starting-directory))
(set minibuffer-history
- (remove-duplicates
+ (cl-remove-duplicates
(cons cmd-str (eval minibuffer-history)) :from-end)
))
)))
@@ -191,7 +191,7 @@ Otherwise nil is returned.
(script-args (caddr parsed-args))
(script-name (or opt-script-name (car script-args)))
(parsed-cmd-args
- (remove-if 'nil (realgud:flatten parsed-args)))
+ (cl-remove-if 'nil (realgud:flatten parsed-args)))
)
(realgud:run-process debugger-name script-name parsed-cmd-args
minibuffer-history no-reset)
diff --git a/packages/realgud/realgud/common/send.el b/packages/realgud/realgud/common/send.el
index b8b1f7e..81edf16 100644
--- a/packages/realgud/realgud/common/send.el
+++ b/packages/realgud/realgud/common/send.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
diff --git a/packages/realgud/realgud/common/track-mode.el b/packages/realgud/realgud/common/track-mode.el
index bf0888b..4f58428 100644
--- a/packages/realgud/realgud/common/track-mode.el
+++ b/packages/realgud/realgud/common/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; tracks shell output
-(eval-when-compile (require 'cl))
(require 'shell)
(require 'load-relative)
diff --git a/packages/realgud/realgud/common/track.el b/packages/realgud/realgud/common/track.el
index 36f8e98..badb83f 100644
--- a/packages/realgud/realgud/common/track.el
+++ b/packages/realgud/realgud/common/track.el
@@ -481,7 +481,7 @@ Otherwise return nil. CMD-MARK is set in the realgud-loc object created.
(message "line number not found -- using 1"))
(if (and filename lineno)
(let* ((directory
- (cond ((boundp 'starting-directory) staring-directory)
+ (cond ((boundp 'starting-directory) starting-directory)
(t nil)))
(loc-or-error
(realgud:file-loc-from-line
diff --git a/packages/realgud/realgud/debugger/bashdb/core.el b/packages/realgud/realgud/debugger/bashdb/core.el
index 899eec0..87c371c 100644
--- a/packages/realgud/realgud/debugger/bashdb/core.el
+++ b/packages/realgud/realgud/debugger/bashdb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -14,7 +14,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/core")
diff --git a/packages/realgud/realgud/debugger/bashdb/init.el b/packages/realgud/realgud/debugger/bashdb/init.el
index 2e3f8a3..2c7769f 100644
--- a/packages/realgud/realgud/debugger/bashdb/init.el
+++ b/packages/realgud/realgud/debugger/bashdb/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,8 +17,7 @@
;; Regular expressions for Bash shell debugger: bashdb
-(eval-when-compile (require 'cl))
-
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
"../../common/loc"
diff --git a/packages/realgud/realgud/debugger/bashdb/track-mode.el b/packages/realgud/realgud/debugger/bashdb/track-mode.el
index 0e3dfef..d01d6c7 100644
--- a/packages/realgud/realgud/debugger/bashdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/bashdb/track-mode.el
@@ -16,7 +16,6 @@
;; Bash Debugger tracking in a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/gdb/core.el b/packages/realgud/realgud/debugger/gdb/core.el
index 5a36a23..35fc492 100644
--- a/packages/realgud/realgud/debugger/gdb/core.el
+++ b/packages/realgud/realgud/debugger/gdb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,9 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
-
-(require 'files)
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/gdb/gdb.el b/packages/realgud/realgud/debugger/gdb/gdb.el
index 91776a0..4c2853f 100644
--- a/packages/realgud/realgud/debugger/gdb/gdb.el
+++ b/packages/realgud/realgud/debugger/gdb/gdb.el
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; `realgud:gdb' Main interface to gdb via Emacs
-(require 'cl)
(require 'load-relative)
(require-relative-list '("../../common/helper" "../../common/utils")
"realgud-")
diff --git a/packages/realgud/realgud/debugger/gdb/init.el b/packages/realgud/realgud/debugger/gdb/init.el
index 8b7ac86..92bb5d6 100644
--- a/packages/realgud/realgud/debugger/gdb/init.el
+++ b/packages/realgud/realgud/debugger/gdb/init.el
@@ -17,7 +17,7 @@
;;; gdb debugger
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib))
(require 'load-relative)
(require-relative-list '("../../common/regexp" "../../common/loc") "realgud-")
diff --git a/packages/realgud/realgud/debugger/gdb/track-mode.el b/packages/realgud/realgud/debugger/gdb/track-mode.el
index d56e4b2..9497657 100644
--- a/packages/realgud/realgud/debugger/gdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/gdb/track-mode.el
@@ -19,7 +19,6 @@
;; gdb tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/gub/core.el b/packages/realgud/realgud/debugger/gub/core.el
index 12dc8ff..d6d13da 100644
--- a/packages/realgud/realgud/debugger/gub/core.el
+++ b/packages/realgud/realgud/debugger/gub/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2013-2014 Free Software Foundation, Inc
+;; Copyright (C) 2013-2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/lang"
"../../common/core") "realgud-")
diff --git a/packages/realgud/realgud/debugger/gub/init.el b/packages/realgud/realgud/debugger/gub/init.el
index 01f71a3..f244267 100644
--- a/packages/realgud/realgud/debugger/gub/init.el
+++ b/packages/realgud/realgud/debugger/gub/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
;; This program is free software: you can redistribute it and/or
@@ -17,7 +17,7 @@
;; Regular expressions for Go SSA debugger: gub
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/gub/track-mode.el b/packages/realgud/realgud/debugger/gub/track-mode.el
index 3f74cbc..b48bb0c 100644
--- a/packages/realgud/realgud/debugger/gub/track-mode.el
+++ b/packages/realgud/realgud/debugger/gub/track-mode.el
@@ -9,7 +9,6 @@
;;; Golang SSA gub tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/ipdb/core.el b/packages/realgud/realgud/debugger/ipdb/core.el
index 789920b..8d64e6a 100644
--- a/packages/realgud/realgud/debugger/ipdb/core.el
+++ b/packages/realgud/realgud/debugger/ipdb/core.el
@@ -11,8 +11,6 @@
;; along with this program. If not, see <http://www.gnu.or/licenses/>.
-(eval-when-compile (require 'cl))
-
(require 'comint)
(require 'load-relative)
(require-relative-list '("../../common/track"
diff --git a/packages/realgud/realgud/debugger/ipdb/init.el b/packages/realgud/realgud/debugger/ipdb/init.el
index 07ae8ad..b1cd04f 100644
--- a/packages/realgud/realgud/debugger/ipdb/init.el
+++ b/packages/realgud/realgud/debugger/ipdb/init.el
@@ -17,7 +17,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Stock Python debugger ipdb
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/ipdb/track-mode.el b/packages/realgud/realgud/debugger/ipdb/track-mode.el
index 17133b3..b723a07 100644
--- a/packages/realgud/realgud/debugger/ipdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/ipdb/track-mode.el
@@ -17,7 +17,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Python "ipdb" Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/jdb/backtrack-mode.el b/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
index 179ac63..1454edc 100644
--- a/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
+++ b/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Mode for parsing various kinds of backtraces found in Java
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/jdb/core.el b/packages/realgud/realgud/debugger/jdb/core.el
index f4c35d2..9199c23 100644
--- a/packages/realgud/realgud/debugger/jdb/core.el
+++ b/packages/realgud/realgud/debugger/jdb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2014 Free Software Foundation, Inc
+;; Copyright (C) 2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
;; We use gud to handle the classpath-to-filename mapping
(require 'gud)
(require 'compile) ;; for compilation-find-file
diff --git a/packages/realgud/realgud/debugger/jdb/init.el b/packages/realgud/realgud/debugger/jdb/init.el
index 13548e0..82bfe4a 100644
--- a/packages/realgud/realgud/debugger/jdb/init.el
+++ b/packages/realgud/realgud/debugger/jdb/init.el
@@ -7,7 +7,7 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/jdb/jdb.el b/packages/realgud/realgud/debugger/jdb/jdb.el
index bb6d41c..62afcea 100644
--- a/packages/realgud/realgud/debugger/jdb/jdb.el
+++ b/packages/realgud/realgud/debugger/jdb/jdb.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -10,7 +10,6 @@
;; `jdb' Main interface to jdb via Emacs
(require 'gud) ;; For class-path and source-path handling
-(require 'cl)
(require 'load-relative)
(require-relative-list '("../../common/run") "realgud:")
diff --git a/packages/realgud/realgud/debugger/jdb/track-mode.el b/packages/realgud/realgud/debugger/jdb/track-mode.el
index 208b6cf..e35a134 100644
--- a/packages/realgud/realgud/debugger/jdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/jdb/track-mode.el
@@ -9,7 +9,6 @@
;; Java "jdb" Debugger tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/kshdb/core.el b/packages/realgud/realgud/debugger/kshdb/core.el
index 5571583..afcb119 100644
--- a/packages/realgud/realgud/debugger/kshdb/core.el
+++ b/packages/realgud/realgud/debugger/kshdb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/core") "realgud-")
(require-relative-list '("init") "realgud:kshdb-")
diff --git a/packages/realgud/realgud/debugger/kshdb/init.el b/packages/realgud/realgud/debugger/kshdb/init.el
index 44fcdb8..e6f6f74 100644
--- a/packages/realgud/realgud/debugger/kshdb/init.el
+++ b/packages/realgud/realgud/debugger/kshdb/init.el
@@ -9,7 +9,7 @@
;;Regular expressions for Korn shell debugger: kshdb
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/kshdb/track-mode.el b/packages/realgud/realgud/debugger/kshdb/track-mode.el
index ea62baf..a80da63 100644
--- a/packages/realgud/realgud/debugger/kshdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/kshdb/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; "kshdb" Debugger tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/nodejs/core.el b/packages/realgud/realgud/debugger/nodejs/core.el
index 1ff8b71..065ac37 100644
--- a/packages/realgud/realgud/debugger/nodejs/core.el
+++ b/packages/realgud/realgud/debugger/nodejs/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,8 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/core")
"realgud-")
diff --git a/packages/realgud/realgud/debugger/nodejs/init.el b/packages/realgud/realgud/debugger/nodejs/init.el
index e20211e..70634af 100644
--- a/packages/realgud/realgud/debugger/nodejs/init.el
+++ b/packages/realgud/realgud/debugger/nodejs/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Regular expressions for nodejs Javascript debugger.
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/nodejs/track-mode.el b/packages/realgud/realgud/debugger/nodejs/track-mode.el
index 753e20d..6afaa62 100644
--- a/packages/realgud/realgud/debugger/nodejs/track-mode.el
+++ b/packages/realgud/realgud/debugger/nodejs/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; nodejs tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/pdb/core.el b/packages/realgud/realgud/debugger/pdb/core.el
index 8964cf6..16c5dbd 100644
--- a/packages/realgud/realgud/debugger/pdb/core.el
+++ b/packages/realgud/realgud/debugger/pdb/core.el
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/pdb/init.el b/packages/realgud/realgud/debugger/pdb/init.el
index ac346b8..7068758 100644
--- a/packages/realgud/realgud/debugger/pdb/init.el
+++ b/packages/realgud/realgud/debugger/pdb/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Stock Python debugger pdb
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/pdb/pdb.el b/packages/realgud/realgud/debugger/pdb/pdb.el
index 1946478..8ddd380 100644
--- a/packages/realgud/realgud/debugger/pdb/pdb.el
+++ b/packages/realgud/realgud/debugger/pdb/pdb.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
diff --git a/packages/realgud/realgud/debugger/pdb/track-mode.el b/packages/realgud/realgud/debugger/pdb/track-mode.el
index 7958eae..b18172f 100644
--- a/packages/realgud/realgud/debugger/pdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/pdb/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Python "pdb" Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/perldb/core.el b/packages/realgud/realgud/debugger/perldb/core.el
index 2df3533..04f6f0c 100644
--- a/packages/realgud/realgud/debugger/perldb/core.el
+++ b/packages/realgud/realgud/debugger/perldb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011, 2013-2014 Free Software Foundation, Inc
+;; Copyright (C) 2011, 2013-2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/perldb/init.el b/packages/realgud/realgud/debugger/perldb/init.el
index 27c47c0..42dbedf 100644
--- a/packages/realgud/realgud/debugger/perldb/init.el
+++ b/packages/realgud/realgud/debugger/perldb/init.el
@@ -16,7 +16,7 @@
;;; Regular expressions for nodejs Javascript debugger.
;;; Stock Perl debugger perldb
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp" "../../common/loc") "realgud-")
diff --git a/packages/realgud/realgud/debugger/perldb/track-mode.el b/packages/realgud/realgud/debugger/perldb/track-mode.el
index 39c2ec7..ce80a23 100644
--- a/packages/realgud/realgud/debugger/perldb/track-mode.el
+++ b/packages/realgud/realgud/debugger/perldb/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Stock Perl Debugger "perldb5" tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/rdebug/core.el b/packages/realgud/realgud/debugger/rdebug/core.el
index 78a5a2d..bd66518 100644
--- a/packages/realgud/realgud/debugger/rdebug/core.el
+++ b/packages/realgud/realgud/debugger/rdebug/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/rdebug/init.el b/packages/realgud/realgud/debugger/rdebug/init.el
index ec28401..4b4a024 100644
--- a/packages/realgud/realgud/debugger/rdebug/init.el
+++ b/packages/realgud/realgud/debugger/rdebug/init.el
@@ -9,7 +9,7 @@
;; Ruby 1.8 debugger: ruby-debug (rdebug)
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For stef.
(require 'load-relative)
(require-relative-list '("../../common/regexp" "../../common/loc") "realgud-")
diff --git a/packages/realgud/realgud/debugger/rdebug/track-mode.el b/packages/realgud/realgud/debugger/rdebug/track-mode.el
index 142836f..87d6986 100644
--- a/packages/realgud/realgud/debugger/rdebug/track-mode.el
+++ b/packages/realgud/realgud/debugger/rdebug/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2012, 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2012, 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -9,7 +9,6 @@
;;; Ruby "rdebug" Debugger tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/remake/core.el b/packages/realgud/realgud/debugger/remake/core.el
index cb78f55..7f2772c 100644
--- a/packages/realgud/realgud/debugger/remake/core.el
+++ b/packages/realgud/realgud/debugger/remake/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2011, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/core" "../../common/lang")
"realgud-")
diff --git a/packages/realgud/realgud/debugger/remake/init.el b/packages/realgud/realgud/debugger/remake/init.el
index 6e398a2..0c650cf 100644
--- a/packages/realgud/realgud/debugger/remake/init.el
+++ b/packages/realgud/realgud/debugger/remake/init.el
@@ -15,7 +15,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Regular expressions for GNU Make debugger: remake
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/remake/track-mode.el b/packages/realgud/realgud/debugger/remake/track-mode.el
index 50829a9..2bc649f 100644
--- a/packages/realgud/realgud/debugger/remake/track-mode.el
+++ b/packages/realgud/realgud/debugger/remake/track-mode.el
@@ -9,7 +9,6 @@
;;; GNU Make Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el b/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
index 7340c6f..7f7728b 100644
--- a/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
+++ b/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011, 2014 Free Software Foundation, Inc
+;; Copyright (C) 2011, 2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -9,7 +9,6 @@
;;; Mode for parsing various kinds of backtraces found in Perl
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan.pl/core.el b/packages/realgud/realgud/debugger/trepan.pl/core.el
index acd7e13..37ea9a8 100644
--- a/packages/realgud/realgud/debugger/trepan.pl/core.el
+++ b/packages/realgud/realgud/debugger/trepan.pl/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011-2012, 2014 Free Software Foundation, Inc
+;; Copyright (C) 2011-2012, 2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/trepan.pl/init.el b/packages/realgud/realgud/debugger/trepan.pl/init.el
index d201d10..2865180 100644
--- a/packages/realgud/realgud/debugger/trepan.pl/init.el
+++ b/packages/realgud/realgud/debugger/trepan.pl/init.el
@@ -16,7 +16,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Trepanning Perl debugger
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/trepan.pl/track-mode.el b/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
index 9140c56..d29add5 100644
--- a/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
+++ b/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
@@ -9,7 +9,6 @@
;; Perl trepanning Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan/backtrack-mode.el b/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
index c655779..d92b6b7 100644
--- a/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
+++ b/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,7 +17,6 @@
;;; Mode for parsing various kinds of backtraces found in Ruby
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan/core.el b/packages/realgud/realgud/debugger/trepan/core.el
index 07764a0..a844208 100644
--- a/packages/realgud/realgud/debugger/trepan/core.el
+++ b/packages/realgud/realgud/debugger/trepan/core.el
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'compile) ;; for compilation-find-file
(require 'load-relative)
(require-relative-list '("../../common/track"
diff --git a/packages/realgud/realgud/debugger/trepan/init.el b/packages/realgud/realgud/debugger/trepan/init.el
index 6a0dd9d..b2cc954 100644
--- a/packages/realgud/realgud/debugger/trepan/init.el
+++ b/packages/realgud/realgud/debugger/trepan/init.el
@@ -16,7 +16,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Ruby Trepanning debugger
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/trepan/track-mode.el b/packages/realgud/realgud/debugger/trepan/track-mode.el
index 2887c3e..f5fafb2 100644
--- a/packages/realgud/realgud/debugger/trepan/track-mode.el
+++ b/packages/realgud/realgud/debugger/trepan/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2012-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2012-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -14,7 +14,6 @@
;;; Ruby "trepan" Debugger tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan2/core.el b/packages/realgud/realgud/debugger/trepan2/core.el
index eb2a5c6..ddf9011 100644
--- a/packages/realgud/realgud/debugger/trepan2/core.el
+++ b/packages/realgud/realgud/debugger/trepan2/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010-2012, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010-2012, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,8 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
-
(require 'compile) ;; for compilation-find-file
(require 'load-relative)
(require-relative-list '("../../common/track"
diff --git a/packages/realgud/realgud/debugger/trepan2/init.el b/packages/realgud/realgud/debugger/trepan2/init.el
index 235e47d..2f13fa7 100644
--- a/packages/realgud/realgud/debugger/trepan2/init.el
+++ b/packages/realgud/realgud/debugger/trepan2/init.el
@@ -9,7 +9,7 @@
;; trepan2: Python 2.5 - 2.7; for 3.0+ see trepan3k
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/trepan2/track-mode.el b/packages/realgud/realgud/debugger/trepan2/track-mode.el
index d2eb6ed..d10bde5 100644
--- a/packages/realgud/realgud/debugger/trepan2/track-mode.el
+++ b/packages/realgud/realgud/debugger/trepan2/track-mode.el
@@ -17,7 +17,6 @@
;;
;; Python "trepan2" Debugger tracking in a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepan3k/core.el b/packages/realgud/realgud/debugger/trepan3k/core.el
index 39a6d13..6806a00 100644
--- a/packages/realgud/realgud/debugger/trepan3k/core.el
+++ b/packages/realgud/realgud/debugger/trepan3k/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2012-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2012-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,8 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/trepan3k/init.el b/packages/realgud/realgud/debugger/trepan3k/init.el
index 5f22174..ef2dfbd 100644
--- a/packages/realgud/realgud/debugger/trepan3k/init.el
+++ b/packages/realgud/realgud/debugger/trepan3k/init.el
@@ -17,7 +17,7 @@
;; trepan3k: Python 3.2 and beyond
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/trepan3k/track-mode.el b/packages/realgud/realgud/debugger/trepan3k/track-mode.el
index afb94f1..d7473cd 100644
--- a/packages/realgud/realgud/debugger/trepan3k/track-mode.el
+++ b/packages/realgud/realgud/debugger/trepan3k/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,7 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; Python "trepan3k" Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el b/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
index e3b7e6c..0732dc5 100644
--- a/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
+++ b/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,7 +17,6 @@
;;; Mode for parsing various kinds of backtraces found in JavaScript
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/trepanjs/core.el b/packages/realgud/realgud/debugger/trepanjs/core.el
index eac8a0e..b3256c1 100644
--- a/packages/realgud/realgud/debugger/trepanjs/core.el
+++ b/packages/realgud/realgud/debugger/trepanjs/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,8 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track"
"../../common/core"
diff --git a/packages/realgud/realgud/debugger/trepanjs/init.el b/packages/realgud/realgud/debugger/trepanjs/init.el
index 5281946..8470fe2 100644
--- a/packages/realgud/realgud/debugger/trepanjs/init.el
+++ b/packages/realgud/realgud/debugger/trepanjs/init.el
@@ -16,7 +16,7 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Regular expressions for nodejs Javascript debugger.
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/trepanjs/track-mode.el b/packages/realgud/realgud/debugger/trepanjs/track-mode.el
index 4c02965..5d8c8cd 100644
--- a/packages/realgud/realgud/debugger/trepanjs/track-mode.el
+++ b/packages/realgud/realgud/debugger/trepanjs/track-mode.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -17,7 +17,6 @@
;;; "trepanjs" Debugger tracking a comint or eshell buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/debugger/zshdb/core.el b/packages/realgud/realgud/debugger/zshdb/core.el
index 20a7cbe..2eefad1 100644
--- a/packages/realgud/realgud/debugger/zshdb/core.el
+++ b/packages/realgud/realgud/debugger/zshdb/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010-2011, 2014-2015 Free Software Foundation, Inc
+;; Copyright (C) 2010-2011, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -7,8 +7,6 @@
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../../common/track" "../../common/core")
"realgud-")
diff --git a/packages/realgud/realgud/debugger/zshdb/init.el b/packages/realgud/realgud/debugger/zshdb/init.el
index 8c0a88e..8a2c0a9 100644
--- a/packages/realgud/realgud/debugger/zshdb/init.el
+++ b/packages/realgud/realgud/debugger/zshdb/init.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,7 +15,7 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib)) ;For setf.
(require 'load-relative)
(require-relative-list '("../../common/regexp"
diff --git a/packages/realgud/realgud/debugger/zshdb/track-mode.el b/packages/realgud/realgud/debugger/zshdb/track-mode.el
index 31f65dc..ecf0b12 100644
--- a/packages/realgud/realgud/debugger/zshdb/track-mode.el
+++ b/packages/realgud/realgud/debugger/zshdb/track-mode.el
@@ -9,7 +9,6 @@
;;; "zshdb" Debugger tracking a comint buffer.
-(eval-when-compile (require 'cl))
(require 'load-relative)
(require-relative-list '(
"../../common/cmds"
diff --git a/packages/realgud/realgud/lang/js.el b/packages/realgud/realgud/lang/js.el
index faaf716..ede33ef 100644
--- a/packages/realgud/realgud/lang/js.el
+++ b/packages/realgud/realgud/lang/js.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -15,8 +15,6 @@
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../common/regexp" "../common/loc" "../common/track")
"realgud-")
diff --git a/packages/realgud/realgud/lang/perl.el b/packages/realgud/realgud/lang/perl.el
index ebe6b94..cad3374 100644
--- a/packages/realgud/realgud/lang/perl.el
+++ b/packages/realgud/realgud/lang/perl.el
@@ -8,8 +8,6 @@
;; (at your option) any later version.
;;; Common Perl constants and regular expressions.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../common/regexp" "../common/loc" "../common/track")
"realgud-")
diff --git a/packages/realgud/realgud/lang/posix-shell.el b/packages/realgud/realgud/lang/posix-shell.el
index 4f006d2..1ef2313 100644
--- a/packages/realgud/realgud/lang/posix-shell.el
+++ b/packages/realgud/realgud/lang/posix-shell.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2015-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -22,8 +22,6 @@
;; *only* debuggers I know of for POSIX shells, it's not too much of
;; a stretch to think of this as for all "shell".
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../common/regexp" "../common/loc"
"../common/track" "../common/send")
diff --git a/packages/realgud/realgud/lang/python.el b/packages/realgud/realgud/lang/python.el
index 1ddea17..a2e8b54 100644
--- a/packages/realgud/realgud/lang/python.el
+++ b/packages/realgud/realgud/lang/python.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011, 2014, 2015 Free Software Foundation, Inc
+;; Copyright (C) 2011, 2014-2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -16,8 +16,6 @@
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;;; Common Python constants and regular expressions.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../common/regexp" "../common/loc" "../common/track")
"realgud-")
diff --git a/packages/realgud/realgud/lang/ruby.el b/packages/realgud/realgud/lang/ruby.el
index a0e38d7..9e4699e 100644
--- a/packages/realgud/realgud/lang/ruby.el
+++ b/packages/realgud/realgud/lang/ruby.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2010, 2014 Free Software Foundation, Inc
+;; Copyright (C) 2010, 2014, 2016 Free Software Foundation, Inc
;; Author: Rocky Bernstein <rocky@gnu.org>
@@ -8,8 +8,6 @@
;; (at your option) any later version.
;; Common Ruby constants and regular expressions.
-(eval-when-compile (require 'cl))
-
(require 'load-relative)
(require-relative-list '("../common/regexp" "../common/loc" "../common/track")
"realgud-")
diff --git a/packages/realgud/test/test-common-helper.el b/packages/realgud/test/test-common-helper.el
index 815fde2..396edc6 100644
--- a/packages/realgud/test/test-common-helper.el
+++ b/packages/realgud/test/test-common-helper.el
@@ -1,3 +1,4 @@
+(eval-when-compile (require 'cl-lib))
(require 'test-simple)
(load-file "../realgud/common/helper.el")
@@ -12,7 +13,7 @@
(defvar realgud-test-info)
)
-(defstruct realgud-test-info name)
+(cl-defstruct realgud-test-info name)
(realgud-struct-field-setter "realgud-test-info" "name")
(set (make-local-variable 'realgud-test-info)
diff --git a/packages/realgud/test/test-core.el b/packages/realgud/test/test-core.el
index 51ddaa7..d3e6ca2 100644
--- a/packages/realgud/test/test-core.el
+++ b/packages/realgud/test/test-core.el
@@ -1,3 +1,5 @@
+;; -*- lexical-binding:t -*-
+
;; Press C-x C-e at the end of the next line to run this file test non-interactively
;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory (locate-library "test-simple.elc")) buffer-file-name)
@@ -33,7 +35,7 @@
(note "realgud-parse-...")
-(lexical-let ((opt-two-args '("0" "C" "e" "E" "F" "i")))
+(let ((opt-two-args '("0" "C" "e" "E" "F" "i")))
(assert-equal '(("-0" "a") nil)
(realgud-parse-command-arg '("-0" "a") '() opt-two-args)
"Two args found, none remain afterwards though.")
diff --git a/packages/realgud/test/test-regexp-rdebug.el b/packages/realgud/test/test-regexp-rdebug.el
index 26477b7..2c37d41 100644
--- a/packages/realgud/test/test-regexp-rdebug.el
+++ b/packages/realgud/test/test-regexp-rdebug.el
@@ -1,3 +1,5 @@
+;; -*- lexical-binding:t -*-
+
;; Press C-x C-e at the end of the next line to run this file test non-interactively
;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory (locate-library "test-simple.elc")) buffer-file-name)
@@ -15,7 +17,7 @@
;; setq however will workaround this.
(setq text " from /usr/local/bin/irb:12:in `<main>'")
(note "traceback location matching")
-(lexical-let ((text " from /usr/local/bin/irb:12:in `<main>'"))
+(let ((text " from /usr/local/bin/irb:12:in `<main>'"))
(assert-t (numberp (loc-match text helper-tb)) "basic traceback location")
(assert-equal "/usr/local/bin/irb"
(match-string (realgud-loc-pat-file-group helper-tb)
@@ -26,7 +28,7 @@
text) "extract traceback line number")
)
-(lexical-let ((text "Breakpoint 1 file /usr/bin/irb, line 10\n"))
+(let ((text "Breakpoint 1 file /usr/bin/irb, line 10\n"))
(assert-t (numberp (loc-match text helper-bps)) "basic breakpoint location")
(assert-equal "/usr/bin/irb"
(match-string (realgud-loc-pat-file-group helper-bps)
diff --git a/packages/realgud/test/test-regexp-ruby.el b/packages/realgud/test/test-regexp-ruby.el
index d15ab9c..a2392b1 100644
--- a/packages/realgud/test/test-regexp-ruby.el
+++ b/packages/realgud/test/test-regexp-ruby.el
@@ -1,3 +1,5 @@
+;; -*- lexical-binding:t -*-
+
;; Press C-x C-e at the end of the next line to run this file test non-interactively
;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory (locate-library "test-simple.elc")) buffer-file-name)
@@ -15,7 +17,7 @@
;; setq however will workaround this.
(setq text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360")
-(lexical-let ((text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360"))
+(let ((text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360"))
(assert-t (numberp (loc-match text bt)) "basic traceback location")
(assert-equal "/tmp/rails-2.3.5/lib/tasks/databases.rake"
diff --git a/packages/realgud/test/test-regexp.el b/packages/realgud/test/test-regexp.el
index da9a81a..0cdde95 100644
--- a/packages/realgud/test/test-regexp.el
+++ b/packages/realgud/test/test-regexp.el
@@ -1,3 +1,5 @@
+;; -*- lexical-binding:t -*-
+
;; Press C-x C-e at the end of the next line to run this file test non-interactively
;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory (locate-library "test-simple.elc")) buffer-file-name)
@@ -39,7 +41,7 @@
:line-group (realgud-loc-pat-line-group loc-pat)))
-(lexical-let ((text ".. (./dbgr.rb:73)")
+(let ((text ".. (./dbgr.rb:73)")
(text2 "C> ((eval):1 via /tmp/eval2.rb:2)")
(text3 "-- (<internal:prelude>:28 remapped prelude.rb:28)")
(text4 "-- (/src/external-vcs/dbgrr/processor/command/info_subcmd/registers_subcmd/dfp.rb:2)\nrequire_relative %w(.. .. base subsubcmd)\n")
diff --git a/packages/realgud/test/test-track.el b/packages/realgud/test/test-track.el
index d0bb147..5e98fec 100644
--- a/packages/realgud/test/test-track.el
+++ b/packages/realgud/test/test-track.el
@@ -1,3 +1,5 @@
+;; -*- lexical-binding:t -*-
+
;; Press C-x C-e at the end of the next line to run this file test non-interactively
;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory (locate-library "test-simple.elc")) buffer-file-name)
@@ -41,7 +43,7 @@
(setq line-number 7)
(setq debugger-output (format "-> (%s:%d)\nrequire 'foo'\n(trepan):\n"
test-filename line-number))
-(lexical-let ((loc (realgud-track-loc debugger-output nil)))
+(let ((loc (realgud-track-loc debugger-output nil)))
(assert-t (realgud-loc-p loc) "loc extracted")
(assert-equal "(trepan):\n"
(realgud-track-loc-remaining debugger-output)
^ permalink raw reply related [flat|nested] 6+ messages in thread
* Re: [elpa] master d7bac58 3/5: Wrong require again.
2016-08-04 22:05 ` Stefan Monnier
@ 2016-08-04 22:05 ` Rocky Bernstein
0 siblings, 0 replies; 6+ messages in thread
From: Rocky Bernstein @ 2016-08-04 22:05 UTC (permalink / raw)
To: Stefan Monnier; +Cc: emacs-devel
[-- Attachment #1: Type: text/plain, Size: 59903 bytes --]
Yes please. I will test and amend if needed.
On Thu, Aug 4, 2016, 6:03 PM Stefan Monnier <monnier@iro.umontreal.ca>
wrote:
> >> Do you want me to update the code to use `cl-lib' exclusively?
> > Yes, please. You know more about this than I. See also:
>
> The (untested) patch below should do it. Do you want me to push it to
> elpa.git?
>
>
> Stefan
>
>
> diff --git a/packages/realgud/ChangeLog b/packages/realgud/ChangeLog
> index bc3f48c..d0bb58b 100644
> --- a/packages/realgud/ChangeLog
> +++ b/packages/realgud/ChangeLog
> @@ -1,3 +1,26 @@
> +2016-08-04 Stefan Monnier <monnier@iro.umontreal.ca>
> +
> + * realgud.el: Add missing cl-lib dependency.
> + * <most-other-files>: Remove unneeded (require 'cl) and replace the
> + other ones with (require 'cl-lib)
> +
> + * test/test-common-helper.el (realgud-test-info):
> + * realgud/common/regexp.el (realgud-loc-pat):
> + * realgud/common/lochist.el (realgud-loc-hist):
> + * realgud/common/buffer/info.el (realgud-backtrace-info):
> + * realgud/common/loc.el (realgud-loc): Use `cl-defstruct'.
> +
> + * realgud/common/run.el (realgud:run-process,
> realgud:run-debugger):
> + Use cl-remove-if and cl-remove-duplicates.
> +
> + * realgud/common/track.el (realgud-track-bp-loc): Fix typo.
> +
> + * test/test-track.el:
> + * test/test-regexp.el:
> + * test/test-regexp-ruby.el:
> + * test/test-regexp-rdebug.el:
> + * test/test-core.el: Use lexical-binding rather than lexical-let.
> +
> 2010-11-27 rocky <rocky@gnu.org>
>
> * dbgr/debugger/trepan/init.el, dbgr/lang/ruby.el,
> diff --git a/packages/realgud/realgud.el b/packages/realgud/realgud.el
> index b16cc48..026dbb4 100644
> --- a/packages/realgud/realgud.el
> +++ b/packages/realgud/realgud.el
> @@ -3,11 +3,10 @@
> ;; Author: Rocky Bernstein <rocky@gnu.org>
> ;; Version: 1.4.3
> ;; Package-Type: multi
> -;; Package-Requires: ((load-relative "1.2") (loc-changes "1.2")
> (test-simple "1.2.0"))
> +;; Package-Requires: ((load-relative "1.2") (loc-changes "1.2")
> (test-simple "1.2.0") (cl-lib "0.5") (emacs "24"))
> ;; URL: http://github.com/realgud/realgud/
> -;; Compatibility: GNU Emacs 24.x
>
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; This program is free software; you can redistribute it and/or modify
> ;; it under the terms of the GNU General Public License as published by
> diff --git a/packages/realgud/realgud/common/attach.el
> b/packages/realgud/realgud/common/attach.el
> index f0efbff..aefd62f 100644
> --- a/packages/realgud/realgud/common/attach.el
> +++ b/packages/realgud/realgud/common/attach.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,7 +17,6 @@
> ;;; Emacs Commands to associate or attach a source buffer to a command
> ;;; buffer and vice versa.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '("buffer/command" "buffer/source")
> "realgud-buffer-")
> diff --git a/packages/realgud/realgud/common/backtrack-mode.el
> b/packages/realgud/realgud/common/backtrack-mode.el
> index aaf89c9..a4bbfc5 100644
> --- a/packages/realgud/realgud/common/backtrack-mode.el
> +++ b/packages/realgud/realgud/common/backtrack-mode.el
> @@ -20,7 +20,6 @@
> ;; process shell arround Compare with backtrace-mode.el which
> ;; handles backtraces inside the debugger
>
> -(eval-when-compile (require 'cl))
> (require 'shell)
>
> (require 'load-relative)
> diff --git a/packages/realgud/realgud/common/buffer/info.el
> b/packages/realgud/realgud/common/buffer/info.el
> index 571b614..246f302 100644
> --- a/packages/realgud/realgud/common/buffer/info.el
> +++ b/packages/realgud/realgud/common/buffer/info.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; This program is free software; you can redistribute it and/or modify
> ;; it under the terms of the GNU General Public License as published by
> @@ -16,12 +16,12 @@
>
> ;;; A mode based off of org mode to show debugger information
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib))
> (require 'org)
>
> (require 'load-relative)
>
> -(defstruct realgud-backtrace-info
> +(cl-defstruct realgud-backtrace-info
> "debugger object/structure specific to debugger info."
> (cmdbuf nil) ;; buffer of the associated debugger process
> )
> diff --git a/packages/realgud/realgud/common/cmds.el
> b/packages/realgud/realgud/common/cmds.el
> index 4b2f3eb..8f02555 100644
> --- a/packages/realgud/realgud/common/cmds.el
> +++ b/packages/realgud/realgud/common/cmds.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> diff --git a/packages/realgud/realgud/common/fringe.el
> b/packages/realgud/realgud/common/fringe.el
> index 745d85b..c50153b 100644
> --- a/packages/realgud/realgud/common/fringe.el
> +++ b/packages/realgud/realgud/common/fringe.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2012, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2012, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -86,9 +86,6 @@ position.")
> "Overlay arrow variable which contains the 3rd most recent debugger
> position.")
>
> -(eval-when-compile (require 'cl))
> -
> -
> ;; FIXME: since overlay overlay-arrow-list can be global, and perhaps
> ;; has to stay that way since some Emacs code may expect that, we
> ;; should use different global overlay arrow variables for the
> diff --git a/packages/realgud/realgud/common/helper.el
> b/packages/realgud/realgud/common/helper.el
> index 705100d..7467b2b 100644
> --- a/packages/realgud/realgud/common/helper.el
> +++ b/packages/realgud/realgud/common/helper.el
> @@ -12,8 +12,7 @@
> ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
> ;; GNU General Public License for more details.
>
> -(require 'cl-lib)
> -(require 'cl)
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> ;;; Miscellaneous utility functions
> (require 'load-relative)
> diff --git a/packages/realgud/realgud/common/loc.el
> b/packages/realgud/realgud/common/loc.el
> index 00c75a0..76584c0 100644
> --- a/packages/realgud/realgud/common/loc.el
> +++ b/packages/realgud/realgud/common/loc.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -18,6 +18,8 @@
> ;; This describes a debugger location structure and has code for
> ;; working with them.
>
> +(eval-when-compile (require 'cl-lib))
> +
> (require 'load-relative)
> (require 'loc-changes)
> (require-relative-list '("fringe" "follow") "realgud-")
> @@ -30,7 +32,7 @@
> (declare-function realgud-get-cmdbuf-from-srcbuf 'realgud-buffer-helper)
> (declare-function realgud-srcbuf? 'realgud-buffer-source)
>
> -(defstruct realgud-loc
> +(cl-defstruct realgud-loc
> "Our own location type. Even though a mark contains a
> file-name (via a buffer) and a line number (via an offset), we
> want to save the values that were seen/requested originally."
> diff --git a/packages/realgud/realgud/common/lochist.el
> b/packages/realgud/realgud/common/lochist.el
> index 33fcf49..786e8e3 100644
> --- a/packages/realgud/realgud/common/lochist.el
> +++ b/packages/realgud/realgud/common/lochist.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2012, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2012, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -20,6 +20,7 @@
>
> ;;; Code:
>
> +(eval-when-compile (require 'cl-lib))
> (require 'ring)
> (require 'org)
> (require 'load-relative)
> @@ -32,7 +33,7 @@
> :type 'integer
> :group 'realgud)
>
> -(defstruct realgud-loc-hist
> +(cl-defstruct realgud-loc-hist
> "A list of source-code positions recently encountered"
> (position -1)
> (ring (make-ring realgud-loc-hist-size)))
> diff --git a/packages/realgud/realgud/common/regexp.el
> b/packages/realgud/realgud/common/regexp.el
> index 127d7c2..e21de25 100644
> --- a/packages/realgud/realgud/common/regexp.el
> +++ b/packages/realgud/realgud/common/regexp.el
> @@ -27,9 +27,9 @@
> ;; Variables defining regular expressions (regexp:s).
> ;;
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib))
>
> -(defstruct realgud-loc-pat
> +(cl-defstruct realgud-loc-pat
> "Information to match and extract position and other related
> information typically
> output by a debugger inside a process shell"
> (num) ;; General number. Could be for example
> diff --git a/packages/realgud/realgud/common/run.el
> b/packages/realgud/realgud/common/run.el
> index a24e123..f78bd35 100644
> --- a/packages/realgud/realgud/common/run.el
> +++ b/packages/realgud/realgud/common/run.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,7 +17,7 @@
>
> ; (require 'term)
>
> -(require 'cl)
> +(require 'cl-lib)
> (require 'shell)
> (require 'load-relative)
> (require-relative-list '("core" "track" "utils") "realgud-")
> @@ -152,7 +152,7 @@ marginal icons is reset."
> (if (boundp 'starting-directory)
> (realgud-cmdbuf-info-starting-directory=
> starting-directory))
> (set minibuffer-history
> - (remove-duplicates
> + (cl-remove-duplicates
> (cons cmd-str (eval minibuffer-history)) :from-end)
> ))
> )))
> @@ -191,7 +191,7 @@ Otherwise nil is returned.
> (script-args (caddr parsed-args))
> (script-name (or opt-script-name (car script-args)))
> (parsed-cmd-args
> - (remove-if 'nil (realgud:flatten parsed-args)))
> + (cl-remove-if 'nil (realgud:flatten parsed-args)))
> )
> (realgud:run-process debugger-name script-name parsed-cmd-args
> minibuffer-history no-reset)
> diff --git a/packages/realgud/realgud/common/send.el
> b/packages/realgud/realgud/common/send.el
> index b8b1f7e..81edf16 100644
> --- a/packages/realgud/realgud/common/send.el
> +++ b/packages/realgud/realgud/common/send.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> diff --git a/packages/realgud/realgud/common/track-mode.el
> b/packages/realgud/realgud/common/track-mode.el
> index bf0888b..4f58428 100644
> --- a/packages/realgud/realgud/common/track-mode.el
> +++ b/packages/realgud/realgud/common/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; tracks shell output
>
> -(eval-when-compile (require 'cl))
> (require 'shell)
>
> (require 'load-relative)
> diff --git a/packages/realgud/realgud/common/track.el
> b/packages/realgud/realgud/common/track.el
> index 36f8e98..badb83f 100644
> --- a/packages/realgud/realgud/common/track.el
> +++ b/packages/realgud/realgud/common/track.el
> @@ -481,7 +481,7 @@ Otherwise return nil. CMD-MARK is set in the
> realgud-loc object created.
> (message "line number not found -- using 1"))
> (if (and filename lineno)
> (let* ((directory
> - (cond ((boundp 'starting-directory)
> staring-directory)
> + (cond ((boundp 'starting-directory)
> starting-directory)
> (t nil)))
> (loc-or-error
> (realgud:file-loc-from-line
> diff --git a/packages/realgud/realgud/debugger/bashdb/core.el
> b/packages/realgud/realgud/debugger/bashdb/core.el
> index 899eec0..87c371c 100644
> --- a/packages/realgud/realgud/debugger/bashdb/core.el
> +++ b/packages/realgud/realgud/debugger/bashdb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -14,7 +14,6 @@
>
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> -(eval-when-compile (require 'cl))
>
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/core")
> diff --git a/packages/realgud/realgud/debugger/bashdb/init.el
> b/packages/realgud/realgud/debugger/bashdb/init.el
> index 2e3f8a3..2c7769f 100644
> --- a/packages/realgud/realgud/debugger/bashdb/init.el
> +++ b/packages/realgud/realgud/debugger/bashdb/init.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,8 +17,7 @@
>
> ;; Regular expressions for Bash shell debugger: bashdb
>
> -(eval-when-compile (require 'cl))
> -
> +(eval-when-compile (require 'cl-lib)) ;For setf.
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> "../../common/loc"
> diff --git a/packages/realgud/realgud/debugger/bashdb/track-mode.el
> b/packages/realgud/realgud/debugger/bashdb/track-mode.el
> index 0e3dfef..d01d6c7 100644
> --- a/packages/realgud/realgud/debugger/bashdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/bashdb/track-mode.el
> @@ -16,7 +16,6 @@
>
> ;; Bash Debugger tracking in a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/gdb/core.el
> b/packages/realgud/realgud/debugger/gdb/core.el
> index 5a36a23..35fc492 100644
> --- a/packages/realgud/realgud/debugger/gdb/core.el
> +++ b/packages/realgud/realgud/debugger/gdb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,9 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> -
> -(require 'files)
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/gdb/gdb.el
> b/packages/realgud/realgud/debugger/gdb/gdb.el
> index 91776a0..4c2853f 100644
> --- a/packages/realgud/realgud/debugger/gdb/gdb.el
> +++ b/packages/realgud/realgud/debugger/gdb/gdb.el
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> ;; `realgud:gdb' Main interface to gdb via Emacs
> -(require 'cl)
> (require 'load-relative)
> (require-relative-list '("../../common/helper" "../../common/utils")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/gdb/init.el
> b/packages/realgud/realgud/debugger/gdb/init.el
> index 8b7ac86..92bb5d6 100644
> --- a/packages/realgud/realgud/debugger/gdb/init.el
> +++ b/packages/realgud/realgud/debugger/gdb/init.el
> @@ -17,7 +17,7 @@
>
> ;;; gdb debugger
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib))
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp" "../../common/loc")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/gdb/track-mode.el
> b/packages/realgud/realgud/debugger/gdb/track-mode.el
> index d56e4b2..9497657 100644
> --- a/packages/realgud/realgud/debugger/gdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/gdb/track-mode.el
> @@ -19,7 +19,6 @@
>
> ;; gdb tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/gub/core.el
> b/packages/realgud/realgud/debugger/gub/core.el
> index 12dc8ff..d6d13da 100644
> --- a/packages/realgud/realgud/debugger/gub/core.el
> +++ b/packages/realgud/realgud/debugger/gub/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2013-2014 Free Software Foundation, Inc
> +;; Copyright (C) 2013-2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/lang"
> "../../common/core") "realgud-")
> diff --git a/packages/realgud/realgud/debugger/gub/init.el
> b/packages/realgud/realgud/debugger/gub/init.el
> index 01f71a3..f244267 100644
> --- a/packages/realgud/realgud/debugger/gub/init.el
> +++ b/packages/realgud/realgud/debugger/gub/init.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> ;; This program is free software: you can redistribute it and/or
> @@ -17,7 +17,7 @@
>
> ;; Regular expressions for Go SSA debugger: gub
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/gub/track-mode.el
> b/packages/realgud/realgud/debugger/gub/track-mode.el
> index 3f74cbc..b48bb0c 100644
> --- a/packages/realgud/realgud/debugger/gub/track-mode.el
> +++ b/packages/realgud/realgud/debugger/gub/track-mode.el
> @@ -9,7 +9,6 @@
>
> ;;; Golang SSA gub tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/ipdb/core.el
> b/packages/realgud/realgud/debugger/ipdb/core.el
> index 789920b..8d64e6a 100644
> --- a/packages/realgud/realgud/debugger/ipdb/core.el
> +++ b/packages/realgud/realgud/debugger/ipdb/core.el
> @@ -11,8 +11,6 @@
> ;; along with this program. If not, see <http://www.gnu.or/licenses/>.
>
>
> -(eval-when-compile (require 'cl))
> -
> (require 'comint)
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> diff --git a/packages/realgud/realgud/debugger/ipdb/init.el
> b/packages/realgud/realgud/debugger/ipdb/init.el
> index 07ae8ad..b1cd04f 100644
> --- a/packages/realgud/realgud/debugger/ipdb/init.el
> +++ b/packages/realgud/realgud/debugger/ipdb/init.el
> @@ -17,7 +17,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Stock Python debugger ipdb
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/ipdb/track-mode.el
> b/packages/realgud/realgud/debugger/ipdb/track-mode.el
> index 17133b3..b723a07 100644
> --- a/packages/realgud/realgud/debugger/ipdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/ipdb/track-mode.el
> @@ -17,7 +17,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Python "ipdb" Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
> b/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
> index 179ac63..1454edc 100644
> --- a/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
> +++ b/packages/realgud/realgud/debugger/jdb/backtrack-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Mode for parsing various kinds of backtraces found in Java
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/jdb/core.el
> b/packages/realgud/realgud/debugger/jdb/core.el
> index f4c35d2..9199c23 100644
> --- a/packages/realgud/realgud/debugger/jdb/core.el
> +++ b/packages/realgud/realgud/debugger/jdb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2014 Free Software Foundation, Inc
> +;; Copyright (C) 2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> ;; We use gud to handle the classpath-to-filename mapping
> (require 'gud)
> (require 'compile) ;; for compilation-find-file
> diff --git a/packages/realgud/realgud/debugger/jdb/init.el
> b/packages/realgud/realgud/debugger/jdb/init.el
> index 13548e0..82bfe4a 100644
> --- a/packages/realgud/realgud/debugger/jdb/init.el
> +++ b/packages/realgud/realgud/debugger/jdb/init.el
> @@ -7,7 +7,7 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/jdb/jdb.el
> b/packages/realgud/realgud/debugger/jdb/jdb.el
> index bb6d41c..62afcea 100644
> --- a/packages/realgud/realgud/debugger/jdb/jdb.el
> +++ b/packages/realgud/realgud/debugger/jdb/jdb.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -10,7 +10,6 @@
> ;; `jdb' Main interface to jdb via Emacs
>
> (require 'gud) ;; For class-path and source-path handling
> -(require 'cl)
>
> (require 'load-relative)
> (require-relative-list '("../../common/run") "realgud:")
> diff --git a/packages/realgud/realgud/debugger/jdb/track-mode.el
> b/packages/realgud/realgud/debugger/jdb/track-mode.el
> index 208b6cf..e35a134 100644
> --- a/packages/realgud/realgud/debugger/jdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/jdb/track-mode.el
> @@ -9,7 +9,6 @@
>
> ;; Java "jdb" Debugger tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/kshdb/core.el
> b/packages/realgud/realgud/debugger/kshdb/core.el
> index 5571583..afcb119 100644
> --- a/packages/realgud/realgud/debugger/kshdb/core.el
> +++ b/packages/realgud/realgud/debugger/kshdb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/core")
> "realgud-")
> (require-relative-list '("init") "realgud:kshdb-")
> diff --git a/packages/realgud/realgud/debugger/kshdb/init.el
> b/packages/realgud/realgud/debugger/kshdb/init.el
> index 44fcdb8..e6f6f74 100644
> --- a/packages/realgud/realgud/debugger/kshdb/init.el
> +++ b/packages/realgud/realgud/debugger/kshdb/init.el
> @@ -9,7 +9,7 @@
>
> ;;Regular expressions for Korn shell debugger: kshdb
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/kshdb/track-mode.el
> b/packages/realgud/realgud/debugger/kshdb/track-mode.el
> index ea62baf..a80da63 100644
> --- a/packages/realgud/realgud/debugger/kshdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/kshdb/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;; "kshdb" Debugger tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/nodejs/core.el
> b/packages/realgud/realgud/debugger/nodejs/core.el
> index 1ff8b71..065ac37 100644
> --- a/packages/realgud/realgud/debugger/nodejs/core.el
> +++ b/packages/realgud/realgud/debugger/nodejs/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,8 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/core")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/nodejs/init.el
> b/packages/realgud/realgud/debugger/nodejs/init.el
> index e20211e..70634af 100644
> --- a/packages/realgud/realgud/debugger/nodejs/init.el
> +++ b/packages/realgud/realgud/debugger/nodejs/init.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;; Regular expressions for nodejs Javascript debugger.
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/nodejs/track-mode.el
> b/packages/realgud/realgud/debugger/nodejs/track-mode.el
> index 753e20d..6afaa62 100644
> --- a/packages/realgud/realgud/debugger/nodejs/track-mode.el
> +++ b/packages/realgud/realgud/debugger/nodejs/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;; nodejs tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/pdb/core.el
> b/packages/realgud/realgud/debugger/pdb/core.el
> index 8964cf6..16c5dbd 100644
> --- a/packages/realgud/realgud/debugger/pdb/core.el
> +++ b/packages/realgud/realgud/debugger/pdb/core.el
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/pdb/init.el
> b/packages/realgud/realgud/debugger/pdb/init.el
> index ac346b8..7068758 100644
> --- a/packages/realgud/realgud/debugger/pdb/init.el
> +++ b/packages/realgud/realgud/debugger/pdb/init.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Stock Python debugger pdb
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/pdb/pdb.el
> b/packages/realgud/realgud/debugger/pdb/pdb.el
> index 1946478..8ddd380 100644
> --- a/packages/realgud/realgud/debugger/pdb/pdb.el
> +++ b/packages/realgud/realgud/debugger/pdb/pdb.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> diff --git a/packages/realgud/realgud/debugger/pdb/track-mode.el
> b/packages/realgud/realgud/debugger/pdb/track-mode.el
> index 7958eae..b18172f 100644
> --- a/packages/realgud/realgud/debugger/pdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/pdb/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Python "pdb" Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/perldb/core.el
> b/packages/realgud/realgud/debugger/perldb/core.el
> index 2df3533..04f6f0c 100644
> --- a/packages/realgud/realgud/debugger/perldb/core.el
> +++ b/packages/realgud/realgud/debugger/perldb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2011, 2013-2014 Free Software Foundation, Inc
> +;; Copyright (C) 2011, 2013-2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/perldb/init.el
> b/packages/realgud/realgud/debugger/perldb/init.el
> index 27c47c0..42dbedf 100644
> --- a/packages/realgud/realgud/debugger/perldb/init.el
> +++ b/packages/realgud/realgud/debugger/perldb/init.el
> @@ -16,7 +16,7 @@
> ;;; Regular expressions for nodejs Javascript debugger.
> ;;; Stock Perl debugger perldb
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp" "../../common/loc")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/perldb/track-mode.el
> b/packages/realgud/realgud/debugger/perldb/track-mode.el
> index 39c2ec7..ce80a23 100644
> --- a/packages/realgud/realgud/debugger/perldb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/perldb/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Stock Perl Debugger "perldb5" tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/rdebug/core.el
> b/packages/realgud/realgud/debugger/rdebug/core.el
> index 78a5a2d..bd66518 100644
> --- a/packages/realgud/realgud/debugger/rdebug/core.el
> +++ b/packages/realgud/realgud/debugger/rdebug/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/rdebug/init.el
> b/packages/realgud/realgud/debugger/rdebug/init.el
> index ec28401..4b4a024 100644
> --- a/packages/realgud/realgud/debugger/rdebug/init.el
> +++ b/packages/realgud/realgud/debugger/rdebug/init.el
> @@ -9,7 +9,7 @@
>
> ;; Ruby 1.8 debugger: ruby-debug (rdebug)
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For stef.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp" "../../common/loc")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/rdebug/track-mode.el
> b/packages/realgud/realgud/debugger/rdebug/track-mode.el
> index 142836f..87d6986 100644
> --- a/packages/realgud/realgud/debugger/rdebug/track-mode.el
> +++ b/packages/realgud/realgud/debugger/rdebug/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2012, 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2012, 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -9,7 +9,6 @@
>
> ;;; Ruby "rdebug" Debugger tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/remake/core.el
> b/packages/realgud/realgud/debugger/remake/core.el
> index cb78f55..7f2772c 100644
> --- a/packages/realgud/realgud/debugger/remake/core.el
> +++ b/packages/realgud/realgud/debugger/remake/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2011, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2011, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/core"
> "../../common/lang")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/remake/init.el
> b/packages/realgud/realgud/debugger/remake/init.el
> index 6e398a2..0c650cf 100644
> --- a/packages/realgud/realgud/debugger/remake/init.el
> +++ b/packages/realgud/realgud/debugger/remake/init.el
> @@ -15,7 +15,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;; Regular expressions for GNU Make debugger: remake
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/remake/track-mode.el
> b/packages/realgud/realgud/debugger/remake/track-mode.el
> index 50829a9..2bc649f 100644
> --- a/packages/realgud/realgud/debugger/remake/track-mode.el
> +++ b/packages/realgud/realgud/debugger/remake/track-mode.el
> @@ -9,7 +9,6 @@
>
> ;;; GNU Make Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
> b/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
> index 7340c6f..7f7728b 100644
> --- a/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan.pl/backtrack-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2011, 2014 Free Software Foundation, Inc
> +;; Copyright (C) 2011, 2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -9,7 +9,6 @@
>
> ;;; Mode for parsing various kinds of backtraces found in Perl
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan.pl/core.el
> b/packages/realgud/realgud/debugger/trepan.pl/core.el
> index acd7e13..37ea9a8 100644
> --- a/packages/realgud/realgud/debugger/trepan.pl/core.el
> +++ b/packages/realgud/realgud/debugger/trepan.pl/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2011-2012, 2014 Free Software Foundation, Inc
> +;; Copyright (C) 2011-2012, 2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/trepan.pl/init.el
> b/packages/realgud/realgud/debugger/trepan.pl/init.el
> index d201d10..2865180 100644
> --- a/packages/realgud/realgud/debugger/trepan.pl/init.el
> +++ b/packages/realgud/realgud/debugger/trepan.pl/init.el
> @@ -16,7 +16,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> ;; Trepanning Perl debugger
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
> b/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
> index 9140c56..d29add5 100644
> --- a/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan.pl/track-mode.el
> @@ -9,7 +9,6 @@
>
> ;; Perl trepanning Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
> b/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
> index c655779..d92b6b7 100644
> --- a/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan/backtrack-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,7 +17,6 @@
>
> ;;; Mode for parsing various kinds of backtraces found in Ruby
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan/core.el
> b/packages/realgud/realgud/debugger/trepan/core.el
> index 07764a0..a844208 100644
> --- a/packages/realgud/realgud/debugger/trepan/core.el
> +++ b/packages/realgud/realgud/debugger/trepan/core.el
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'compile) ;; for compilation-find-file
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> diff --git a/packages/realgud/realgud/debugger/trepan/init.el
> b/packages/realgud/realgud/debugger/trepan/init.el
> index 6a0dd9d..b2cc954 100644
> --- a/packages/realgud/realgud/debugger/trepan/init.el
> +++ b/packages/realgud/realgud/debugger/trepan/init.el
> @@ -16,7 +16,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> ;; Ruby Trepanning debugger
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/trepan/track-mode.el
> b/packages/realgud/realgud/debugger/trepan/track-mode.el
> index 2887c3e..f5fafb2 100644
> --- a/packages/realgud/realgud/debugger/trepan/track-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2012-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2012-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -14,7 +14,6 @@
>
> ;;; Ruby "trepan" Debugger tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan2/core.el
> b/packages/realgud/realgud/debugger/trepan2/core.el
> index eb2a5c6..ddf9011 100644
> --- a/packages/realgud/realgud/debugger/trepan2/core.el
> +++ b/packages/realgud/realgud/debugger/trepan2/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010-2012, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010-2012, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,8 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'compile) ;; for compilation-find-file
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> diff --git a/packages/realgud/realgud/debugger/trepan2/init.el
> b/packages/realgud/realgud/debugger/trepan2/init.el
> index 235e47d..2f13fa7 100644
> --- a/packages/realgud/realgud/debugger/trepan2/init.el
> +++ b/packages/realgud/realgud/debugger/trepan2/init.el
> @@ -9,7 +9,7 @@
>
> ;; trepan2: Python 2.5 - 2.7; for 3.0+ see trepan3k
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/trepan2/track-mode.el
> b/packages/realgud/realgud/debugger/trepan2/track-mode.el
> index d2eb6ed..d10bde5 100644
> --- a/packages/realgud/realgud/debugger/trepan2/track-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan2/track-mode.el
> @@ -17,7 +17,6 @@
> ;;
> ;; Python "trepan2" Debugger tracking in a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepan3k/core.el
> b/packages/realgud/realgud/debugger/trepan3k/core.el
> index 39a6d13..6806a00 100644
> --- a/packages/realgud/realgud/debugger/trepan3k/core.el
> +++ b/packages/realgud/realgud/debugger/trepan3k/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2012-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2012-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,8 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/trepan3k/init.el
> b/packages/realgud/realgud/debugger/trepan3k/init.el
> index 5f22174..ef2dfbd 100644
> --- a/packages/realgud/realgud/debugger/trepan3k/init.el
> +++ b/packages/realgud/realgud/debugger/trepan3k/init.el
> @@ -17,7 +17,7 @@
>
> ;; trepan3k: Python 3.2 and beyond
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/trepan3k/track-mode.el
> b/packages/realgud/realgud/debugger/trepan3k/track-mode.el
> index afb94f1..d7473cd 100644
> --- a/packages/realgud/realgud/debugger/trepan3k/track-mode.el
> +++ b/packages/realgud/realgud/debugger/trepan3k/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,7 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;; Python "trepan3k" Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
> b/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
> index e3b7e6c..0732dc5 100644
> --- a/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
> +++ b/packages/realgud/realgud/debugger/trepanjs/backtrack-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,7 +17,6 @@
>
> ;;; Mode for parsing various kinds of backtraces found in JavaScript
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/trepanjs/core.el
> b/packages/realgud/realgud/debugger/trepanjs/core.el
> index eac8a0e..b3256c1 100644
> --- a/packages/realgud/realgud/debugger/trepanjs/core.el
> +++ b/packages/realgud/realgud/debugger/trepanjs/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,8 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track"
> "../../common/core"
> diff --git a/packages/realgud/realgud/debugger/trepanjs/init.el
> b/packages/realgud/realgud/debugger/trepanjs/init.el
> index 5281946..8470fe2 100644
> --- a/packages/realgud/realgud/debugger/trepanjs/init.el
> +++ b/packages/realgud/realgud/debugger/trepanjs/init.el
> @@ -16,7 +16,7 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
> ;;; Regular expressions for nodejs Javascript debugger.
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/trepanjs/track-mode.el
> b/packages/realgud/realgud/debugger/trepanjs/track-mode.el
> index 4c02965..5d8c8cd 100644
> --- a/packages/realgud/realgud/debugger/trepanjs/track-mode.el
> +++ b/packages/realgud/realgud/debugger/trepanjs/track-mode.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -17,7 +17,6 @@
>
> ;;; "trepanjs" Debugger tracking a comint or eshell buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/debugger/zshdb/core.el
> b/packages/realgud/realgud/debugger/zshdb/core.el
> index 20a7cbe..2eefad1 100644
> --- a/packages/realgud/realgud/debugger/zshdb/core.el
> +++ b/packages/realgud/realgud/debugger/zshdb/core.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010-2011, 2014-2015 Free Software Foundation, Inc
> +;; Copyright (C) 2010-2011, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -7,8 +7,6 @@
> ;; the Free Software Foundation, either version 3 of the License, or
> ;; (at your option) any later version.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../../common/track" "../../common/core")
> "realgud-")
> diff --git a/packages/realgud/realgud/debugger/zshdb/init.el
> b/packages/realgud/realgud/debugger/zshdb/init.el
> index 8c0a88e..8a2c0a9 100644
> --- a/packages/realgud/realgud/debugger/zshdb/init.el
> +++ b/packages/realgud/realgud/debugger/zshdb/init.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,7 +15,7 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> +(eval-when-compile (require 'cl-lib)) ;For setf.
>
> (require 'load-relative)
> (require-relative-list '("../../common/regexp"
> diff --git a/packages/realgud/realgud/debugger/zshdb/track-mode.el
> b/packages/realgud/realgud/debugger/zshdb/track-mode.el
> index 31f65dc..ecf0b12 100644
> --- a/packages/realgud/realgud/debugger/zshdb/track-mode.el
> +++ b/packages/realgud/realgud/debugger/zshdb/track-mode.el
> @@ -9,7 +9,6 @@
>
> ;;; "zshdb" Debugger tracking a comint buffer.
>
> -(eval-when-compile (require 'cl))
> (require 'load-relative)
> (require-relative-list '(
> "../../common/cmds"
> diff --git a/packages/realgud/realgud/lang/js.el
> b/packages/realgud/realgud/lang/js.el
> index faaf716..ede33ef 100644
> --- a/packages/realgud/realgud/lang/js.el
> +++ b/packages/realgud/realgud/lang/js.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -15,8 +15,6 @@
> ;; You should have received a copy of the GNU General Public License
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../common/regexp" "../common/loc"
> "../common/track")
> "realgud-")
> diff --git a/packages/realgud/realgud/lang/perl.el
> b/packages/realgud/realgud/lang/perl.el
> index ebe6b94..cad3374 100644
> --- a/packages/realgud/realgud/lang/perl.el
> +++ b/packages/realgud/realgud/lang/perl.el
> @@ -8,8 +8,6 @@
> ;; (at your option) any later version.
>
> ;;; Common Perl constants and regular expressions.
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../common/regexp" "../common/loc"
> "../common/track")
> "realgud-")
> diff --git a/packages/realgud/realgud/lang/posix-shell.el
> b/packages/realgud/realgud/lang/posix-shell.el
> index 4f006d2..1ef2313 100644
> --- a/packages/realgud/realgud/lang/posix-shell.el
> +++ b/packages/realgud/realgud/lang/posix-shell.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2015, 2016 Free Software Foundation, Inc
> +;; Copyright (C) 2015-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -22,8 +22,6 @@
> ;; *only* debuggers I know of for POSIX shells, it's not too much of
> ;; a stretch to think of this as for all "shell".
>
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../common/regexp" "../common/loc"
> "../common/track" "../common/send")
> diff --git a/packages/realgud/realgud/lang/python.el
> b/packages/realgud/realgud/lang/python.el
> index 1ddea17..a2e8b54 100644
> --- a/packages/realgud/realgud/lang/python.el
> +++ b/packages/realgud/realgud/lang/python.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2011, 2014, 2015 Free Software Foundation, Inc
> +;; Copyright (C) 2011, 2014-2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -16,8 +16,6 @@
> ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
>
> ;;; Common Python constants and regular expressions.
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../common/regexp" "../common/loc"
> "../common/track")
> "realgud-")
> diff --git a/packages/realgud/realgud/lang/ruby.el
> b/packages/realgud/realgud/lang/ruby.el
> index a0e38d7..9e4699e 100644
> --- a/packages/realgud/realgud/lang/ruby.el
> +++ b/packages/realgud/realgud/lang/ruby.el
> @@ -1,4 +1,4 @@
> -;; Copyright (C) 2010, 2014 Free Software Foundation, Inc
> +;; Copyright (C) 2010, 2014, 2016 Free Software Foundation, Inc
>
> ;; Author: Rocky Bernstein <rocky@gnu.org>
>
> @@ -8,8 +8,6 @@
> ;; (at your option) any later version.
>
> ;; Common Ruby constants and regular expressions.
> -(eval-when-compile (require 'cl))
> -
> (require 'load-relative)
> (require-relative-list '("../common/regexp" "../common/loc"
> "../common/track")
> "realgud-")
> diff --git a/packages/realgud/test/test-common-helper.el
> b/packages/realgud/test/test-common-helper.el
> index 815fde2..396edc6 100644
> --- a/packages/realgud/test/test-common-helper.el
> +++ b/packages/realgud/test/test-common-helper.el
> @@ -1,3 +1,4 @@
> +(eval-when-compile (require 'cl-lib))
> (require 'test-simple)
> (load-file "../realgud/common/helper.el")
>
> @@ -12,7 +13,7 @@
> (defvar realgud-test-info)
> )
>
> -(defstruct realgud-test-info name)
> +(cl-defstruct realgud-test-info name)
> (realgud-struct-field-setter "realgud-test-info" "name")
>
> (set (make-local-variable 'realgud-test-info)
> diff --git a/packages/realgud/test/test-core.el
> b/packages/realgud/test/test-core.el
> index 51ddaa7..d3e6ca2 100644
> --- a/packages/realgud/test/test-core.el
> +++ b/packages/realgud/test/test-core.el
> @@ -1,3 +1,5 @@
> +;; -*- lexical-binding:t -*-
> +
> ;; Press C-x C-e at the end of the next line to run this file test
> non-interactively
> ;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory
> (locate-library "test-simple.elc")) buffer-file-name)
>
> @@ -33,7 +35,7 @@
>
> (note "realgud-parse-...")
>
> -(lexical-let ((opt-two-args '("0" "C" "e" "E" "F" "i")))
> +(let ((opt-two-args '("0" "C" "e" "E" "F" "i")))
> (assert-equal '(("-0" "a") nil)
> (realgud-parse-command-arg '("-0" "a") '() opt-two-args)
> "Two args found, none remain afterwards though.")
> diff --git a/packages/realgud/test/test-regexp-rdebug.el
> b/packages/realgud/test/test-regexp-rdebug.el
> index 26477b7..2c37d41 100644
> --- a/packages/realgud/test/test-regexp-rdebug.el
> +++ b/packages/realgud/test/test-regexp-rdebug.el
> @@ -1,3 +1,5 @@
> +;; -*- lexical-binding:t -*-
> +
> ;; Press C-x C-e at the end of the next line to run this file test
> non-interactively
> ;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory
> (locate-library "test-simple.elc")) buffer-file-name)
>
> @@ -15,7 +17,7 @@
> ;; setq however will workaround this.
> (setq text " from /usr/local/bin/irb:12:in `<main>'")
> (note "traceback location matching")
> -(lexical-let ((text " from /usr/local/bin/irb:12:in `<main>'"))
> +(let ((text " from /usr/local/bin/irb:12:in `<main>'"))
> (assert-t (numberp (loc-match text helper-tb)) "basic traceback
> location")
> (assert-equal "/usr/local/bin/irb"
> (match-string (realgud-loc-pat-file-group helper-tb)
> @@ -26,7 +28,7 @@
> text) "extract traceback line number")
> )
>
> -(lexical-let ((text "Breakpoint 1 file /usr/bin/irb, line 10\n"))
> +(let ((text "Breakpoint 1 file /usr/bin/irb, line 10\n"))
> (assert-t (numberp (loc-match text helper-bps)) "basic breakpoint
> location")
> (assert-equal "/usr/bin/irb"
> (match-string (realgud-loc-pat-file-group helper-bps)
> diff --git a/packages/realgud/test/test-regexp-ruby.el
> b/packages/realgud/test/test-regexp-ruby.el
> index d15ab9c..a2392b1 100644
> --- a/packages/realgud/test/test-regexp-ruby.el
> +++ b/packages/realgud/test/test-regexp-ruby.el
> @@ -1,3 +1,5 @@
> +;; -*- lexical-binding:t -*-
> +
> ;; Press C-x C-e at the end of the next line to run this file test
> non-interactively
> ;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory
> (locate-library "test-simple.elc")) buffer-file-name)
>
> @@ -15,7 +17,7 @@
> ;; setq however will workaround this.
> (setq text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360")
>
> -(lexical-let ((text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360"))
> +(let ((text "/tmp/rails-2.3.5/lib/tasks/databases.rake:360"))
>
> (assert-t (numberp (loc-match text bt)) "basic traceback location")
> (assert-equal "/tmp/rails-2.3.5/lib/tasks/databases.rake"
> diff --git a/packages/realgud/test/test-regexp.el
> b/packages/realgud/test/test-regexp.el
> index da9a81a..0cdde95 100644
> --- a/packages/realgud/test/test-regexp.el
> +++ b/packages/realgud/test/test-regexp.el
> @@ -1,3 +1,5 @@
> +;; -*- lexical-binding:t -*-
> +
> ;; Press C-x C-e at the end of the next line to run this file test
> non-interactively
> ;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory
> (locate-library "test-simple.elc")) buffer-file-name)
>
> @@ -39,7 +41,7 @@
> :line-group (realgud-loc-pat-line-group loc-pat)))
>
>
> -(lexical-let ((text ".. (./dbgr.rb:73)")
> +(let ((text ".. (./dbgr.rb:73)")
> (text2 "C> ((eval):1 via /tmp/eval2.rb:2)")
> (text3 "-- (<internal:prelude>:28 remapped prelude.rb:28)")
> (text4 "--
> (/src/external-vcs/dbgrr/processor/command/info_subcmd/registers_subcmd/dfp.rb:2)\nrequire_relative
> %w(.. .. base subsubcmd)\n")
> diff --git a/packages/realgud/test/test-track.el
> b/packages/realgud/test/test-track.el
> index d0bb147..5e98fec 100644
> --- a/packages/realgud/test/test-track.el
> +++ b/packages/realgud/test/test-track.el
> @@ -1,3 +1,5 @@
> +;; -*- lexical-binding:t -*-
> +
> ;; Press C-x C-e at the end of the next line to run this file test
> non-interactively
> ;; (test-simple-run "emacs -batch -L %s -l %s" (file-name-directory
> (locate-library "test-simple.elc")) buffer-file-name)
>
> @@ -41,7 +43,7 @@
> (setq line-number 7)
> (setq debugger-output (format "-> (%s:%d)\nrequire 'foo'\n(trepan):\n"
> test-filename line-number))
> -(lexical-let ((loc (realgud-track-loc debugger-output nil)))
> +(let ((loc (realgud-track-loc debugger-output nil)))
> (assert-t (realgud-loc-p loc) "loc extracted")
> (assert-equal "(trepan):\n"
> (realgud-track-loc-remaining debugger-output)
>
[-- Attachment #2: Type: text/html, Size: 75237 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2016-08-04 22:05 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
[not found] <20160804030326.16920.78136@vcs.savannah.gnu.org>
[not found] ` <20160804030326.B379D220169@vcs.savannah.gnu.org>
2016-08-04 4:43 ` [elpa] master d7bac58 3/5: Wrong require again Stefan Monnier
2016-08-04 13:45 ` Rocky Bernstein
2016-08-04 22:05 ` Stefan Monnier
2016-08-04 22:05 ` Rocky Bernstein
[not found] ` <20160804030326.835FA2200F4@vcs.savannah.gnu.org>
2016-08-04 4:44 ` [elpa] master ecf1577 1/5: Avoid reading a binary as a source file Stefan Monnier
2016-08-04 13:52 ` Rocky Bernstein
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).