--- parser3/src/classes/double.C 2001/03/11 08:44:39 1.7 +++ parser3/src/classes/double.C 2001/03/12 09:08:45 1.10 @@ -3,7 +3,7 @@ Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com) Author: Alexander Petrosyan (http://design.ru/paf) - $Id: double.C,v 1.7 2001/03/11 08:44:39 paf Exp $ + $Id: double.C,v 1.10 2001/03/12 09:08:45 paf Exp $ */ #include "pa_request.h" @@ -17,33 +17,39 @@ VClass *double_class; // methods -static void _int(Request& r, Array *) { +static void _int(Request& r, const String&, Array *) { Pool& pool=r.pool(); VDouble *vdouble=static_cast(r.self); Value& value=*new(pool) VInt(pool, static_cast(vdouble->get_double())); r.wcontext->write(value, String::Untaint_lang::NO /*always object, not string*/); } -static void _double(Request& r, Array *) { +static void _double(Request& r, const String&, Array *) { Pool& pool=r.pool(); VDouble *vdouble=static_cast(r.self); Value& value=*new(pool) VDouble(pool, vdouble->get_double()); r.wcontext->write(value, String::Untaint_lang::NO /*always object, not string*/); } -static void _inc(Request& r, Array *params) { +static void _inc(Request& r, const String&, Array *params) { VDouble *vdouble=static_cast(r.self); double increment=params->size()? - r.autocalc( + r.process( *static_cast(params->get(0)), 0/*no name*/, - false/*don't make it string*/).get_double():1; + false/*don't intercept string*/).get_double():1; vdouble->inc(increment); } void initialize_double_class(Pool& pool, VClass& vclass) { - vclass.add_native_method("int", _int, 0, 0); // ^double.int[] - vclass.add_native_method("double", _double, 0, 0); // ^double.double[] - vclass.add_native_method("inc", _inc, 0, 1); // ^double.inc[] ^double.inc[offset] + // ^double.int[] + vclass.add_native_method("int", _int, 0, 0); + + // ^double.double[] + vclass.add_native_method("double", _double, 0, 0); + + // ^double.inc[] + // ^double.inc[offset] + vclass.add_native_method("inc", _inc, 0, 1); }