Differences From Artifact [753d69c1eb8b6f20]:

File hangman/files.retro part of check-in [e96ace507c] - Update 'hangman' to work with latest changes by charleschilders on 2010-09-12 16:19:23. [annotate] [view]

To Artifact [f6d2b7cfcfa53f79]:

File hangman/files.retro part of check-in [54e5f1b915] - update to 11.0-2010.10.24 image by crc on 2010-10-25 18:29:01. [annotate] [view]

@@ -7,5 +7,5 @@
 
 : fread! ( ha-f ) swap read dup rot ! ;
 : >file ( $h- )
   push repeat @+ dup 0 =if rdrop 2drop ;then
-  r write 0 =if rdrop 2drop ;then again ;
+  tors write 0 =if rdrop 2drop ;then again ;