[net.micro.cpm] Bug fix for Kermit-80 ver 3.5

w8sdz%brl@sri-unix.UUCP (11/27/83)

From:      Keith Petersen <w8sdz@brl>

There is a bug in the CONNECT (dumb terminal) function of CPMBASE.ASM.
It causes continuous NULLs to be sent out to the modem when there
are no characters ready from the console keyboard.  This bug occurs
in all versions except ROBIN or RAINBO or GENER or DMII.  Two lines
of code were mis-placed.  Below is a listing of the corrected area.

CONCHR:
IF NOT (ROBIN OR RAINBO OR GENER OR DMII)
        MVI     C,DCONIO        ; Direct console I/O BDOS call.
        MVI     E,0FFH          ; Input.
        CALL    BDOS
ENDIF                           ; NOT (robin OR rainbo OR gener OR dmII)
IF ROBIN OR RAINBO OR GENER OR DMII
        CALL    BCONST          ; Get the status
        CALL    BCONIN          ; Yes, get the character
ENDIF                           ; robin OR rainbo OR gener OR dmII
        ORA     A               ; Anything there?  <-----corrected
        JZ      RSKP            ; No, forget it    <-----corrected
        ANI     7FH             ; Keep only 7 bits
........
End of corrected area