Bagaimana cara mengubah dua argumen fungsi dalam Python?

Bagaimana saya bisa menukar dua argumen dalam panggilan ke fungsi Python?

Jika saya menempatkan pointspasi di antara dua argumen ini:

self.assertEqual(json.loads(some.data), json_data)

dan kemudian M-t( transpose-words), saya mendapatkan:

self.assertEqual(json.loads(some.json), data_data)

Di sisi lain dengan CMt ( transpose-sexps) saya mendapatkan:

self.assertEqual(json.loadsjson_data, (some.data))

Yang saya inginkan adalah:

self.assertEqual(json_data, json.loads(some.data))

Apakah ada perintah yang akan melakukan itu?

Ini adalah sesuatu yang saya juga ingin miliki untuk waktu yang lama, dan di sini saya menemukan motivasi untuk mengerjakannya. Ini mungkin tidak terlalu kuat, tetapi pada percobaan pertama tampaknya mencakup kasus-kasus yang saya coba:

(defun my/calculate-stops ()
  (save-excursion
    (let ((start
           (condition-case e
               (while t (backward-sexp))
             (error (point))))
          stops)
      (push start stops)
      (condition-case e
          (while t
            (forward-sexp)
            (when (looking-at "\\s-*,")
              (push (point) stops)))
        (error (push (point) stops)))
      (nreverse stops))))

(defun my/transpose-args ()
  (interactive)
  (when (looking-at "\\s-") (backward-sexp))
  (cl-loop with p = (point)
           with previous = nil
           for stop on (my/calculate-stops)
           for i upfrom 0
           when (<= p (car stop)) do
           (when previous
             (let* ((end (cadr stop))
                    (whole (buffer-substring previous end))
                    middle last)
               (delete-region previous end)
               (goto-char previous)
               (setf middle (if (> i 1) (- (car stop) previous)
                              (string-match "[^, \\t]" whole 
                                            (- (car stop) previous)))
                     last (if (> i 1) (substring whole 0 middle)
                            (concat (substring whole (- (car stop) previous) middle)
                                    (substring whole 0 (- (car stop) previous)))))
               (insert (substring whole middle) last)))
           (cl-return)
           end do (setf previous (car stop))))

Saya menggunakan variasi transpose-sexpsyang terlihat untuk kasus yang Anda gambarkan dan mentransposasikan hal-hal yang dipisahkan oleh koma, atau hanya biasa saja transpose-sexps. Ini juga meninggalkan kursor di tempat bukannya menyeretnya ke depan, yang sedikit berbeda tapi saya pribadi suka.

(defun my-transpose-sexps ()
  "If point is after certain chars transpose chunks around that.
Otherwise transpose sexps."
  (interactive "*")
  (if (not (looking-back "[,]\\s-*" (point-at-bol)))
      (progn (transpose-sexps 1) (forward-sexp -1))
    (let ((beg (point)) end rhs lhs)
      (while (and (not (eobp))
                  (not (looking-at "\\s-*\\([,]\\|\\s)\\)")))
        (forward-sexp 1))
      (setq rhs (buffer-substring beg (point)))
      (delete-region beg (point))
      (re-search-backward "[,]\\s-*" nil t)
      (setq beg (point))
      (while (and (not (bobp))
                  (not (looking-back "\\([,]\\|\\s(\\)\\s-*" (point-at-bol))))
        (forward-sexp -1))
      (setq lhs (buffer-substring beg (point)))
      (delete-region beg (point))
      (insert rhs)
      (re-search-forward "[,]\\s-*" nil t)
      (save-excursion
        (insert lhs)))))

Dalam mode yang menggunakan SMIE, transpose-sexpharus berfungsi dengan benar untuk kasus itu. Mereka masih akan gagal ketika simbol infiks (alias "pemisah") bukan a ,(atau a ;) tetapi kata (misalnya and).

Jadi, pendapat saya adalah bahwa perintah untuk itu adalah transpose-sexpdan ketika ini tidak berfungsi dengan benar, saya menganggapnya sebagai bug (tetapi bug yang mungkin sulit dan / atau membutuhkan waktu untuk diperbaiki dan memiliki prioritas rendah, jadi jangan ' t tahan nafasmu). Cara untuk memperbaikinya adalah dengan menetapkan forward-sexp-functionke fungsi yang akan tahu bahwa "setelah saya melihat koma, saya hanya melompati seluruh argumen".