waitpipe und RxBuffer1 -> Compilererror

robert
Benutzer
Avatar
Geschlecht: keine Angabe
Herkunft: Hildesheim / Deutschland
Beiträge: 249
Dabei seit: 04 / 2006
Betreff:

waitpipe und RxBuffer1 -> Compilererror

 · 
Gepostet: 08.12.2010 - 09:30 Uhr  ·  #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
Geschlecht:
Herkunft: Germany
Alter: 25
Homepage: e-lab.de
Beiträge: 5558
Dabei seit: 03 / 2002
Betreff:

Re: waitpipe und RxBuffer1 -> Compilererror

 · 
Gepostet: 08.12.2010 - 14:40 Uhr  ·  #2
Hallo Robert,

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

rolf
Gewählte Zitate für Mehrfachzitierung:   0

Registrierte in diesem Topic

Aktuell kein registrierter in diesem Bereich

Die Statistik zeigt, wer in den letzten 5 Minuten online war. Erneuerung alle 90 Sekunden.
MySQL Queries: 15 · Cache Hits: 14   51   65 · Page-Gen-Time: 0.017614s · Speichernutzung: 2 MB · GZIP: ein · Viewport: SMXL-HiDPI