Made the atom offset/label metaprogram! Still need to support more than one branch per-atom.

code/duffle/mips.h

@@ -482,39 +482,6 @@ enum { _BitOffsets = 0
 	}                                                                \
 } while (0                                                         )
 
-// Binary Metaprogramming
-
-typedef U4 const MipsCode;
-#define MipsAtom_(sym) MipsCode tmpl(code,sym) [] align_(4) =
-
-enum {
-	bios_flushcache = 0x44,
-	bios_table_addr = 0xA0,
-};
-
-/* Flushes the Instruction Cache (PSX A-function 0x44 via BIOS stub at 0xA0).
- *
- * Sequence (per MIPS ABI; arguments in arg registers, RA pushed to stack):
- *   1. sp -= 8;  sw $ra, 4($sp)        ; save RA
- *   2. $a0 = bios_flushcache (arg0)
- *   3. $t0 = bios_table_addr           ; t0 = &BIOS A-function table
- *   4. jalr $t0, $ra                    ; call BIOS(flushcache)
- *      nop                              ; branch delay slot
- *   5. lw $ra, 4($sp);  jr $ra          ; restore & return
- *   6. sp += 8
- */
-internal MipsAtom_(mips_flush_icache) {
-	  add_ui(rstack_ptr, rstack_ptr, -8)        /* sp -= 8             */
-	, store_word(rret_addr, rstack_ptr, 4)      /* sw  $ra,   4($sp)   */
-	, add_ui(rret_0, rdiscard, bios_flushcache) /* addiu $a0, $0, 0x44 */
-	, add_ui(rtmp_0, rdiscard, bios_table_addr) /* addiu $t0, $0, 0xA0 */
-	, jump_link(rtmp_0, rret_addr)              /* jalr  $t0, $ra      */
-	, nop                                       /* BD slot             */
-	, load_word(rret_addr, rstack_ptr, 4)       /* lw   $ra, 4($sp)    */
-	, jump_reg(rret_addr)                       /* jr   $ra            */
-	, add_ui(rstack_ptr, rstack_ptr, 8)         /* sp += 8 (BD)        */
-};
-I_ void mips_flush_icache(void) { C_(VoidFn*, code_mips_flush_icache)(); }
 
 /* Standard clobber list for pure-MIPS asm volatile blocks: caller-saved
  * GPRs that the kernel treats as volatile (v0/v1/t0/t1/ra) plus the
@@ -533,7 +500,3 @@ I_ void mips_flush_icache(void) { C_(VoidFn*, code_mips_flush_icache)(); }
 	, jump_reg(rret_addr)                       \
 	, add_ui(rstack_ptr, rstack_ptr, 8)         \
 ) asm_clobber: clb_system )
-
-void test_mips_asm() {
-	asm_mips_flush_icache();
-}