progress in logging nock

1 files changed, 23 insertions, 0 deletions

diff --git a/vere/pkg/noun/vortex.c b/vere/pkg/noun/vortex.c
index 63b4fc2..e4b55d9 100644
--- a/vere/pkg/noun/vortex.c
+++ b/vere/pkg/noun/vortex.c
@@ -38,7 +38,30 @@ u3v_life(u3_noun eve)
   u3l_log("u3v_life: processing %llu events", (unsigned long long)len_d);
 
   u3_noun lyf = u3nt(2, u3nc(0, 3), u3nc(0, 2));
+
+  // Log eve structure before nock
+  u3l_log("u3v_life: eve is %s", (c3y == u3a_is_atom(eve)) ? "atom" : "cell");
+  if ( c3y == u3a_is_cell(eve) ) {
+    u3_noun eve_h = u3h(eve);
+    u3_noun eve_t = u3t(eve);
+    u3l_log("u3v_life: eve head is %s", (c3y == u3a_is_atom(eve_h)) ? "atom" : "cell");
+    u3l_log("u3v_life: eve tail is %s", (c3y == u3a_is_atom(eve_t)) ? "atom" : "cell");
+
+    if ( c3y == u3a_is_cell(eve_h) ) {
+      u3_noun eve_hh = u3h(eve_h);
+      u3_noun eve_ht = u3t(eve_h);
+      u3l_log("u3v_life: eve head.head is %s", (c3y == u3a_is_atom(eve_hh)) ? "atom" : "cell");
+      if ( c3y == u3a_is_atom(eve_hh) ) {
+        u3l_log("u3v_life: eve head.head = %u", u3r_word(0, eve_hh));
+      }
+      u3l_log("u3v_life: eve head.tail is %s", (c3y == u3a_is_atom(eve_ht)) ? "atom" : "cell");
+    }
+  }
+
+  u3l_log("u3v_life: calling u3n_nock_on(eve, [2 [0 3] [0 2]])...");
   u3_noun gat = u3n_nock_on(eve, lyf);
+  u3l_log("u3v_life: u3n_nock_on returned successfully");
+
   u3_noun cor = u3k(u3x_at(7, gat));
 
   u3z(gat);