Ejemplo n.º 1
0
int
max_ex_var(struct expr *expr, fts_symbol_t var, struct ex_ex *optr)
{
        optr->ex_type = ET_FLT;
        if (value_getfloat(var, &(optr->ex_flt))) {
                optr->ex_type = ET_FLT;
                optr->ex_flt = 0;
                pd_error(expr, "no such var '%s'", var->s_name);
                return (1);
        }
        return (0);
}
Ejemplo n.º 2
0
int
max_ex_var(struct expr *expr, t_symbol *var, struct ex_ex *optr, int idx)
{
        optr->ex_type = ET_FLT;
                if (!strcmp(var->s_name, "sys_idx")) {
                        optr->ex_flt = idx;
                        return (0);
                }
        if (value_getfloat(var, &(optr->ex_flt))) {
                optr->ex_type = ET_FLT;
                optr->ex_flt = 0;
                pd_error(expr, "no such var '%s'", var->s_name);
                return (1);
        }
        return (0);
}