--- parser3/src/classes/double.C	2002/04/18 10:50:59	1.47
+++ parser3/src/classes/double.C	2002/09/18 08:52:47	1.51
@@ -3,10 +3,10 @@
 
 	Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
-
-	$Id: double.C,v 1.47 2002/04/18 10:50:59 paf Exp $
 */
 
+static const char* IDENT_DOUBLE_C="$Date: 2002/09/18 08:52:47 $";
+
 #include "classes.h"
 #include "pa_request.h"
 #include "pa_vdouble.h"
@@ -32,7 +32,7 @@ static void _int(Request& r, const Strin
 	Value *default_code=params->size()>0?
 		default_code=&params->as_junction(0, "default must be int"):0; // (default)
 
-	VDouble *vdouble=static_cast<VDouble *>(r.self);
+	VDouble *vdouble=static_cast<VDouble *>(r.get_self());
 	Value& result=*new(pool) VInt(pool, vdouble->as_int());
 	r.write_no_lang(result);
 }
@@ -42,7 +42,7 @@ static void _double(Request& r, const St
 	Value *default_code=params->size()>0?
 		default_code=&params->as_junction(0, "default must be double"):0; // (default)
 
-	VDouble *vdouble=static_cast<VDouble *>(r.self);
+	VDouble *vdouble=static_cast<VDouble *>(r.get_self());
 	Value& result=*new(pool) VDouble(pool, vdouble->as_double());
 	r.write_no_lang(result);
 }
@@ -57,7 +57,7 @@ static void __mod(VDouble& vdouble, doub
 
 static void vdouble_op(Request& r, MethodParams *params, 
 					   vdouble_op_func_ptr func) {
-	VDouble *vdouble=static_cast<VDouble *>(r.self);
+	VDouble *vdouble=static_cast<VDouble *>(r.get_self());
 	double param=params->size()?
 			params->as_double(0, "param must be double", r):1/*used in inc/dec*/;
 	(*func)(*vdouble, param);
@@ -92,7 +92,7 @@ static void _sql(Request& r, const Strin
 			val=0; //calm, compiler
 		}
 	VDouble& result=*new(pool) VDouble(pool, val);
-	r.write_assign_lang(result);
+	r.write_no_lang(result);
 }
 
 // constructor