Differences From Artifact [4c76942b59e7f993]:
File editor.rx part of check-in [634ee8a601] - editor: switch from ijkl to hjkl (vim style) key movement by crc on 2011-11-24 20:54:48. [annotate] [view]
To Artifact [ec6f056c2438ce46]:
File editor.rx part of check-in [545ff85ff0] - editor: use whend combinator instead of "dup nn = [ drop .., ] drop .., ifTrue" by crc on 2011-11-25 17:06:02. [annotate] [view]
@@ -73,11 +73,11 @@
[ drop !column display 0 ]
[ 32 over @line get ! 1+ -1 ] if
] while ;
: remap ( c-c )
- dup 9 = [ drop 27 ] ifTrue
- dup 13 = [ drop 0 ] ifTrue
- dup 10 = [ drop 0 advance? display ] ifTrue ;
+ [ 9 = ] [ 27 ] whend
+ [ 13 = ] [ 0 ] whend
+ [ 10 = ] [ 0 advance? display ] whend ;
: input ( - )
repeat
display
@mode 0; drop