Not logged in

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