From a3c2899880e5d15d6c56518f55d7afb21bb6f5ce Mon Sep 17 00:00:00 2001 From: jonnosan Date: Sat, 4 Jul 2009 10:48:13 +0000 Subject: [PATCH] git-svn-id: http://svn.code.sf.net/p/netboot65/code@147 93682198-c243-4bdb-bd91-e943c89aac3b --- client/ip65/tcp.s | 2 +- client/test/test_tcp.s | 14 +++++++++----- 2 files changed, 10 insertions(+), 6 deletions(-) diff --git a/client/ip65/tcp.s b/client/ip65/tcp.s index 9a02cdf..58c18d5 100644 --- a/client/ip65/tcp.s +++ b/client/ip65/tcp.s @@ -677,7 +677,7 @@ tcp_process: bne @fin jmp @not_fin @fin: - + .byte $92 ;is this the current connection? jsr check_current_connection bcc :+ diff --git a/client/test/test_tcp.s b/client/test/test_tcp.s index 487396a..9579b0e 100644 --- a/client/test/test_tcp.s +++ b/client/test/test_tcp.s @@ -240,12 +240,13 @@ init: stax tcp_connect_ip+2 - lda #0 - sta cxn_closed ldax #80 jsr tcp_connect jsr check_for_error - + + lda #0 + sta cxn_closed + ldax #http_get_length stax tcp_send_data_len ldax #http_get_msg @@ -254,10 +255,12 @@ init: @loop_till_end: jsr ip65_process - lda cxn_closed - cmp #1 + lda #1 + cmp cxn_closed + beq @loop_till_end + rts ldax #tcp_callback_routine @@ -295,6 +298,7 @@ init: tcp_callback_routine: + lda tcp_inbound_data_length cmp #$ff bne @not_end_of_file