waitpipe und RxBuffer1 -> Compilererror

robert
Benutzer
Avatar
Gender: n/a
Location: Hildesheim / Deutschland
Posts: 249
Registered: 04 / 2006
Subject:

waitpipe und RxBuffer1 -> Compilererror

 · 
Posted: 08.12.2010 - 09:30  ·  #1
Hallo,
das Programm lässt sich nicht kompilieren. Mit RxBuffer ohne 1 geht es.

Robert

Code
program bla;

Device = mega128, VCC=5;

Import
  SysTick,
  SerPort;

From System import
  Pipes,
  Processes,
  longword;

from SysTick import
SystemTime32;

Define
  ProcClock      = 16000000;       {Hertz}
  SysTick        = 10;             {msec}
  StackSize      = 250, iData;
  FrameSize      = 300, iData;
  Scheduler      = 128, 128, iData;
  {----------------------------------------------------------------------------}
  SerPort        = 57600, Stop2;    {Baud, StopBits|Parity}
  RxBuffer       = 8, iData;
  TxBuffer       = 8, iData;

uses ;

Implementation

{$IDATA}

const

type

var

begin
  ENABLEINTS;
  WriteLn(SerOut, 'Los');
  PipeFlush(RxBuffer);  //OK
  PipeFlush(RxBuffer1); //OK
  WaitPipe(RxBuffer);   //OK
  WaitPipe(RxBuffer1);  //Error: var expected
  loop
  endloop;
end bla.


Nachtrag:
Wenn SerPort1 importiert wird, lässt sich WaitPipe(RxBuffer) zwar kompilieren, es kommt jedoch offensichtlich nie was an. Wird SerPort importiert, dann geht es.
rh
Administrator
Avatar
Gender:
Location: Germany
Age: 24
Homepage: e-lab.de
Posts: 5558
Registered: 03 / 2002
Subject:

Re: waitpipe und RxBuffer1 -> Compilererror

 · 
Posted: 08.12.2010 - 14:40  ·  #2
Hallo Robert,

Sie haben recht, RxBuffer = RxBuffer1 und TxBuffer = TxBuffer1. Daher sollte WaitPipe mit beiden Namen tun.
Bug fixed. Update am WE.

rolf
Selected quotes for multi-quoting:   0

Registered users in this topic

Currently no registered users in this section

The statistic shows who was online during the last 5 minutes. Updated every 90 seconds.
MySQL Queries: 15 · Cache Hits: 14   51   65 · Page-Gen-Time: 0.020916s · Memory Usage: 2 MB · GZIP: on · Viewport: SMXL-HiDPI