rev 312 - in trunk: modules/File src
SVN User <[email protected]>
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: mark
Date: 2004-04-09 19:14:37 -0400 (Fri, 09 Apr 2004)
New Revision: 312
Modified:
trunk/modules/File/File.c
trunk/src/interp.c
Log:
fixed permission problem when importing,
added Object.get_read_access(), Object.get_write_access(),
and Object.set_read_access(), Object.set_write_access(),
added doc string to File proto object
Modified: trunk/modules/File/File.c
===================================================================
--- trunk/modules/File/File.c 2004-04-09 22:29:23 UTC (rev 311)
+++ trunk/modules/File/File.c 2004-04-09 23:14:37 UTC (rev 312)
@@ -121,6 +121,7 @@
MODULE_START(File)
{
File_OBJ = new_object(ist, NULL);
+ add_doc_to_obj(ist, File_OBJ, "File object prototype");
MODULE_ADD_TO_BASE(File);
}
Modified: trunk/src/interp.c
===================================================================
--- trunk/src/interp.c 2004-04-09 22:29:23 UTC (rev 311)
+++ trunk/src/interp.c 2004-04-09 23:14:37 UTC (rev 312)
@@ -314,6 +314,7 @@
//******************************** load_dll_module *****************************
int load_dll_module(isp ist, char* full_path, char* module_name, obj_p dest_module, obj_p alias){
+ int i;
obj_p module;
apr_dso_handle_t *handle;
apr_dso_handle_sym_t dll_entry;
@@ -343,9 +344,11 @@
((void(*)(pr_services_t*))dll_entry)(&dll_services);
- if ((module = get_attr(ist, OBJ(MODULES), sym(ist, module_name))) && dest_module)
+ if ((module = get_attr(ist, OBJ(MODULES), sym(ist, module_name))) && dest_module){
+ su(i);
set_attr(ist, dest_module, alias, module);
-
+ un_su(i);
+ }
return TRUE;
}