TickTimer

Lieber Rolf,

kannst Du bitte nach folgendem Problem schauen:

program ticktest;

{$NOSHADOW}
{ $WG} {global Warnings off}

Device = mega644p, VCC=5;
{ $BOOTRST $07000} {Reset Jump to $07000}


Import SysTick, TickTimer;

From System Import LongWord;


Define
ProcClock = 16000000; {Hertz}
SysTick = 10; {msec}
StackSize = $0064, iData;
FrameSize = $0064, iData;
TickTimer = Timer1;

Implementation

{$IDATA}

Interrupt TIMER1COMPA; // TickTimer
begin
end;

{$IDATA}

begin


EnableInts;
loop


endloop;
end ticktest.

Dieses Programm erzeugt neuerdings (4.99.11 Profi) einen internal Asembler Error.
Es lässt sich auch nicht ohne die TIMER1COMPA compilieren. (Var exceeded ?)

Gruß und Dank
Matthias

Hi,

@Mathias und @rh
mit der 4.99.11 von heute Vormittag funktioniert es wieder!

Gruß
Gunter