COMSTAT
:Object COMSTAT <Super Object
Record: AddrOf
int lpComStatBits \ a 32bit cell of bit fields
1 bits fCtsHold \ define the bit fields Low to High
1 bits fDsrHold
1 bits fRlsdHold
1 bits fXoffHold
1 bits fXoffSent
1 bits fEof
1 bits fTxim
25 bits fReserved
int cbInQue
int cbOutQue
;RecordSize: SIZEOFCOMSTAT
:M Reset: ( -- )
AddrOf SIZEOFCOMSTAT erase
;M
:M ClassInit: ( -- )
ClassInit: super
Reset: self \ create structure as Reset
;M
;Object