--- parser3/src/classes/memory.C	2012/03/16 09:24:07	1.9
+++ parser3/src/classes/memory.C	2020/12/15 17:10:29	1.18
@@ -1,7 +1,7 @@
 /** @file
 	Parser: @b memory parser class.
 
-	Copyright (c) 2001-2012 Art. Lebedev Studio (http://www.artlebedev.com)
+	Copyright (c) 2001-2020 Art. Lebedev Studio (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru>(http://paf.design.ru)
 */
 
@@ -9,7 +9,7 @@
 #include "pa_vmemory.h"
 #include "pa_request.h"
 
-volatile const char * IDENT_MEMORY_C="$Id: memory.C,v 1.9 2012/03/16 09:24:07 moko Exp $" IDENT_PA_VMEMORY_H;
+volatile const char * IDENT_MEMORY_C="$Id: memory.C,v 1.18 2020/12/15 17:10:29 moko Exp $" IDENT_PA_VMEMORY_H;
 
 class MMemory: public Methoded {
 public:
@@ -21,29 +21,12 @@ public: // Methoded
 
 // global variables
 
-DECLARE_CLASS_VAR(memory, 0 /*fictive*/, new MMemory);
-
-#undef GC_DEBUG
-#ifdef GC_DEBUG
-extern "C" GC_API void GC_print_backtrace(void *);
-void *debug_print_backtrace=0;
-#endif
+DECLARE_CLASS_VAR(memory, new MMemory);
 
 static void _compact(Request& r, MethodParams&) {
 	r.wipe_unused_execution_stack();
-#ifndef PA_DEBUG_DISABLE_GC
-	{
-		int saved=GC_dont_gc;
-		GC_dont_gc=0;
-		GC_gcollect();
-		GC_dont_gc=saved;
-	}
-#ifdef GC_DEBUG
-	if(debug_print_backtrace)
-		GC_print_backtrace(debug_print_backtrace);
-#endif
-#endif
-	}
+	PA_GC_GCOLLECT;
+}
 
 // constructor