Fail compilation?

[martgg]

MikroPascal PRO for AVR version 6.1.2
ATmega128

Program consists of different subroutines.
Subroutines are called by symbols/

Next 'for' does not work!!!

Code: Select all

procedure Buf_string;
var
  i :byte;
begin
 FileName := '';
              UART2_Write_Text('Buf_string');             // tst
              UART2_Write(13);UART2_Write(10);        // tst
  for i:=8 to rxlen-2 do
      FileName := FileName + chr(RxBuf[i]);
      
                 FileName := '123456789';
                 UART2_Write_Text(FileName);             // tst
                 UART2_Write(13);UART2_Write(10);        // tst
end;
//;************** end Buf_string **************


Main
...

  // 'fg' -  file get date, time
            if ((CMDhi ='f')and(CMDlo ='g')) then    //
              begin
                 if rxlen >10 then   // 
                     Buf_string;    // 
              end;

It was so earlier, but in other places Program.
Did:
SPH := 0x0F; // Set stack pointer to top of RAM
SPL := 0xE0;
and worked.

Now it does not help:
SPH := 0x0F;
SPL := 0xE0;
is written or not.

[martgg]

There is a limit on the number of 'for'-operators?

[filip]

Hi,

Can you please clarify your issue ?

A small project that demonstrates this would be beneficial.

Regards,
Filip.

[martgg]

Small project - no problem.
Big - sometimes a problem.
The last time the procedure was added and 'for' stopped working. And 'for' in the working part of the program.
Solved the problem like this: added
SPH := 0x0F; // Set stack pointer to top of RAM
SPL := 0xE0;
If again a problem, I clean
SPH := 0x0F; // Set stack pointer to top of RAM
SPL := 0xE0;
and everything works.

Now it did not help: I tried various options for a long time.
How did - did not understand.

[filip]

Hi,

Yes, this is very strange.

If you can share the project that demonstrates this issue, it would be helpful.

Regards,
Filip.

[martgg]

Hi, Filip.

Now it did not help: I tried various options for a long time.
As again I made the program working - I do not remember.
Yes, here's an example: Line 1822: // for j:=1 to 6 do

Now the program is working.
Here the whole project: rr.rar

[martgg]

After compilation, the work program became a non-working program.
The stack does not help.
Here the whole project: bi.rar