Mercurial > mxe-octave

comparison src/readline-1-binding.patch @ 3122:c2864508b524

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[MSVC] enable readline compilation
author Michael Goffioul <michael.goffioul@gmail.com>
date Fri, 05 Jul 2013 22:25:41 -0400
parents 2cf09b449d88
children 4ce61d3172f0
comparison
equal deleted inserted replaced
3121:21f598a028ec 3122:c2864508b524
1 diff -uNr a/readline.c b/readline.c 1 diff -uNr a/readline.c b/readline.c
2 --- a/readline.c 2010-07-25 17:07:40.000000000 -0400 2 --- a/readline.c 2010-07-25 17:07:40.000000000 -0400
3 +++ b/readline.c 2013-04-17 20:38:42.637674309 -0400 3 +++ b/readline.c 2013-04-17 20:38:42.637674309 -0400
4 @@ -1154,11 +1159,19 @@ 4 @@ -1154,11 +1159,14 @@
5 rl_bind_keyseq_if_unbound ("\033OH", rl_beg_of_line); 5 rl_bind_keyseq_if_unbound ("\033OH", rl_beg_of_line);
6 rl_bind_keyseq_if_unbound ("\033OF", rl_end_of_line); 6 rl_bind_keyseq_if_unbound ("\033OF", rl_end_of_line);
7 7
8 -#if defined (__MINGW32__) 8 -#if defined (__MINGW32__)
9 +#if defined (__MINGW32__) && ! defined (_MSC_VER) 9 +#if defined (__MINGW32__) && ! defined (_MSC_VER)
12 rl_bind_keyseq_if_unbound ("\340M", rl_forward_char); 12 rl_bind_keyseq_if_unbound ("\340M", rl_forward_char);
13 rl_bind_keyseq_if_unbound ("\340K", rl_backward_char); 13 rl_bind_keyseq_if_unbound ("\340K", rl_backward_char);
14 + rl_bind_keyseq_if_unbound ("\340G", rl_beg_of_line); 14 + rl_bind_keyseq_if_unbound ("\340G", rl_beg_of_line);
15 + rl_bind_keyseq_if_unbound ("\340O", rl_end_of_line); 15 + rl_bind_keyseq_if_unbound ("\340O", rl_end_of_line);
16 + rl_bind_keyseq_if_unbound ("\340S", rl_delete); 16 + rl_bind_keyseq_if_unbound ("\340S", rl_delete);
17 +#endif
18 +
19 +#ifdef _MSC_VER
20 + rl_bind_keyseq_if_unbound ("\033[3~", rl_delete);
21 + rl_bind_keyseq_if_unbound ("\033[X", _rl_update_terminal_size);
22 #endif 17 #endif
23 18
24 _rl_keymap = xkeymap; 19 _rl_keymap = xkeymap;