anchor.diff:    st Z, R25
   end;
   
  -procedure fpc_div_mod_dword(Dividend, Divisor: dword; var Result, Remainder: dword); assembler; nostackframe;
  +{$ifndef CPUAVR_16_REGS}
  +procedure div_mod_dword(Dividend, Divisor: dword; out Result, Remainder: dword); assembler; nostackframe;
   label
     start, div1, div2, div3, finish;
   asm
  
positive.code: 
  div3:
    dec R26
    brne div1
  
  finish:
    // Copy remainder via pointer stored in pushed address
  
negative.code:   pop R16
    pop R17
  end;
  {$endif CPUAVR_16_REGS}
  
  end.
  
  