--- parser3/src/classes/op.C	2013/10/04 21:21:54	1.217
+++ parser3/src/classes/op.C	2015/09/04 10:36:54	1.220
@@ -18,7 +18,7 @@
 #include "pa_vclass.h"
 #include "pa_charset.h"
 
-volatile const char * IDENT_OP_C="$Id: op.C,v 1.217 2013/10/04 21:21:54 moko Exp $";
+volatile const char * IDENT_OP_C="$Id: op.C,v 1.220 2015/09/04 10:36:54 moko Exp $";
 
 // limits
 
@@ -357,7 +357,7 @@ static void _for(Request& r, MethodParam
 	VInt* vint=new VInt(0);
 
 	VMethodFrame& caller=*r.get_method_frame()->caller();
-	caller.put_element(var_name, vint);
+	r.put_element(caller, var_name, vint);
 	if(delim_maybe_code){ // delimiter set 
 		bool need_delim=false;
 
@@ -646,8 +646,8 @@ static void locked_process_and_cache_put
 		} else
 			throw Exception(PARSER_RUNTIME,
 				result.exception_should_be_handled,
-				"$"EXCEPTION_VAR_NAME"."EXCEPTION_HANDLED_PART_NAME" value must be "
-				"either boolean or string '"CACHE_EXCEPTION_HANDLED_CACHE_NAME"'");
+				"$" EXCEPTION_VAR_NAME "." EXCEPTION_HANDLED_PART_NAME " value must be "
+				"either boolean or string '" CACHE_EXCEPTION_HANDLED_CACHE_NAME "'");
 	} else
 		info.processed_code=&result.processed_code.as_string();
 
@@ -725,7 +725,7 @@ static time_t as_expires(Request& r, Met
 						int index, time_t now) {
 	time_t result;
 	if(Value* vdate=params[index].as(VDATE_TYPE))
-		result=static_cast<VDate*>(vdate)->get_time();
+		result=(time_t)(static_cast<VDate*>(vdate)->get_time());
 	else
 		result=now+(time_t)params.as_double(index, "lifespan must be date or number", r);