Not logged in

Differences From Artifact [77df81d8c18ee4c2]:

File editor.rx part of check-in [26f4d13a0e] - editor: now use 'i' to enter edit mode, 'esc' to return to command mode; fix embedded docs by crc on 2011-11-25 17:51:29. [annotate] [view]

To Artifact [b13a52e619637c58]:

File editor.rx part of check-in [47458cc28d] - use variables| in editor by crc on 2011-12-06 14:04:40. [annotate] [view]


@@ -24,16 +24,15 @@
 
 chain: editor'
 
 {{
-  2 elements buffer count
+  variables| buffer count #blocks offset blk line column mode active |
   : restore ( -   ) &getc :devector ok ;
   : get     ( -c  ) @buffer @ ;
   : next    ( -c  ) @count [ count -- get buffer ++ ] [ 32 restore ] if ;
   : replace ( -   ) &next &getc :is ;
   : eval    ( an- ) !count !buffer replace ;
 
-  7 elements #blocks offset blk line column mode active
   : toBlock   1600 * @offset + ;
   : thisBlock @blk toBlock ;
   : toLine    80 * thisBlock + ;