--- parser3/src/classes/table.C 2001/05/08 10:23:50 1.78 +++ parser3/src/classes/table.C 2001/05/11 17:45:10 1.80 @@ -5,7 +5,7 @@ Author: Alexander Petrosyan (http://design.ru/paf) - $Id: table.C,v 1.78 2001/05/08 10:23:50 paf Exp $ + $Id: table.C,v 1.80 2001/05/11 17:45:10 parser Exp $ */ #include "pa_config_includes.h" @@ -195,7 +195,7 @@ static void _offset(Request& r, const St Table& table=static_cast(r.self)->table(); if(params->size()) { Value& offset_expr=params->get_junction(0, "offset must be expression"); - table.shift((int)r.process(offset_expr).as_double()); + table.shift(r.process(offset_expr).as_int()); } else { Value& value=*new(pool) VInt(pool, table.current()); r.write_no_lang(value); @@ -657,10 +657,8 @@ MTable::MTable(Pool& apool) : Methoded(a // ^table.record[] add_native_method("record", Method::CT_DYNAMIC, _record, 0, 0); - /** @fn _hash - ^table:hash[key field name] - ^table:hash[key field name][value field name;...] - */ + // ^table:hash[key field name] + // ^table:hash[key field name][value field name;...] add_native_method("hash", Method::CT_DYNAMIC, _hash, 1, 1000); // ^table.sort{string-key-maker} ^table.sort{string-key-maker}[asc|desc]