chiark / gitweb /
leave droppings in debug buffer re low interrupt sources
authorian <ian>
Sun, 27 Apr 2008 23:04:50 +0000 (23:04 +0000)
committerian <ian>
Sun, 27 Apr 2008 23:04:50 +0000 (23:04 +0000)
detpic/common.inc
detpic/program.asm
detpic/variables.asm

index 8fc7b7379d8a0a2560c47aeed0a7da7c45b1203a..6fd5d7787f0f2c061971f17cc1667eff239153c4 100644 (file)
@@ -160,6 +160,14 @@ Df macro debug_register_file_address
        mov_fw  debug_register_file_address
        Dv
        endm
+
+;----------
+DI macro
+;
+;  STATUS      any             trashed
+;
+       inc_f   debug_intrdiag
+       endm
   else
 Dv macro
    endm
@@ -167,6 +175,8 @@ Dl macro debug_literal_value
    endm
 Df macro debug_register_file_address
    endm
+DI macro
+   endm
   endif
 
 ;----------------------------------------
index 2a87efe0ef751959c3d61307f7b9d78ea12ec0f4..43f7fd724e6a3e7e1323a81bf09119646acfd75a 100644 (file)
@@ -79,20 +79,32 @@ master_init
 ;----------------------------------------
 master_interrupt_low @
        enter_interrupt_low
-       Dl 0x80
+
+       Df      debug_intrdiag
+       Dl      '|'
        Df      INTCON
        Df      INTCON2
        Df      INTCON3
        Df      PIR1
        Df      PIR2
+ Df FSR2L
        Dl 0x8d
+       clr_f debug_intrdiag
+
        call    tick_intrl
+ DI
        call    nmra_serialrx_intrl
+ DI
        call    power_fault_intrl
+ DI
        call    serialtxfc_intrl
+ DI
        call    serialtx_intrl
+ DI
        call    points_local_intrl
+ DI
        call    i2cm_intrl
+ DI
        Dl 0x8e
        Df      INTCON
        Df      INTCON2
index 2126a571a7b6474f21b26e09dbb3a4f23bf9ba15..978571eb5b50f37163667322822bb4782561ca6e 100644 (file)
@@ -31,6 +31,9 @@ xdebug                        res     8
 cwslave                        res     1 ; slave we're currently actually writing to
                                  ; undefined except in <something>_needwrite
 
+debug_intrdiag         res     1 ; used only for debugging, interrupt
+                                 ;  source recording
+
 ;----------------------------------------------------------------------
 ; NON-ACCESS-BANK SECTIONS (TABLES)