diff options
Diffstat (limited to 'engines/glk/advsys/glk_interface.cpp')
| -rw-r--r-- | engines/glk/advsys/glk_interface.cpp | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/engines/glk/advsys/glk_interface.cpp b/engines/glk/advsys/glk_interface.cpp index 6ec5a08547..3e1ccb6a3b 100644 --- a/engines/glk/advsys/glk_interface.cpp +++ b/engines/glk/advsys/glk_interface.cpp @@ -40,8 +40,21 @@ void GlkInterface::print(int number) { } Common::String GlkInterface::readLine() { - // TODO: Stub - return ""; + event_t ev; + char line[200]; + + glk_request_line_event(_window, line, 199, 0); + + do { + glk_select(&ev); + if (ev.type == evtype_Quit) + return ""; + else if (ev.type == evtype_LineInput) + break; + } while (!shouldQuit() && ev.type != evtype_Quit); + + line[199] = '\0'; + return Common::String(line); } } // End of namespace AdvSys |