// // aegis - project change supervisor // Copyright (C) 1994, 2003-2008, 2012 Peter Miller. // // This program is free software; you can redistribute it and/or modify // it under the terms of the GNU General Public License as published // by the Free Software Foundation; either version 3 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU // General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // #include #include #include #include #include #include #include rpt_func_need::~rpt_func_need() { } rpt_func_need::rpt_func_need() { } rpt_func::pointer rpt_func_need::create() { return pointer(new rpt_func_need()); } const char * rpt_func_need::name() const { return "need"; } bool rpt_func_need::optimizable() const { return false; } bool rpt_func_need::verify(const rpt_expr::pointer &ep) const { return (ep->get_nchildren() == 1); } rpt_value::pointer rpt_func_need::run(const rpt_expr::pointer &, size_t, rpt_value::pointer *argv) const { assert(rpt_func_print__colp); rpt_value::pointer vp = rpt_value::integerize(argv[0]); rpt_value_integer *rvi = dynamic_cast(vp.get()); if (rvi) { long n = rvi->query(); if (n > 0) rpt_func_print__colp->need(n); } return rpt_value_void::create(); } // vim: set ts=8 sw=4 et :