--- parser3/src/include/pa_memory.h	2003/11/06 08:22:49	1.6
+++ parser3/src/include/pa_memory.h	2012/03/16 09:24:09	1.18
@@ -1,7 +1,7 @@
 /** @file
 	Parser: memory reference counting classes decls.
 
-	Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2012 Art. Lebedev Studio (http://www.artlebedev.com)
 
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
@@ -9,18 +9,18 @@
 #ifndef PA_MEMORY_H
 #define PA_MEMORY_H
 
-static const char* IDENT_MEMORY_H="$Date: 2003/11/06 08:22:49 $";
+#define IDENT_PA_MEMORY_H "$Id: pa_memory.h,v 1.18 2012/03/16 09:24:09 moko Exp $"
 
 // include
 
 #include "pa_config_includes.h"
-
-/// to debug backtrace pointers switch this on:
-//#define GC_DEBUG
 #include "gc.h"
 
 // defines
 
+// use destructors for Array, Hash and VMethodFrame
+#define USE_DESTRUCTORS
+
 //#define PA_DEBUG_GC_MEMORY
 
 #ifdef PA_DEBUG_GC_MEMORY
@@ -61,7 +61,7 @@ inline char *pa_strdup(const char* auto_
 
 	size_t size=known_length+1;
 	if(char *result=static_cast<char*>(pa_gc_malloc_atomic(size))) {
-		memcpy(result, auto_variable_never_null, size);
+		memcpy(result, auto_variable_never_null, known_length);
 		result[known_length]=0;
 		return result;
 	}
@@ -80,9 +80,13 @@ inline void *pa_realloc(void *ptr, size_
 	return pa_fail_alloc("reallocate to", size);
 }
 
-//{@ these operators are disabled, one should explicitely specify either new(UseGC) or new(PointerFreeGC)
-inline void *operator new(size_t) { abort(); } // disabled
-inline void *operator new[] (size_t) { abort(); } // disabled
+//{@ these operators can be used from stl. to be on a safe side, assume that data may contain pointers
+inline void *operator new[] (size_t size) {
+	return pa_malloc(size);
+}
+inline void *operator new(size_t size) {
+	return pa_malloc(size);
+}
 //}@
 
 #define UseGC ((int)1)