rev 689 - in trunk: pr src
SVN User <[email protected]> Thu, 01 Jul 2004 15:27:16 -0400
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: mark
Date: 2004-07-01 15:27:13 -0400 (Thu, 01 Jul 2004)
New Revision: 689
Modified:
trunk/pr/
trunk/src/memory_mgr.c
trunk/src/src.vcproj
Log:
removed test.pr
Property changes on: trunk/pr
___________________________________________________________________
Name: svn:ignore
+ test.pr
Modified: trunk/src/memory_mgr.c
===================================================================
--- trunk/src/memory_mgr.c 2004-07-01 19:08:36 UTC (rev 688)
+++ trunk/src/memory_mgr.c 2004-07-01 19:27:13 UTC (rev 689)
@@ -245,12 +245,9 @@
(unsigned long)(uintptr_t)obj);
printf("Dumping object details to mm-obj-dump.txt\n");
printf("Aborting Prothon\n");
- dump(ist, "mm-obj-dump.txt", obj);
- dump(ist, "mm-ist-dump.txt", ist->exception_obj);
+ dump(ist, "!mm-obj-dump.txt", obj);
+ check_exceptions(ist);
pr_exit(1);
- printf(" exception: %s\n",
- pr2c_strptr(ist, get_attr(ist, ist->exception_obj, SYM(DOC_))));
- ist->exception_obj = 0;
} else if (obj_list) {
int i, llen = (int) list_len(ist, obj_list);
for(i=0; i < llen; i++) {
Modified: trunk/src/src.vcproj
===================================================================
--- trunk/src/src.vcproj 2004-07-01 19:08:36 UTC (rev 688)
+++ trunk/src/src.vcproj 2004-07-01 19:27:13 UTC (rev 689)
@@ -268,9 +268,6 @@
RelativePath="..\status.txt">
</File>
<File
- RelativePath="..\pr\test\test.pr">
- </File>
- <File
RelativePath="thread.h">
</File>
</Filter>