--- parser3/src/classes/reflection.C 2010/08/01 14:49:33 1.17 +++ parser3/src/classes/reflection.C 2010/09/04 23:33:21 1.19 @@ -5,7 +5,7 @@ Author: Alexandr Petrosian (http://paf.design.ru) */ -static const char * const IDENT_REFLECTION_C="$Date: 2010/08/01 14:49:33 $"; +static const char * const IDENT_REFLECTION_C="$Date: 2010/09/04 23:33:21 $"; #include "pa_vmethod_frame.h" #include "pa_request.h" @@ -107,6 +107,7 @@ static void _create(Request& r, MethodPa frame.empty_params(); } r.op_call(frame); + object.enable_default_setter(); r.write_pass_lang(object); } @@ -279,6 +280,18 @@ static void _dynamical(Request& r, Metho } } +static void _copy(Request& r, MethodParams& params) { + HashStringValue* src=params.as_no_junction(0, "source must not be code").get_hash(); + + if(src==NULL) + throw Exception(PARSER_RUNTIME, 0, "source must have hash representation"); + + Value& dst=params.as_no_junction(1, "destination must not be code"); + + for(HashStringValue::Iterator i(*src); i; i.next()) + r.put_element(dst, String(i.key(), String::L_TAINTED), i.value()); +} + // constructor MReflection::MReflection(): Methoded("reflection") { // ^reflection:create[class_name;constructor_name[;param1[;param2[;...]]]] @@ -310,4 +323,7 @@ MReflection::MReflection(): Methoded("re // ^reflection:dynamical[[object or class, caller if absent]] add_native_method("dynamical", Method::CT_STATIC, _dynamical, 0, 1); + + // ^reflection:copy[src;dst] + add_native_method("copy", Method::CT_STATIC, _copy, 2, 2); }