Made some tests work on 32 bit again

client-tests.fs

@@ -114,8 +114,8 @@ previous
     [: .time ." Download test: 1 text file and 2 photos" cr ;] $err
     net2o-code
       expect-reply
-      !time .time s" Download test " $, type 1 lit, . pi float, f. cr
-      ( see-me ) get-ip 0 lit,
+      !time .time s" Download test " $, type 1 ulit, . pi float, f. cr
+      ( see-me ) get-ip 0 ulit,
       $400 blocksize! $400 blockalign! stat( request-stats )
       "net2o.fs" "net2o.fs" >cache n2o:copy
       "data/2011-05-13_11-26-57-small.jpg" "photo000s.jpg" >cache n2o:copy

net2o-cmd.fs

@@ -603,7 +603,7 @@ net2o-base
     THEN ;
 
 : cookie, ( -- )  add-cookie lit, set-rtdelay ;
-: request, ( -- )  next-request lit, request-done ;
+: request, ( -- )  next-request ulit, request-done ;
 
 : gen-punch ( -- )
     my-ip$ [: $, punch ;] $[]map ;

net2o.fs

@@ -1609,7 +1609,7 @@ Variable fs-table
 Sema file-sema
 
 \ careful: must follow exactpy the same loic as slurp (see below)
-: n2o:spit ( -- )
+: n2o:spit ( -- ) fstates 0= ?EXIT
     [: +calc fstates 0 { states fails }
 	BEGIN  rdata-back?  WHILE
 		write-file# @ n2o:save-block
@@ -1667,7 +1667,7 @@ User file-reg#
 
 \ careful: must follow exactpy the same loic as n2o:spit (see above)
 : n2o:slurp ( -- head end-flag )
-    data-head? 0= IF  head@ 0  EXIT  THEN
+    data-head? 0= fstates 0= or IF  head@ 0  EXIT  THEN
     [: +calc fstates 0 { states fails }
 	0 BEGIN  data-head?  WHILE
 		read-file# @ n2o:slurp-block
@@ -1688,7 +1688,7 @@ User file-reg#
     LOOP  drop ;
 
 : n2o:track-all-seeks ( xt -- ) { xt } ( i seeklen -- )
-    fstates 0 DO
+    fstates 0 ?DO
 	I dup id>addr? >o fs-seek 64@ fs-seekto 64@ 64<> IF
 	    fs-seekto 64@ 64dup fs-seek 64! o>
 	    xt execute  ELSE  drop o>  THEN