From 09e66cf0e799fa0f66d589a66443e7481327947f Mon Sep 17 00:00:00 2001
From: Yuchen Pei <id@ypei.org>
Date: Sat, 25 Jan 2025 09:37:05 +1100
Subject: [emacs] mtrr compile and gdb expr watch

---
 emacs/.emacs.d/lisp/my/my-mariadb.el | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

(limited to 'emacs/.emacs.d/lisp/my/my-mariadb.el')

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
-- 
cgit v1.2.3