rev 629 - in trunk: . src

SVN User <[email protected]> Wed, 16 Jun 2004 03:28:47 -0400
Newsgroups gmane.comp.lang.prothon.cvs
Message-ID <[email protected]>
Author: mark
Date: 2004-06-16 03:28:44 -0400 (Wed, 16 Jun 2004)
New Revision: 629

Modified:
   trunk/STATUS.txt
   trunk/src/builtins-file.c
Log:
removed TempDir, added TempFile, started on TextFile

Modified: trunk/STATUS.txt
===================================================================
--- trunk/STATUS.txt	2004-06-16 05:19:21 UTC (rev 628)
+++ trunk/STATUS.txt	2004-06-16 07:28:44 UTC (rev 629)
@@ -2,7 +2,6 @@
 ----------------------- TO-DO (highest priority first) ------------------------
 
 --- Complete File/Dir objects
-		set times, get times, perms, attrs
 		use 'b' in all files
 		http://www.prothon.org/pipermail/prothon-user/2004-April/000955.html
 --- TempDir() should create new dir.  del_ should delete it.
@@ -18,8 +17,7 @@
 	
 --- implement 1xc3fe ?
 
---- check immutable bit for default param values or make new default object each use (using copy()??)
---- remove all clr_immutable calls
+--- evaluate default expressions on every function call
 
 --- add vars_ flag to str.fmt() or implement taint bit and unTaint() method
 

Modified: trunk/src/builtins-file.c
===================================================================
--- trunk/src/builtins-file.c	2004-06-16 05:19:21 UTC (rev 628)
+++ trunk/src/builtins-file.c	2004-06-16 07:28:44 UTC (rev 629)
@@ -1196,10 +1196,6 @@
 	return NEW_STRING(buf);
 }
 
-DEF(TempFile, move, FPARM1(dir, NULL)) {
-	raise_exception(ist, OBJ(IO_EXC), "attempt to move a temporary file");
-	return NULL;
-}
 //*************************** MODULE TextFile *************************************
 
 MODULE_START(TextFile)
@@ -1233,6 +1229,8 @@
 
 	read_unlock(ist, self);
 
+	set_attr(ist, self, sym(ist, "encoding"), NEW_STRING(encoding));
+
 	if (strlen(mode) == 0) {
 		read_unlock(ist, self);
 		SET_TYPE_IF_EXC(TextFile_OBJ, self, DATA_TYPE_DATAPTR) return NULL;
@@ -1671,7 +1669,6 @@
 	MODULE_SUB_INIT(TempFile);
 	MODULE_ADD_SYM(TempFile, init_);
 	MODULE_ADD_SYM(TempFile, str_);
-	MODULE_ADD_SYM(TempFile, move);
 
 	MODULE_SUB_INIT(TextFile);
 	MODULE_ADD_SYM(TextFile, init_);