I found this by looking for mainloop in the LST file:

Code:
...
                      00086         LABEL?L _mainloop       
                          M         RST?RP
                          M     if (PREV_ALT != 0)
                          M         bcf     WDTCON, ADSHR
                          M PREV_ALT = 0
                          M     endif
                          M     if (PREV_BANK != 0)
                          M         movlb   0
                          M PREV_BANK = 0
                          M     endif
                          M     ifdef PM_USED
                          M         LALL
                          M _mainloop
                          M         XALL
                          M     else
000074                    M _mainloop
                          M     endif
                      00087         MOVE?CB 0FCh, TRISA
                          M         CHK?RP  TRISA
                          M     if (((TRISA) & 8000h) != PREV_ALT)
                          M       if ((TRISA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (TRISA) & 8000h
                          M     endif
                          M     if ((((TRISA) & 0fffh) > BANKA_END) & (((TRISA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((TRISA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (TRISA)
                          M PREV_BANK = high (TRISA)
                          M       endif
                          M     endif
                          M     if (low (0FCh) == 0)
                          M         clrf    TRISA
                          M     else
                          M       if (low (0FCh) == 255)
                          M         setf    TRISA
                          M       else
000074 0EFC               M         movlw   low (0FCh)
000076 6E92               M         movwf   TRISA
                          M       endif
                          M     endif
MPASM  5.49                      BLINK1~1.ASM   12-15-2014  22:49:14         PAGE 15


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

                      00088         MOVE?CB 001h, PORTA
                          M         CHK?RP  PORTA
                          M     if (((PORTA) & 8000h) != PREV_ALT)
                          M       if ((PORTA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (PORTA) & 8000h
                          M     endif
                          M     if ((((PORTA) & 0fffh) > BANKA_END) & (((PORTA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((PORTA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (PORTA)
                          M PREV_BANK = high (PORTA)
                          M       endif
                          M     endif
                          M     if (low (001h) == 0)
                          M         clrf    PORTA
                          M     else
                          M       if (low (001h) == 255)
                          M         setf    PORTA
                          M       else
000078 0E01               M         movlw   low (001h)
00007A 6E80               M         movwf   PORTA
                          M       endif
                          M     endif
                      00089         MOVE?CB 002h, PORTA
                          M         CHK?RP  PORTA
                          M     if (((PORTA) & 8000h) != PREV_ALT)
                          M       if ((PORTA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (PORTA) & 8000h
                          M     endif
                          M     if ((((PORTA) & 0fffh) > BANKA_END) & (((PORTA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((PORTA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (PORTA)
                          M PREV_BANK = high (PORTA)
                          M       endif
                          M     endif
                          M     if (low (002h) == 0)
                          M         clrf    PORTA
                          M     else
                          M       if (low (002h) == 255)
                          M         setf    PORTA
                          M       else
00007C 0E02               M         movlw   low (002h)
00007E 6E80               M         movwf   PORTA
                          M       endif
                          M     endif
                      00090         MOVE?CB 0F3h, TRISA
MPASM  5.49                      BLINK1~1.ASM   12-15-2014  22:49:14         PAGE 16


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

                          M         CHK?RP  TRISA
                          M     if (((TRISA) & 8000h) != PREV_ALT)
                          M       if ((TRISA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (TRISA) & 8000h
                          M     endif
                          M     if ((((TRISA) & 0fffh) > BANKA_END) & (((TRISA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((TRISA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (TRISA)
                          M PREV_BANK = high (TRISA)
                          M       endif
                          M     endif
                          M     if (low (0F3h) == 0)
                          M         clrf    TRISA
                          M     else
                          M       if (low (0F3h) == 255)
                          M         setf    TRISA
                          M       else
000080 0EF3               M         movlw   low (0F3h)
000082 6E92               M         movwf   TRISA
                          M       endif
                          M     endif
                      00091         MOVE?CB 004h, PORTA
                          M         CHK?RP  PORTA
                          M     if (((PORTA) & 8000h) != PREV_ALT)
                          M       if ((PORTA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (PORTA) & 8000h
                          M     endif
                          M     if ((((PORTA) & 0fffh) > BANKA_END) & (((PORTA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((PORTA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (PORTA)
                          M PREV_BANK = high (PORTA)
                          M       endif
                          M     endif
                          M     if (low (004h) == 0)
                          M         clrf    PORTA
                          M     else
                          M       if (low (004h) == 255)
                          M         setf    PORTA
                          M       else
000084 0E04               M         movlw   low (004h)
000086 6E80               M         movwf   PORTA
                          M       endif
                          M     endif
                      00092         MOVE?CB 008h, PORTA
                          M         CHK?RP  PORTA
MPASM  5.49                      BLINK1~1.ASM   12-15-2014  22:49:14         PAGE 17


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

                          M     if (((PORTA) & 8000h) != PREV_ALT)
                          M       if ((PORTA) & 8000h)
                          M         bsf     WDTCON, ADSHR
                          M       else
                          M         bcf     WDTCON, ADSHR
                          M       endif
                          M PREV_ALT = (PORTA) & 8000h
                          M     endif
                          M     if ((((PORTA) & 0fffh) > BANKA_END) & (((PORTA) & 0fffh) < (0f01h + BANKA_END)))
                          M       if (((PORTA) & 0f00h) != (PREV_BANK << 8))
                          M         movlb   high (PORTA)
                          M PREV_BANK = high (PORTA)
                          M       endif
                          M     endif
                          M     if (low (008h) == 0)
                          M         clrf    PORTA
                          M     else
                          M       if (low (008h) == 255)
                          M         setf    PORTA
                          M       else
000088 0E08               M         movlw   low (008h)
00008A 6E80               M         movwf   PORTA
                          M       endif
                          M     endif
                      00093         GOTO?L  _mainloop
                          M         L?GOTO  _mainloop
...
A lot more going on before and after that snippet.

Robert