git.gag.com Git - fw/sdcc/blob - src/regression/inline.c

   1 unsigned char success=0;
   2 unsigned char failures=0;
   3 unsigned char dummy=0;
   4
   5 unsigned char test_tris=0;
   6
   7 #define PORTA_ADR  5
   8 #define PORTB_ADR  6
   9 #define TRISA_ADR  0x85
  10 #define TRISB_ADR  0x86
  11
  12 data at TRISA_ADR unsigned char  TRISA;
  13
  14 void done(void)
  15 {
  16
  17   dummy++;
  18
  19 }
  20 void main(void)
  21 {
  22   dummy = 0;
  23
  24   TRISA = 0x0f;
  25
  26   _asm
  27     BSF   STATUS,RP0
  28     MOVF  TRISA,W
  29     BCF   STATUS,RP0
  30     MOVWF _test_tris
  31   _endasm;
  32
  33   if(test_tris != 0x0f)
  34     failures++;
  35
  36   success = failures;
  37   done();
  38 }