pd/extra/expr~ vexp.c,1.2.12.1,1.2.12.1.2.1 - Pd-cvs

16 Mar 2004


      Update of /cvsroot/pure-data/pd/extra/expr~
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20015
Modified Files:
      Tag: impd_0_37
    vexp.c 
Log Message:
removing gcc 3.3 warnings
Index: vexp.c
===================================================================
RCS file: /cvsroot/pure-data/pd/extra/expr~/vexp.c,v
retrieving revision 1.2.12.1
retrieving revision 1.2.12.1.2.1
diff -C2 -d -r1.2.12.1 -r1.2.12.1.2.1
*** vexp.c	8 Jul 2003 09:48:56 -0000	1.2.12.1
--- vexp.c	16 Mar 2004 07:07:52 -0000	1.2.12.1.2.1
***************
*** 79,99 ****
  char *atoif(char *s, long int *value, long int *type);
! static struct ex_ex *ex_lex(struct expr *exp, long int *n);
  struct ex_ex *ex_match(struct ex_ex *eptr, long int op);
! struct ex_ex *ex_parse(struct expr *exp, struct ex_ex *iptr,
    				struct ex_ex *optr, long int *argc);
! struct ex_ex *ex_eval(struct expr *exp, struct ex_ex *eptr,
    					struct ex_ex *optr, int i);
int expr_donew(struct expr *expr, int ac, t_atom *av);
[...1572 lines suppressed...]
    	(eptr->ex_ptr)[i] = 0;
! 		exp->exp_str = p;
    	/*
    	 * we mark this as a string and later we will change this
--- 1844,1858 ----
    	 * function or a table 
    	 */
! 		p = --expr->exp_str;
    	for (i = 0; name_ok(*p); i++)
    		p++;
    	if (!i) {
! 			post("expr: syntax error: %s\n", expr->exp_str);
    		return (1);
    	}
    	eptr->ex_ptr = (char *)fts_malloc(i + 1);
! 		strncpy(eptr->ex_ptr, expr->exp_str, (int) i);
    	(eptr->ex_ptr)[i] = 0;
! 		expr->exp_str = p;
    	/*
    	 * we mark this as a string and later we will change this