X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/6f3de3962bb26f4e1be714dfefc78de0fc16b376..e0d21c12cf924ad826eb0e73a10c5167f0195f65:/fth/t_file.fth

diff --git a/fth/t_file.fth b/fth/t_file.fth
index f024926..388008c 100644
--- a/fth/t_file.fth
+++ b/fth/t_file.fth
@@ -74,7 +74,6 @@ true value verbose
 : $" state IF postpone s" else ['] s" execute THEN ; immediate
 
 \ FIXME: stubs for missing definitions
-: resize-file drop 2drop -1 ;
 : file-status 2drop 0 -1 ;
 
 TESTING File Access word set
@@ -215,12 +214,12 @@ T{ FN2 R/W BIN OPEN-FILE SWAP DROP 0= -> FALSE }T
 T{ FN2 DELETE-FILE 0= -> FALSE }T
 
 \ ----------------------------------------------------------------------------
-\ TESTING multi-line ( comments
-\ 
-\ T{ ( 1 2 3
-\ 4 5 6
-\ 7 8 9 ) 11 22 33 -> 11 22 33 }T
-\ 
+TESTING multi-line ( comments
+
+T{ ( 1 2 3
+4 5 6
+7 8 9 ) 11 22 33 -> 11 22 33 }T
+
 \ ----------------------------------------------------------------------------
 TESTING SOURCE-ID (can only test it does not return 0 or -1)