--- parser3/src/classes/op.C	2013/10/04 21:21:54	1.217
+++ parser3/src/classes/op.C	2015/09/22 23:37:44	1.221
@@ -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.221 2015/09/22 23:37:44 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);
 	
@@ -739,10 +739,8 @@ static void _cache(Request& r, MethodPar
 		// ^cache[] -- return current expiration time
 		Cache_scope* scope=static_cast<Cache_scope*>(r.classes_conf.get(cache_data_name));
 		if(!scope)
-			throw Exception(PARSER_RUNTIME,
-				0,
-				"expire-time get without cache");
-		r.write_no_lang(*new VDate(scope->expires));
+			throw Exception(PARSER_RUNTIME, 0, "expire-time get without cache");
+		r.write_no_lang(*new VDate((pa_time_t)scope->expires));
 		return;
 	}