Mercurial > mxe-octave
annotate src/readline-1-paste.patch @ 4200:5cee475eceb0
temporary fixes for of-odepkg package
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Wed, 31 Aug 2016 15:02:02 -0400 |
parents | 9e62095edc58 |
children |
rev | line source |
---|---|
2998
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
1 diff -u a/input.c b/readline-6.2/input.c |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
2 --- a/input.c 2010-05-30 18:33:01.000000000 -0400 |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
3 +++ b/input.c 2012-06-25 21:08:42.000000000 -0400 |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
4 @@ -410,5 +412,5 @@ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
5 rl_read_key () |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
6 { |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
7 - int c; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
8 + int c, r; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
9 |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
10 rl_key_sequence_length++; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
11 @@ -430,12 +432,16 @@ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
12 while (rl_event_hook) |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
13 { |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
14 - if (rl_gather_tyi () < 0) /* XXX - EIO */ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
15 + if (rl_get_char (&c) != 0) |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
16 + break; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
17 + |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
18 + if ((r = rl_gather_tyi ()) < 0) /* XXX - EIO */ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
19 { |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
20 rl_done = 1; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
21 return ('\n'); |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
22 } |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
23 + else if (r == 1) /* read something */ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
24 + continue; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
25 + |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
26 RL_CHECK_SIGNALS (); |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
27 - if (rl_get_char (&c) != 0) |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
28 - break; |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
29 if (rl_done) /* XXX - experimental */ |
9e62095edc58
patch for readline slow pasting problem
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
30 return ('\n'); |