--- parser3/src/classes/form.C	2001/04/27 16:48:19	1.3.4.1
+++ parser3/src/classes/form.C	2001/04/28 08:43:47	1.4
@@ -5,7 +5,7 @@
 
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: form.C,v 1.3.4.1 2001/04/27 16:48:19 paf Exp $
+	$Id: form.C,v 1.4 2001/04/28 08:43:47 paf Exp $
 */
 
 #include "classes.h"
@@ -28,8 +28,8 @@ public:
 
 // constructor
 
-MForm::MForm(Pool& pool) : Methoded(pool) {
-	set_name(NEW String(pool, FORM_CLASS_NAME));
+MForm::MForm(Pool& apool) : Methoded(apool) {
+	set_name(*NEW String(pool(), FORM_CLASS_NAME));
 }
 
 // global variable