decruft lua warnings.

.editorconfig

@@ -36,3 +36,7 @@ charset = utf-8
 [*.{natvis, natstepfilter}]
 indent_style = tab
 indent_size  = 4
+
+[*.lua]
+indent_style = tab
+indent_size = 2

code/duffle/lottes_tape.h

@@ -18,20 +18,20 @@ typedef U4 const MipsCode;
  *  The C compiler is completely unaware of these bindings.
  * ---------------------------------------------------------------------------*/
 enum {
-	R_AtomJmp  = R_T9,
+	R_AtomJmp    = R_T9,
-	R_TapePtr  = R_T8,  /* The Instruction Stream Pointer */
+	R_TapePtr    = R_T8,  /* The Instruction Stream Pointer */
-	R_PrimCur  = R_T7,  /* VRAM output cursor (primitive buffer) */
+	R_PrimCursor = R_T7,  /* VRAM output cursor (primitive buffer) */
-	R_FaceCur  = R_T4,  /* Input data cursor (indices/faces) */
+	R_FaceCursor = R_T4,  /* Input data cursor (indices/faces) */
-	R_InCursor = R_T4,  /* Input data cursor (indices/faces) */
+	R_InCursor   = R_T4,  /* Input data cursor (indices/faces) */
-	R_VertBase = R_T5,  /* Base address of the vertex array */
+	R_VertBase   = R_T5,  /* Base address of the vertex array */
-	R_OtBase   = R_T6,  /* Base address of the Ordering Table */
+	R_OtBase     = R_T6,  /* Base address of the Ordering Table */
 /* Stringification codes for the GCC inline assembler clobber lists */
-#define R_TapePtr_Code  R_T8_Code
+#define R_TapePtr_Code     R_T8_Code
-#define R_PrimCur_Code  R_T7_Code
+#define R_PrimCursor_Code  R_T7_Code
-#define R_FaceCur_Code  R_T4_Code
+#define R_FaceCursor_Code  R_T4_Code
-#define R_InCursor_Code R_T4_Code
+#define R_InCursor_Code    R_T4_Code
-#define R_VertBase_Code R_T5_Code
+#define R_VertBase_Code    R_T5_Code
-#define R_OtBase_Code   R_T6_Code
+#define R_OtBase_Code      R_T6_Code
 };
 
 /* The 'Exit' Atom */
@@ -55,7 +55,7 @@ FI_ void tape_run(Slice_U4 tape) { register U4* tp rgcc(R_TapePtr) = tape.ptr; a
 		, rlit(R_V0), rlit(R_V1)
 		, rlit(R_T0), rlit(R_T1), rlit(R_T2), rlit(R_T3)
 		/* Tell GCC the tape engine owns and destroys the workspace registers */
-		, rlit(R_PrimCur), rlit(R_FaceCur), rlit(R_VertBase), rlit(R_OtBase)
+		, rlit(R_PrimCursor), rlit(R_FaceCursor), rlit(R_VertBase), rlit(R_OtBase)
 		, rlit(R_T9)
 		, clb_mem_drain 
 ); }
