[Oberon] Batch processing of Oberon commands

Tomas Kral thomas.kral at email.cz
Sat Jun 13 07:30:04 CEST 2020


> Yes, thanks for the pointer. I must confess that I did
> something very similar a few months ago. I noticed some
> hangups during file transfer

I introduced a delay of 100ms here in the ORC.SR loop.
It compensates for RPI end running faster to FPGA end.

    WHILE (S.class # Texts.Char) & (S.c # "~") DO
      IF S.class = Texts.Int THEN Texts.WriteInt(W, S.i, 6); SendInt(S.i)
      ... 
      END ;
      Texts.Scan(S); Wait(100) (*RPI host delay*)
    END ;

-- 
Tomas Kral <thomas.kral at email.cz>


More information about the Oberon mailing list