From 070eeb0f8ae656e2bf57f985f3586d9f073f5e4a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 7 Apr 1999 16:04:08 -0700
Subject: [PATCH] new: append_file
Rev: lib/modules/Stdio.pmod/module.pmod:1.43
---
lib/modules/Stdio.pmod/module.pmod | 15 ++++++++++++++-
1 file changed, 14 insertions(+), 1 deletion(-)
diff --git a/lib/modules/Stdio.pmod/module.pmod b/lib/modules/Stdio.pmod/module.pmod
index 3f62bbdda6..ede4fa2e86 100644
--- a/lib/modules/Stdio.pmod/module.pmod
+++ b/lib/modules/Stdio.pmod/module.pmod
@@ -1,4 +1,4 @@
-// $Id: module.pmod,v 1.42 1999/04/01 18:32:37 grubba Exp $
+// $Id: module.pmod,v 1.43 1999/04/07 23:04:08 hubbe Exp $
import String;
@@ -601,6 +601,19 @@ int write_file(string filename,string what)
return ret;
}
+int append_file(string filename,string what)
+{
+ int ret;
+ object(File) f = File();
+
+ if(!f->open(filename,"awc"))
+ error("Couldn't open file "+filename+".\n");
+
+ ret=f->write(what);
+ f->close();
+ return ret;
+}
+
int file_size(string s)
{
int *stat;
--
GitLab