From ef1df46925a7cb3978c43528c6aa35f36ea9b8bf Mon Sep 17 00:00:00 2001
From: Marcus Comstedt <marcus@mc.pp.se>
Date: Sat, 13 Mar 1999 03:17:20 +0100
Subject: [PATCH] Replaced readline with Stdio.Readline.readline
Rev: lib/modules/Languages.pmod/PLIS.pmod:1.6
Rev: lib/modules/Stdio.pmod/module.pmod:1.39
Rev: lib/modules/Tools.pmod/Hilfe.pmod:1.4
---
lib/modules/Languages.pmod/PLIS.pmod | 2 +-
lib/modules/Stdio.pmod/module.pmod | 4 ++--
lib/modules/Tools.pmod/Hilfe.pmod | 2 +-
3 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/lib/modules/Languages.pmod/PLIS.pmod b/lib/modules/Languages.pmod/PLIS.pmod
index 013a4b9a46..d234791757 100644
--- a/lib/modules/Languages.pmod/PLIS.pmod
+++ b/lib/modules/Languages.pmod/PLIS.pmod
@@ -837,7 +837,7 @@ object f_readline(object arglist, object env, object globals)
{
if (!arglist->car->is_string)
return 0;
- string s = readline(arglist->car->to_string());
+ string s = Stdio.Readline.readline(arglist->car->to_string());
return s ? String(s) : Lfalse;
}
diff --git a/lib/modules/Stdio.pmod/module.pmod b/lib/modules/Stdio.pmod/module.pmod
index bfaf9f5135..9657fbe1bb 100644
--- a/lib/modules/Stdio.pmod/module.pmod
+++ b/lib/modules/Stdio.pmod/module.pmod
@@ -1,4 +1,4 @@
-// $Id: module.pmod,v 1.38 1999/03/12 01:11:57 hubbe Exp $
+// $Id: module.pmod,v 1.39 1999/03/13 02:13:52 marcus Exp $
import String;
@@ -621,7 +621,7 @@ mixed `[](string index)
if(x) return x;
switch(index)
{
- case "readline": return master()->resolv("readline");
+ case "readline": return master()->resolv("Stdio")["Readline"]->readline;
default: return ([])[0];
}
}
diff --git a/lib/modules/Tools.pmod/Hilfe.pmod b/lib/modules/Tools.pmod/Hilfe.pmod
index 5a80de48dd..4f258cac79 100644
--- a/lib/modules/Tools.pmod/Hilfe.pmod
+++ b/lib/modules/Tools.pmod/Hilfe.pmod
@@ -546,7 +546,7 @@ class StdinHilfe
write=predef::write;
::create();
- while(string s=readline(strlen(input) ? ">> " : "> "))
+ while(string s=Stdio.Readline.readline(strlen(input) ? ">> " : "> "))
{
signal(signum("SIGINT"),signal_trap);
add_input_line(s+"\n");
--
GitLab