From 43d9fc91ec72c3326eaad22d46ff5cbf699fef4d Mon Sep 17 00:00:00 2001
From: Per Hedbor <ph@opera.com>
Date: Sat, 9 Nov 1996 16:15:24 +0100
Subject: [PATCH] lpc --> pike 6
Rev: lib/include/process.pre.pike:1.3
Rev: lib/include/stdio.pre.pike:1.4
---
lib/include/process.pre.pike | 9 ++++-----
lib/include/stdio.pre.pike | 12 ++++++------
2 files changed, 10 insertions(+), 11 deletions(-)
diff --git a/lib/include/process.pre.pike b/lib/include/process.pre.pike
index 1f680593e2..321926736c 100644
--- a/lib/include/process.pre.pike
+++ b/lib/include/process.pre.pike
@@ -16,7 +16,7 @@ varargs int exec(string file,string ... foo)
return 69;
}
-varargs int spawn(string s,object stdin,object stdout,object stderr)
+void int spawn(string s,object stdin,object stdout,object stderr)
{
object p;
int pid;
@@ -31,15 +31,14 @@ varargs int spawn(string s,object stdin,object stdout,object stderr)
{
return pid;
}else{
- program f=(program)"/precompiled/file";
if(stdin)
- stdin->dup2(clone(f,"stdin"));
+ stdin->dup2(File("stdin"));
if(stdout)
- stdout->dup2(clone(f,"stdout"));
+ stdout->dup2(File("stdout"));
if(stderr)
- stderr->dup2(clone(f,"stderr"));
+ stderr->dup2(File,"stderr");
exec("/bin/sh","-c",s);
exit(69);
diff --git a/lib/include/stdio.pre.pike b/lib/include/stdio.pre.pike
index 21e7bef072..64fcc00921 100644
--- a/lib/include/stdio.pre.pike
+++ b/lib/include/stdio.pre.pike
@@ -1,5 +1,5 @@
#include <string.h>
-object stderr=clone((program)"/precompiled/file","stderr");
+object stderr=File("stderr");
#define error(X) throw( ({ (X), backtrace()[0..sizeof(backtrace())-2] }) )
program FILE = class {
@@ -82,7 +82,7 @@ program FILE = class {
object dup()
{
object o;
- o=clone(object_program(this_object()));
+ o=object_program(this_object())();
o->assign(file::dup());
return o;
}
@@ -131,7 +131,7 @@ string read_file(string filename,void|int start,void|int len)
{
object buf,f;
string ret,tmp;
- f=clone(FILE);
+ f=FILE();
if(!f->open(filename,"r")) return 0;
switch(query_num_arg())
@@ -144,7 +144,7 @@ string read_file(string filename,void|int start,void|int len)
len=0x7fffffff;
case 3:
while(start-- && f->gets());
- buf=clone(String_buffer);
+ buf=String_buffer();
while(len-- && (tmp=f->gets()))
{
buf->append(tmp);
@@ -216,7 +216,7 @@ void create()
master()->add_precompiled_program("/precompiled/FILE", FILE);
- add_constant("stdin",clone((program)"/precompiled/FILE","stdin"));
- add_constant("stdout",clone(File,"stdout"));
+ add_constant("stdin",FILE("stdin"));
+ add_constant("stdout",File("stdout"));
add_constant("stderr",stderr);
}
--
GitLab