Author: pmichaud
Date: Tue Dec 9 14:54:38 2008
New Revision: 33731
Modified:
trunk/compilers/pct/src/PCT/HLLCompiler.pir
Log:
[pct]: Give hll compilers an interactive readline again. (allison++)
Modified: trunk/compilers/pct/src/PCT/HLLCompiler.pir
==============================================================================
--- trunk/compilers/pct/src/PCT/HLLCompiler.pir (original)
+++ trunk/compilers/pct/src/PCT/HLLCompiler.pir Tue Dec 9 14:54:38 2008
@@ -533,8 +533,6 @@
.local pmc stdin
.local int has_readline
stdin = getstdin
- has_readline = -1
- # has_readline = stdin.'set_readline_interactive'(1)
encoding = adverbs['encoding']
if encoding == 'fixed_8' goto interactive_loop
unless encoding goto interactive_loop
@@ -552,10 +550,8 @@
have_prompt:
## display a prompt ourselves if readline isn't present
- if has_readline != -1 goto interactive_read
- printerr prompt
interactive_read:
- code = stdin.'readline'()
+ code = stdin.'readline_interactive'(prompt)
if null code goto interactive_end
unless code goto interactive_loop
concat code, "\n"
