--- parser3/src/classes/classes.C	2003/02/17 16:44:56	1.18.2.5
+++ parser3/src/classes/classes.C	2015/10/26 01:21:53	1.26
@@ -1,25 +1,25 @@
 /** @file
 	Parser: @b Methoded and Methoded_array classes.
 
-	Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2015 Art. Lebedev Studio (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char* IDENT_CLASSES_C="$Date: 2003/02/17 16:44:56 $";
-
 #include "classes.h"
 #include "pa_request.h"
 
+volatile const char * IDENT_CLASSES_C="$Id: classes.C,v 1.26 2015/10/26 01:21:53 moko Exp $" IDENT_CLASSES_H;
+
 // Methoded
 
 void Methoded::register_directly_used(Request& r) {
 	if(used_directly()) {
-		r.classes().put(name(), MethodedPtr(this));
-
-		// prevent system classes from modification [calling add_method]
-		// ^process[$string:CLASS]{@method} prohibited from now on...
-		this->lock();
+		r.classes().put(name(), this);
 	}
+
+	// prevent system classes from modification [calling set_method]
+	// ^process[$string:CLASS]{@method} prohibited from now on...
+	this->lock();
 }
 
 // Methoded_array
@@ -27,9 +27,9 @@ void Methoded::register_directly_used(Re
 // global variable
 
 Methoded_array& methoded_array() {
-	static Methoded_arrayPtr result(0);
+	static Methoded_array* result=0;
 	if(!result)
-		result=Methoded_arrayPtr(new Methoded_array);
+		result=new Methoded_array;
 
 	return *result;
 }