Update of /cvsroot/pure-data/externals/grill/vasp/source In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29957/source
Modified Files: main.cpp obj_imm.cpp obj_peaks.cpp obj_q.cpp ops_search.cpp Log Message: ""
Index: main.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grill/vasp/source/main.cpp,v retrieving revision 1.19 retrieving revision 1.20 diff -C2 -d -r1.19 -r1.20 *** main.cpp 10 Nov 2003 03:37:03 -0000 1.19 --- main.cpp 31 Aug 2004 04:05:09 -0000 1.20 *************** *** 13,17 ****
! const C *VASP_VERSION = "0.1.3pre11";
#include "opfuns.h" --- 13,17 ----
! const C *VASP_VERSION = "0.1.3pre12";
#include "opfuns.h"
Index: obj_q.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grill/vasp/source/obj_q.cpp,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** obj_q.cpp 5 Dec 2002 05:34:19 -0000 1.2 --- obj_q.cpp 31 Aug 2004 04:05:15 -0000 1.3 *************** *** 52,55 **** --- 52,57 ---- for(I i = 0; i < cnt; ++i,++p) SetFloat(lst[i],*p); ToOutList(0,lst); + + delete buf; } } *************** *** 111,114 **** --- 113,118 ---- ToOutList(0,pos); ToOutList(1,lst); + + delete buf; } }
Index: obj_imm.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grill/vasp/source/obj_imm.cpp,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** obj_imm.cpp 9 Apr 2003 02:36:31 -0000 1.9 --- obj_imm.cpp 31 Aug 2004 04:05:15 -0000 1.10 *************** *** 100,103 **** --- 100,105 ---- Vasp ret(len,vr); ToOutVasp(0,ret); + + delete buf; } }
Index: ops_search.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grill/vasp/source/ops_search.cpp,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** ops_search.cpp 6 Apr 2003 02:43:06 -0000 1.7 --- ops_search.cpp 31 Aug 2004 04:05:15 -0000 1.8 *************** *** 80,89 **** { Vasp *ret = NULL; ! if(src.Vectors() > 1) ! post("%s - More than one vector in vasp!",p.opName()); else if(arg.CanbeFloat() || (arg.IsList() && arg.GetList().Count() >= 1)) { I fr = src.Frames(); I o = src.Vector(0).Offset(); ! I sz = src.Buffer(0)->Frames();
CVasp all(src); --- 80,92 ---- { Vasp *ret = NULL; ! if(src.Vectors() != 1) ! post("%s - Need exactly one vector in vasp!",p.opName()); else if(arg.CanbeFloat() || (arg.IsList() && arg.GetList().Count() >= 1)) { I fr = src.Frames(); I o = src.Vector(0).Offset(); ! ! VBuffer *buf = src.Buffer(0); ! I sz = buf->Frames(); ! delete buf;
CVasp all(src);
Index: obj_peaks.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grill/vasp/source/obj_peaks.cpp,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** obj_peaks.cpp 9 Apr 2003 02:36:31 -0000 1.5 --- obj_peaks.cpp 31 Aug 2004 04:05:15 -0000 1.6 *************** *** 99,102 **** --- 99,104 ---- delete[] pos; delete[] lst; + + delete buf; } }