diff options
| author | Yuchen Pei <id@ypei.org> | 2025-01-25 09:37:05 +1100 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2025-01-25 09:37:05 +1100 |
| commit | 09e66cf0e799fa0f66d589a66443e7481327947f (patch) | |
| tree | 2dd70137701dcd9b80652f79f2627b98162120a0 /emacs/.emacs.d/lisp/my/my-mariadb.el | |
| parent | d517e2b4b6f036f1d38142c4adc80d229404fc4c (diff) | |
[emacs] mtrr compile and gdb expr watch
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-mariadb.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-mariadb.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-mariadb.el b/emacs/.emacs.d/lisp/my/my-mariadb.el index d790944..d6c2463 100644 --- a/emacs/.emacs.d/lisp/my/my-mariadb.el +++ b/emacs/.emacs.d/lisp/my/my-mariadb.el @@ -33,7 +33,9 @@ (interactive) (if (equal (file-name-extension (buffer-file-name)) "test") - (call-interactively 'project-compile) + (progn + (my-mtr-set-compile-command) + (call-interactively 'compile)) (sql-send-buffer))) (defun my-gdb-maria () @@ -311,7 +313,11 @@ switches to the buffer." (match-string 3 buffer-file-name)))))) (setq-local compile-command - (format "%smysql-test/mtr %s" build-dir test-name))))) + (format "%s %s %s %s" + "taskset -c 0-3" + (file-name-concat build-dir "mysql-test/mtr") + test-name + "--rr"))))) (provide 'my-mariadb) ;;; my-mariadb.el ends here |