File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -612,7 +612,7 @@ name; otherwise continues tokenizing up to the token at point. FIXME."
612612 (let ((name (car chunk))
613613 (code (cdr chunk)))
614614 (setf (aref object-code i) `(label , name ))
615- (cl- incf i)
615+ (incf i)
616616 (puthash name i name->offset)
617617 (while code
618618 (setf (aref object-code i) (car code)
@@ -1770,8 +1770,8 @@ there."
17701770 (when start-symbol ; HACK FIXME
17711771 (let ((look-for `(label , start-symbol )))
17721772 (while (not (equal (aref instructions pc) look-for))
1773- (cl- incf pc))
1774- (cl- incf pc)))
1773+ (incf pc))
1774+ (incf pc)))
17751775
17761776 (setq gnuplot-context--completions nil
17771777 gnuplot-context--eldoc nil
Original file line number Diff line number Diff line change 88; ; Version: 0.11
99; ; Keywords: data gnuplot plotting
1010; ; URL: https://github.com/emacs-gnuplot/gnuplot
11- ; ; Package-Requires: ((emacs "28.1") (compat "30 "))
11+ ; ; Package-Requires: ((emacs "28.1") (compat "31 "))
1212
1313; ; This program is free software: you can redistribute it and/or modify
1414; ; it under the terms of the GNU General Public License as published by
Original file line number Diff line number Diff line change 376376 (insert-file-contents fname)
377377 (gnuplot-mode)
378378 (message " Testing on file %s of %s : %s ... "
379- (cl- incf n) n-files fname)
379+ (incf n) n-files fname)
380380 (condition-case err
381381 (gnuplot-test-parse-buffer (current-buffer ) fname)
382382 (error
415415 (gnuplot-context--match-pattern
416416 gnuplot-context--compiled-grammar
417417 tokens nil )))
418- (cl- incf gnuplot-test-count)
418+ (incf gnuplot-test-count)
419419 (if (equal result '(nil ))
420- (cl- incf gnuplot-test-success-count)
420+ (incf gnuplot-test-success-count)
421421 (let ((cmd
422422 (buffer-substring
423423 (gnuplot--point-at-beginning-of-command)
You can’t perform that action at this time.
0 commit comments