provide entrypoint for updating FSR1 panic readout pointer

diff --git a/detpic/panic.asm b/detpic/panic.asm
index ed3c8e46cc48961079c4d0b51b85d36ef82eb3d9..7af4d90dbdea65b8b542c5160ecdc4acf78e5b54 100644 (file)
--- a/detpic/panic.asm
+++ b/detpic/panic.asm
@@ -366,7 +366,7 @@ write_ifnot_00
        bt_w_if1 7 ; huh?
        return
        bt_w_if1 6
-       bra     write_if_setpointer
+       bra     panic_crashread_setpointer
        bt_f_if0 idloc1,idloc1_master
        return ; all the remaining options are for master only
 ;nyi   bt_w_if1 5
@@ -376,7 +376,11 @@ write_ifnot_00
        return ; huh ?
 
 ;----------
-write_if_setpointer
+panic_crashread_setpointer
+;  W                   byte from master or host        undefined
+;  FSR1*               crashread pointer               updated
+;  t, STATUS, PROD*    any                             undefined
+;  all others          any                             preserved
        mov_wf  t
        mov_lw  1<<6
        mul_wf  FSR1L

diff --git a/detpic/panic.fin b/detpic/panic.fin
index b32473b157e1ec0271d80e1cfb9a10411c6dd371..c732a0c82528a7d6542372266372b05e051af606 100644 (file)
--- a/detpic/panic.fin
+++ b/detpic/panic.fin
@@ -1,5 +1,6 @@
  extern panic_routine
  extern panic_kill_hook
+ extern panic_crashread_setpointer
  extern i2csu_write_panicd
  extern i2csu_read_begin_panicd
  extern i2csu_read_another_panicd