Mercurial > octave-nkf
comparison liboctave/cmd-edit.cc @ 5247:3d5b7114da82
[project @ 2005-03-26 17:56:02 by jwe]
author | jwe |
---|---|
date | Sat, 26 Mar 2005 17:56:02 +0000 |
parents | bf7272f8ba8c |
children | 4c8a2e4e0717 |
comparison
equal
deleted
inserted
replaced
5246:8a4cae8ee7b7 | 5247:3d5b7114da82 |
---|---|
34 #include <sys/types.h> | 34 #include <sys/types.h> |
35 #endif | 35 #endif |
36 #include <unistd.h> | 36 #include <unistd.h> |
37 #endif | 37 #endif |
38 | 38 |
39 #include "quit.h" | |
40 | |
39 #include "cmd-edit.h" | 41 #include "cmd-edit.h" |
40 #include "cmd-hist.h" | 42 #include "cmd-hist.h" |
41 #include "lo-error.h" | 43 #include "lo-error.h" |
42 #include "lo-utils.h" | 44 #include "lo-utils.h" |
43 #include "oct-env.h" | 45 #include "oct-env.h" |
190 { | 192 { |
191 std::string retval; | 193 std::string retval; |
192 | 194 |
193 eof = false; | 195 eof = false; |
194 | 196 |
195 char *line = ::octave_rl_readline (prompt.c_str ()); | 197 char *line = 0; |
198 | |
199 BEGIN_INTERRUPT_IMMEDIATELY_IN_FOREIGN_CODE; | |
200 | |
201 line = ::octave_rl_readline (prompt.c_str ()); | |
202 | |
203 END_INTERRUPT_IMMEDIATELY_IN_FOREIGN_CODE; | |
196 | 204 |
197 if (line) | 205 if (line) |
198 { | 206 { |
199 retval = line; | 207 retval = line; |
200 | 208 |