From 96e75f1070180c44aae6328f4c702ed00e7a813a Mon Sep 17 00:00:00 2001
From: Max Bernstein <emacs@fb.com>
Date: Mon, 8 Mar 2021 15:40:49 -0800
Subject: [PATCH] Add j/k keybindings for navigating trace

These are familiar for Vim users.
---
 shell/trace.mu | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/shell/trace.mu b/shell/trace.mu
index e3269088..b8e1e00d 100644
--- a/shell/trace.mu
+++ b/shell/trace.mu
@@ -690,6 +690,14 @@ fn edit-trace _self: (addr trace), key: grapheme {
     increment *cursor-y
     return
   }
+  # cursor down
+  {
+    compare key, 0x6a/j
+    break-if-!=
+    var cursor-y/eax: (addr int) <- get self, cursor-y
+    increment *cursor-y
+    return
+  }
   # cursor up
   {
     compare key, 0x15/ctrl-u
@@ -698,6 +706,14 @@ fn edit-trace _self: (addr trace), key: grapheme {
     decrement *cursor-y
     return
   }
+  # cursor up
+  {
+    compare key, 0x6b/k
+    break-if-!=
+    var cursor-y/eax: (addr int) <- get self, cursor-y
+    decrement *cursor-y
+    return
+  }
   # enter = expand
   {
     compare key, 0xa/newline