RPCDUMP:few cosmetic bugs fixed

This commit is contained in:
Rémy GIBERT 2016-03-27 23:01:34 +02:00
parent 996c301e92
commit 0b0fb35f2f

View File

@ -110,12 +110,9 @@ CS.RUN jsr Init.Timeout
.2 >PUSHW L.Socket
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.NEW
bcc .21
jsr Wait.Timeout
bcc .2
bra .99
bcs .99
.21 txa
txa
ldy #hSocket
sta (pData),y
@ -282,7 +279,7 @@ DumpRPCFrame lda #S.UDP+24
CS.END
LIBSTR >PSTRING "libstr.o"
LIBTCPIP >PSTRING "libtcpip.o"
MSG.USAGE >PSTRING "Usage : RPCINFO <ip|host>\n"
MSG.USAGE >PSTRING "Usage : RPCDUMP <ip|host>\n"
MSG.UNKNOWN >PSTRING "%S: Unknown host\n"
MSG.TIMEOUT >PSTRING "No response from %S\n"
MSG.DUMP0 >PSTRING "Program Ver Proto:Port\n"