@@ -92,9 +92,9 @@ FI_ Slice_U4 tb_slice(TapeBuilder  tb) {                             return (Sli
 
 /* Words: 3; Loads 3 S2 indices from the face array */
 #define mac_load_tri_indices(rId_0, rId_1, rId_2) \
-	  load_half_u(rId_0, R_FaceCur, 0) \
+	  load_half_u(rId_0, R_FaceCursor, 0) \
-	, load_half_u(rId_1, R_FaceCur, 2) \
+	, load_half_u(rId_1, R_FaceCursor, 2) \
-	, load_half_u(rId_2, R_FaceCur, 4)
+	, load_half_u(rId_2, R_FaceCursor, 4)
 
 /* Words: 18; Translates indices to vertex addresses and pushes them to GTE 
 	R_AT  = rId_[#] << 3; 
@@ -117,8 +117,8 @@ FI_ Slice_U4 tb_slice(TapeBuilder  tb) {                             return (Sli
 	, shift_ll(  R_AT, R_AT, 8)          /* Strip upper 8 bits from old_ot */ \
 	, shift_lr(  R_AT, R_AT, 8)                                               \
 	, or_u(      R_AT, R_AT, R_V0)       /* Merge length */                   \
-	, store_word(R_AT, R_PrimCur, 0)     /* prim->tag = old_ot_head */        \
+	, store_word(R_AT, R_PrimCursor, 0)  /* prim->tag = old_ot_head */        \
-	, shift_ll(  R_AT, R_PrimCur, 8)     /* AT = PrimCur & 0x00FFFFFF */      \
+	, shift_ll(  R_AT, R_PrimCursor, 8)  /* AT = PrimCur & 0x00FFFFFF */      \
 	, shift_lr(  R_AT, R_AT, 8)                                               \
 	, store_word(R_AT, R_T1, 0)          /* OrderingTable[OTZ] = PrimCur */
 
@@ -196,7 +196,7 @@ internal MipsAtom_(sync_prim_cursor) {
 	load_word(R_T0, R_TapePtr, O_(Binds_SyncPrimCursor,PrimtiveBase)),      
 	add_ui_1(       R_TapePtr, S_(Binds_SyncPrimCursor)),
 	/* Calculate byte offset and store directly back to RAM */
-	sub_u(R_T0, R_PrimCur, R_T0), // R_T0 = PrimitiveArea_Used(R_AT) - R_PrimCur
+	sub_u(R_T0, R_PrimCursor, R_T0), // R_T0 = PrimitiveArea_Used(R_AT) - R_PrimCur
 	store_word(R_T0, R_AT, 0),    // PrimitiveBase(R_AT)[0] = R_T0
 	mac_yield()
 };
@@ -228,11 +228,11 @@ typedef Struct_(Binds_CubeTri) {
 };
 internal MipsAtom_(rbind_cube_tri) {
 	/* Pop 4 arguments from the tape directly into the workspace registers */
-	load_word(R_PrimCur,  R_TapePtr, O_(Binds_CubeTri,PrimCursor)), 
+	load_word(R_PrimCursor, R_TapePtr, O_(Binds_CubeTri,PrimCursor)), 
-	load_word(R_FaceCur,  R_TapePtr, O_(Binds_CubeTri,FaceCursor)), 
+	load_word(R_FaceCursor, R_TapePtr, O_(Binds_CubeTri,FaceCursor)), 
-	load_word(R_VertBase, R_TapePtr, O_(Binds_CubeTri,VertBase)), 
+	load_word(R_VertBase,   R_TapePtr, O_(Binds_CubeTri,VertBase)), 
-	load_word(R_OtBase,   R_TapePtr, O_(Binds_CubeTri,OtBase)), 
+	load_word(R_OtBase,     R_TapePtr, O_(Binds_CubeTri,OtBase)), 
-	add_ui_1(             R_TapePtr, S_(Binds_CubeTri)),
+	add_ui_1(               R_TapePtr, S_(Binds_CubeTri)),
 	// Note(Ed): This entire thing is argument shuffle?
 	// TODO(Ed): Eliminate
 	mac_yield()
@@ -276,10 +276,10 @@ internal MipsAtom_(rbind_cube_tri) {
  * ============================================================================ */
 internal MipsAtom_(cube_tri) {
 	/* ── 1. Load 4 face indices from R_FaceCur ──────────────────────────── */
-	load_half_u(R_T0, R_FaceCur, 0),  /* T0 = face->x (vertex 0 index) */
+	load_half_u(R_T0, R_FaceCursor, 0),  /* T0 = face->x (vertex 0 index) */
-	load_half_u(R_T1, R_FaceCur, 2),  /* T1 = face->y (vertex 1 index) */
+	load_half_u(R_T1, R_FaceCursor, 2),  /* T1 = face->y (vertex 1 index) */
-	load_half_u(R_T2, R_FaceCur, 4),  /* T2 = face->z (vertex 2 index) */
+	load_half_u(R_T2, R_FaceCursor, 4),  /* T2 = face->z (vertex 2 index) */
-	load_half_u(R_T3, R_FaceCur, 6),  /* T3 = face->w (vertex 3 index) */
+	load_half_u(R_T3, R_FaceCursor, 6),  /* T3 = face->w (vertex 3 index) */
 
 	/* ── 2. Load V0, V1, V2 into GTE ────────────────────────────────────── */
 	/* V0 = verts[face->x] */
@@ -312,32 +312,32 @@ internal MipsAtom_(cube_tri) {
 	nop,                        /* BD slot */
 
 	/* ── 6. Store p0,p1,p2 to primitive buffer (BEFORE RTPS overwrites) ─── */
-	store_word(R_0, R_PrimCur, 0),
+	store_word(R_0, R_PrimCursor, 0),
 
 	/* Word 1: c0 (BGR) + code = 0x38FF00FF (magenta, opcode 0x38) */
 	load_ui(R_AT, 0x38FF), or_i(R_AT, R_AT, 0x00FF),
-	store_word(R_AT, R_PrimCur, 4),
+	store_word(R_AT, R_PrimCursor, 4),
 
 	/* Word 2: p0 = SXY0 (stored BEFORE RTPS overwrites it) */
-	gte_sw(C2_SXY0, R_PrimCur, 8),
+	gte_sw(C2_SXY0, R_PrimCursor, 8),
 
 	/* Word 3: c1 (BGR) + pad = 0x0000FFFF (yellow) */
 	load_ui(R_AT, 0x0000), or_i(R_AT, R_AT, 0xFFFF),
-	store_word(R_AT, R_PrimCur, 12),
+	store_word(R_AT, R_PrimCursor, 12),
 
 	/* Word 4: p1 = SXY1 */
-	gte_sw(C2_SXY1, R_PrimCur, 16),
+	gte_sw(C2_SXY1, R_PrimCursor, 16),
 
 	/* Word 5: c2 (BGR) + pad = 0x00FFFF00 (cyan) */
 	load_ui(R_AT, 0x00FF), or_i(R_AT, R_AT, 0xFF00),
-	store_word(R_AT, R_PrimCur, 20),
+	store_word(R_AT, R_PrimCursor, 20),
 
 	/* Word 6: p2 = SXY2 */
-	gte_sw(C2_SXY2, R_PrimCur, 24),
+	gte_sw(C2_SXY2, R_PrimCursor, 24),
 
 	/* Word 7: c3 (BGR) + pad = 0x0000FF00 (green) */
 	load_ui(R_AT, 0x0000), or_i(R_AT, R_AT, 0xFF00),
-	store_word(R_AT, R_PrimCur, 28),
+	store_word(R_AT, R_PrimCursor, 28),
 
 	/* ── 7. Load V3 = verts[face->w] into V0 ─────────────────────────────── */
 	shift_ll(R_AT, R_T3, 3), add_u(R_AT, R_AT, R_VertBase),
@@ -348,7 +348,7 @@ internal MipsAtom_(cube_tri) {
 	nop, nop, gte_cmdw_rtps,
 
 	/* Word 8: p3 = SXY0 (written AFTER RTPS with V3's screen coords) */
-	gte_sw(C2_SXY0, R_PrimCur, 32),
+	gte_sw(C2_SXY0, R_PrimCursor, 32),
 
 	/* ── 9. AVSZ4 — average Z from SZ0/SZ1/SZ2/SZ3 ────────────── */
 	nop, nop, gte_cmdw_avsz4,
@@ -365,8 +365,8 @@ internal MipsAtom_(cube_tri) {
 	mac_insert_ot_tag(R_T1, 0x0800),  /* 0x0800 = 8 << 8 = length 8 in tag */
 
 	/* ── 12. Advance cursors & yield ─────────────────────────────────────── */
-	add_ui(R_PrimCur, R_PrimCur, 36),  /* 9 words × 4 bytes */
+	add_ui(R_PrimCursor, R_PrimCursor, 36),  /* 9 words × 4 bytes */
-	add_ui(R_FaceCur, R_FaceCur, 8),   /* 4 × S2 = 8 bytes */
+	add_ui(R_FaceCursor, R_FaceCursor, 8),   /* 4 × S2 = 8 bytes */
 	mac_yield()
 };
 
@@ -380,11 +380,11 @@ typedef Struct_(Binds_FloorTri) {
 
 internal MipsAtom_(rbind_floor_tri) {
 	/* Pop 4 arguments from the tape directly into the workspace registers */
-	load_word(R_PrimCur,  R_TapePtr, O_(Binds_FloorTri,PrimCursor)), 
+	load_word(R_PrimCursor, R_TapePtr, O_(Binds_FloorTri,PrimCursor)), 
-	load_word(R_FaceCur,  R_TapePtr, O_(Binds_FloorTri,FaceCursor)), 
+	load_word(R_FaceCursor, R_TapePtr, O_(Binds_FloorTri,FaceCursor)), 
-	load_word(R_VertBase, R_TapePtr, O_(Binds_FloorTri,VertBase)), 
+	load_word(R_VertBase,   R_TapePtr, O_(Binds_FloorTri,VertBase)), 
-	load_word(R_OtBase,   R_TapePtr, O_(Binds_FloorTri,OtBase)), 
+	load_word(R_OtBase,     R_TapePtr, O_(Binds_FloorTri,OtBase)), 
-	add_ui_1(             R_TapePtr, S_(Binds_FloorTri)),
+	add_ui_1(               R_TapePtr, S_(Binds_FloorTri)),
 	// Note(Ed): This entire thing is argument shuffle?
 	// TODO(Ed): Eliminate
 	mac_yield()

code/gte_hello/hello_gte_tape.c

@@ -10,13 +10,13 @@
 /* Words: 3; High: 0x20/B, Low: G/R */
 #define mac_format_f3_color(color_hi, color_lo) \
 	  load_ui(R_AT, color_hi), or_i(R_AT, R_AT, color_lo) \
-	, store_word(R_AT, R_PrimCur, O_(Poly_F3,color))   \
+	, store_word(R_AT, R_PrimCursor, O_(Poly_F3,color))   \
 
 /* Words: 3 */
 #define mac_gte_store_f3() \
-	  gte_sw(C2_SXY0, R_PrimCur, O_(Poly_F3,p0)) \
+	  gte_sw(C2_SXY0, R_PrimCursor, O_(Poly_F3,p0)) \
-	, gte_sw(C2_SXY1, R_PrimCur, O_(Poly_F3,p1)) \
+	, gte_sw(C2_SXY1, R_PrimCursor, O_(Poly_F3,p1)) \
-	, gte_sw(C2_SXY2, R_PrimCur, O_(Poly_F3,p2))
+	, gte_sw(C2_SXY2, R_PrimCursor, O_(Poly_F3,p2))
 
 #pragma endregion MACs
 
@@ -61,11 +61,11 @@ internal MipsCode code_floor_tri [] __attribute__((aligned (4))) = {
 	
 	/* 8. Insert into Ordering Table Linked List */
 	mac_insert_ot_tag(R_T1, 0x0400),
-	add_ui(R_PrimCur, R_PrimCur, S_(Poly_F3)), /* Advance Prim Cursor (5 words) */
+	add_ui(R_PrimCursor, R_PrimCursor, S_(Poly_F3)), /* Advance Prim Cursor (5 words) */
 
 	/* 9. Advance Input Cursor & Yield (Both branch targets land here) */
 atom_label(floor_tri_exit)
-	add_ui(R_FaceCur, R_FaceCur, S_(S2) * 4),  /* Advance Face Cursor (4 * S2 = 8 bytes) */
+	add_ui(R_FaceCursor, R_FaceCursor, S_(S2) * 4),  /* Advance Face Cursor (4 * S2 = 8 bytes) */
 	mac_yield()
 };
 

code/gte_hello/tape_atom.metadata.h

@@ -10,6 +10,8 @@
 #define WORD_COUNT(name, count)  enum { words_##name = (count) };
 
 WORD_COUNT(nop,                              1)
+WORD_COUNT(jump_reg,                         1)
+WORD_COUNT(jump_link,                        1)
 WORD_COUNT(branch_le_zero,                   1)
 WORD_COUNT(branch_equal,                     1)
 WORD_COUNT(add_ui,                           1)
@@ -18,6 +20,12 @@ WORD_COUNT(load_ui,                          1)
 WORD_COUNT(load_word,                        1)
 WORD_COUNT(load_half_u,                      1)
 WORD_COUNT(store_word,                       1)
+WORD_COUNT(add_ui_1,                         1)
+WORD_COUNT(add_u,                            1)
+WORD_COUNT(or_i,                             1)
+WORD_COUNT(or_u,                             1)
+WORD_COUNT(shift_ll,                         1)
+WORD_COUNT(shift_lr,                         1)
 WORD_COUNT(gte_mf,                           1)
 WORD_COUNT(gte_mt,                           1)
 WORD_COUNT(gte_ct,                           1)

scripts/tape_atom.offset_gen.meta.lua

@@ -56,7 +56,11 @@ local function write_file(path, content)
 	f:close()
 end
 
-local function ensure_dir(path) os.execute('mkdir -p "' .. path .. '"') end
+-- PowerShell aliases `mkdir` to New-Item, which treats `-p` as a path, so guard the call.
+local function ensure_dir(path)
+	local is_win = package.config:sub(1, 1) == "\\"
+	os.execute(is_win and ('if not exist "' .. path .. '" mkdir "' .. path .. '"') or ('mkdir -p "' .. path .. '" 2>/dev/null'))
+end
 
 -- ============================================================
 -- String primitives
@@ -532,11 +536,11 @@ end
 -- ============================================================
 
 local function process_source(source_path, word_counts)
-	local source = read_file(source_path)
+	local source    = read_file(source_path)
 	local atoms_raw = find_atoms(source)
 
 	if #atoms_raw == 0 then
-		io.stderr:write("  note: no MipsAtom_ declarations in " .. source_path .. "\n")
+		-- io.stderr:write("  note: no MipsAtom_ declarations in " .. source_path .. "\n")
 		return
 	end