[PD-cvs] pd/src desire.c,1.1.2.217.2.167,1.1.2.217.2.168

Mathieu Bouchard matju at users.sourceforge.net
Thu Jul 19 06:39:31 CEST 2007


Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26767

Modified Files:
      Tag: desiredata
	desire.c 
Log Message:
replaced pd_error() by error()


Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.217.2.167
retrieving revision 1.1.2.217.2.168
diff -C2 -d -r1.1.2.217.2.167 -r1.1.2.217.2.168
*** desire.c	19 Jul 2007 01:13:12 -0000	1.1.2.217.2.167
--- desire.c	19 Jul 2007 04:39:26 -0000	1.1.2.217.2.168
***************
*** 3,7 ****
    This file is part of DesireData.
    Copyright (c) 2004-2007 by Mathieu Bouchard.
- 
    Copyright (c) 1997-2005 Miller Puckette.
    Portions Copyright (c) 1997-2005 Miller Puckette, Günter Geiger, Krzysztof Czaja,
--- 3,6 ----
***************
*** 9,13 ****
    The remains of IEMGUI Copyright (c) 2000-2001 Thomas Musil (IEM KUG Graz Austria)
    [dropper] class is Copyright (c) 2004 Carmen Rocco
[...1014 lines suppressed...]
  	//t_binbuf *b;
! 	if (argc<1) {error("not enough args"); return;}
! 	if (argv[0].a_type != A_FLOAT) {error("$1 must be float"); return;}
  	int i = atom_getint(argv);
! 	if (argv[2].a_type != A_SYMBOL) {error("$2 must be symbol"); return;}
  	s = argv[2].a_symbol;
  	x->next_add = i;
***************
*** 7032,7036 ****
  		copy_atoms(al->c,al->v,&argv[i]);
  		//printf("#V reading '%s':\n",s->name);
! 		if (!newest) {pd_error(self,"#V: there is no newest object\n"); return;}
  		t_hash *h = ((t_gobj *)newest)->dix->visual;
  		if (hash_exists(h,s)) {
--- 7030,7034 ----
  		copy_atoms(al->c,al->v,&argv[i]);
  		//printf("#V reading '%s':\n",s->name);
! 		if (!newest) {error("#V: there is no newest object\n"); return;}
  		t_hash *h = ((t_gobj *)newest)->dix->visual;
  		if (hash_exists(h,s)) {





More information about the Pd-cvs mailing list