X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/e0701bfb3e9047a565191d1e582f7f5d97a79f5f..e0d21c12cf924ad826eb0e73a10c5167f0195f65:/fth/t_file.fth diff --git a/fth/t_file.fth b/fth/t_file.fth index e6ba0bd..388008c 100644 --- a/fth/t_file.fth +++ b/fth/t_file.fth @@ -214,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)