You can subscribe to this list here.
2004 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
(22) |
Aug
(270) |
Sep
|
Oct
|
Nov
|
Dec
|
---|---|---|---|---|---|---|---|---|---|---|---|---|
2005 |
Jan
(8) |
Feb
(24) |
Mar
|
Apr
|
May
|
Jun
(5) |
Jul
|
Aug
(4) |
Sep
|
Oct
|
Nov
(2) |
Dec
(2) |
2006 |
Jan
|
Feb
|
Mar
|
Apr
(4) |
May
(2) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2007 |
Jan
|
Feb
|
Mar
|
Apr
(25) |
May
|
Jun
|
Jul
|
Aug
|
Sep
(6) |
Oct
(3) |
Nov
(1) |
Dec
(14) |
2008 |
Jan
(1) |
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2009 |
Jan
|
Feb
|
Mar
(31) |
Apr
(5) |
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
2010 |
Jan
|
Feb
|
Mar
|
Apr
(90) |
May
|
Jun
|
Jul
|
Aug
(1) |
Sep
|
Oct
|
Nov
|
Dec
|
2011 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
(2) |
Dec
|
2016 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(2) |
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
(1) |
From: Martin R. <ru...@us...> - 2009-04-09 09:56:12
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv11047 Modified Files: FOORegion.m FOOSoundStream.m Log Message: fix for snd-region/snd-extract nesting Index: FOORegion.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOORegion.m,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** FOORegion.m 22 Mar 2009 18:59:22 -0000 1.8 --- FOORegion.m 9 Apr 2009 09:55:58 -0000 1.9 *************** *** 57,61 **** FOO_ERROR(YES, self); } ! _substrate = RETAIN(substrate); // RETAIN? _offset = rint(off * [substrate getSamplingRate]); _size = rint(siz * [substrate getSamplingRate]); --- 57,61 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substrate); _offset = rint(off * [substrate getSamplingRate]); _size = rint(siz * [substrate getSamplingRate]); *************** *** 67,71 **** return self; ! } --- 67,71 ---- return self; ! } // initWithSubstrate:offset:size:rev: *************** *** 74,78 **** RELEASE(_substrate); [super dealloc]; ! } //dealloc --- 74,78 ---- RELEASE(_substrate); [super dealloc]; ! } // dealloc *************** *** 124,128 **** { return _size; ! } --- 124,128 ---- { return _size; ! } // size *************** *** 130,134 **** { return [_substrate getSamplingRate]; ! } --- 130,134 ---- { return [_substrate getSamplingRate]; ! } // getSamplingRate *************** *** 136,140 **** { return [_substrate getChannelCount]; ! } /* --- 136,141 ---- { return [_substrate getChannelCount]; ! } // getChannelCount ! /* Index: FOOSoundStream.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOSoundStream.m,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** FOOSoundStream.m 22 Mar 2009 18:59:22 -0000 1.8 --- FOOSoundStream.m 9 Apr 2009 09:55:58 -0000 1.9 *************** *** 48,58 **** channel: (int)channel { - // if ([substrate isKindOfClass: [FOOSoundFile class]] == NO) - // { - // FOO_ERROR(YES, self); - // } - // _soundFile = RETAIN((FOOSoundFile *)substrate); // RETAIN? - - // added for generalization to substrate if ([substrate isKindOfClass: [FOOSoundFile class]] == NO && [substrate isKindOfClass: [FOOSoundStream class]] == NO && --- 48,51 ---- *************** *** 61,68 **** FOO_ERROR(YES, self); } ! _substrate = RETAIN(substrate); // RETAIN? ! //end added ! _channelNumber = channel - 1; ! // if (_channelNumber < 0 || _channelNumber >= [_soundFile getChannelCount]) if (_channelNumber < 0 || _channelNumber >= [_substrate getChannelCount]) { --- 54,60 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substrate); ! _channelNumber = channel; ! if (_channelNumber < 0 || _channelNumber >= [_substrate getChannelCount]) { *************** *** 71,80 **** return self; ! } - (void) dealloc { - // RELEASE(_soundFile); RELEASE(_substrate); [super dealloc]; --- 63,71 ---- return self; ! } // initWithSubstrate:channel: - (void) dealloc { RELEASE(_substrate); [super dealloc]; *************** *** 87,91 **** channel: (int)channel { ! if (channel - 1 != _channelNumber) { FOO_ERROR(YES, self); --- 78,83 ---- channel: (int)channel { ! // channel == -1: sum up all channels, here: our channel ! if (channel != -1 && channel != _channelNumber) { FOO_ERROR(YES, self); *************** *** 94,98 **** offset: o size: s]; ! } --- 86,90 ---- offset: o size: s]; ! } // getSamples:offset:size:channel *************** *** 105,127 **** size: s channel: _channelNumber]; ! // return [_soundFile getSamples: b ! // offset: o ! // size: s ! // channel: _channelNumber]; ! } - (long) size { - // return [_soundFile size]; return [_substrate size]; ! } - (double) getSamplingRate { - // return [_soundFile getSamplingRate]; return [_substrate getSamplingRate]; ! } --- 97,113 ---- size: s channel: _channelNumber]; ! } // getSamples:offset:size - (long) size { return [_substrate size]; ! } // size - (double) getSamplingRate { return [_substrate getSamplingRate]; ! } // getSamplingRate *************** *** 129,133 **** { return 1; // FOOSoundStream is mono ! } --- 115,119 ---- { return 1; // FOOSoundStream is mono ! } // getChannelCount *************** *** 142,152 **** if ([coder allowsKeyedCoding]) { ! // [coder encodeObject: _soundFile forKey: @"FOOSoundStream:soundFile"]; ! [coder encodeObject: _substrate forKey: @"FOOSoundStream:soundFile"]; [coder encodeInt: _channelNumber forKey: @"FOOSoundStream:channelNumber"]; } else { - // [coder encodeObject: _soundFile]; [coder encodeObject: _substrate]; [coder encodeValueOfObjCType: @encode(int) at: &_channelNumber]; --- 128,136 ---- if ([coder allowsKeyedCoding]) { ! [coder encodeObject: _substrate forKey: @"FOOSoundStream:substrate"]; [coder encodeInt: _channelNumber forKey: @"FOOSoundStream:channelNumber"]; } else { [coder encodeObject: _substrate]; [coder encodeValueOfObjCType: @encode(int) at: &_channelNumber]; *************** *** 154,158 **** return; ! } --- 138,142 ---- return; ! } // encodeWithCoder: *************** *** 163,167 **** if ([coder allowsKeyedCoding]) { - // _soundFile = RETAIN([coder decodeObjectForKey: @"FOOSoundStream:soundFile"]); _substrate = RETAIN([coder decodeObjectForKey: @"FOOSoundStream:substrate"]); _channelNumber = [coder decodeIntForKey: @"FOOSoundStream:channelNumber"]; --- 147,150 ---- *************** *** 169,173 **** else { - // _soundFile = RETAIN([coder decodeObject]); _substrate = RETAIN([coder decodeObject]); [coder decodeValueOfObjCType: @encode(int) at: &_channelNumber]; --- 152,155 ---- *************** *** 175,179 **** return self; ! } @end --- 157,161 ---- return self; ! } // initWithCoder: @end |
From: Martin R. <ru...@us...> - 2009-03-24 18:56:28
|
Update of /cvsroot/foo/foo/elkfoo In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv16467 Modified Files: README Log Message: removed doubled readme text and pointed to toplevel README file Index: README =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/README,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** README 15 Aug 2004 20:48:44 -0000 1.2 --- README 24 Mar 2009 18:56:16 -0000 1.3 *************** *** 4,177 **** -------------------------- ! last edited 2004-07-29 rumori ! ! this readme contains information about the requirements, installation ! and yet undocumented features of foo. ! ! ! requirements ! ------------ ! ! - libsndfile >= 1.0.10 (!) ! IMPORTANT: libsndfile prior to 1.0.10 has severe bugs in AIFF | ! FLOAT file support (which could be used for incremental mixing in ! foo) and in soundfile read/write mode, which is heavily used in foo. ! the version of libsndfile coming with your distribution might be an ! older one and therefore *TOO OLD*. ! - pkgconfig (for detection of libsndfile) ! - fooelk >= 0.0.3 or recent "ordinary" elk ! (however, toplevel.foo relies on the readline-patch in elk, ! but there is the --no-rl option now) ! - gnustep-make, gnustep-base ! ! ! installation ! ------------ ! ! compiling from cvs ! ------------------ ! ! if you checked out from cvs, call ! ! ./bootstrap ! ! you'll need autoconf >= 2.50 to build the configure script. after ! that, you can continue like compiling from a release tarball. ! ! ! compiling from release tarball ! ------------------------------ ! ! ./configure ! ! as usual, you may set the install-prefix/paths with ! ! ./configure --prefix=/usr/local/anywhere etc. ! ! configure looks for an installation of fooelk first, after that it ! tries to find an "ordinary" elk installation. if elk is not found, ! foo refuses to build. you may specify the location of elk/fooelk with ! ! ./configure --with-elk-include=/path/to/elk/headers \ ! --with-elk-library=/path/to/elk/lib ! ! make ! make install ! ! should build and install foo. depending on the target directory, you ! may have to call 'make install' as root. ! ! configure should set the install paths to toplevel.scm and to the ! binary foo, so that you should be able to run the binary 'foo' from ! everywhere. depending on your installation, you might add the path to ! libsndfile and libfooelk/libelk to LD_LIBRARY_PATH: ! ! export LD_LIBRARY_PATH=${LD_LIBRARY_PATH}:/path/to/libs ! (sh-compatible shell) ! ! ! yet undocumented (new) features ! ------------------------------- ! ! while porting and developing foo it's undergoing several changes, ! which can't be documented right now: ! ! ! new archiving functions layout (backwards compatible) ! ----------------------------------------------------- ! ! the canonical form for the archiving functions (write-context) and ! (read-context) are now: ! ! (write-context <context> [<filename|port> [<XML?>]]) ! (read-context [<filename|port>]) ! ! that way, backwards compatability is given. the last argument to ! (write-context) is a boolean specifying whether XML archive format or ! native binary format should be used. ! ! ! scripting foo via the #! directive ! ---------------------------------- ! ! *** DOCUMENT_ME *** ! ! for a simple example, see Examples/scripts/sine.foo ! ! ! user-accessible play command ! ---------------------------- ! ! the variable 'foo-default-play-command' may contain the play command ! being used with (play) along with additional initial arguments: ! ! (set! foo-default-play-command "alsaplayer -q -i text") ! ! ! customization with foo files ! ---------------------------- ! ! historically foo tries to evaluate the files '~/.initfoo' and ! './.initfoo' (in this order) on startup. these files may contain ! normal foo code to customize the behavior of foo. ! ! from foo-0.0.4 on, the following files are evaluated for ! customization: ! ! /etc/foo/init.foo (system wide settings) ! ~/.foo/init.foo (user's settings) ! ./.init.foo (working dir settings) ! ! backwards compatability to the behavior of foo-2.1 is still retained. ! it should not be used for new projects. ! ! ! start option to disable readline support ! ---------------------------------------- ! ! if foo is started with the '--no-rl'-option, a different toplevel file ! will be used which doesn't rely on fooelk's readline extension. as a ! side effect, the symbol completer is disabled, too, which avoids ! problems which sourcecode containing tabs at stdin (script or in ! emacs' inferior mode). ! ! ! fractional tone custom reader ! ----------------------------- ! ! the foo-(NeXT)-2.1-semitone reader is not longer supported. the new ! syntax for fractional tones is: ! ! #s1 ; half tone ! 1.05946309435929530984310531494 ! ! #s12 ; twelve half tones = 1 octave ! 2 ! ! #s1/2 ; half half tone = 1 quarter tone ! 1.029302236643492074463779317739 ! ! #q1 ; quarter tone ! 1.029302236643492074463779317739 ! ! ! libsndfile support (since foo-0.0.2) ! ------------------------------------ ! ! foo can read and write every sound format supported by libsndfile. in ! constrast to the foo-2.1-(NeXT)-documentation, the following ! functions/macros where adopted to reflect this feature: ! ! (make-soundfile "name" fileformat channels samplingrate . filetype) ! (create-soundfile "name" fileformat channels samplingrate . filetype) ! ! (synt channels duration samplingrate "name" fileformat filetype) ! ! where filetype is one of: ! ! 'wav 'aiff 'snd 'paf 'svx 'nist 'voc 'ircam 'wav64 'mat4 'mat5 'pvf 'xi ! note: there is no special 'au type, but 'snd is the same format (Sun/NeXT). ! the default filetype is 'aiff. --- 4,11 ---- -------------------------- ! last edited 2004-03-24 rumori ! this is elkfoo, part of the foo sound synthesis system. ! for further informations, please refer to the toplevel README file. |
From: Martin R. <ru...@us...> - 2009-03-24 18:56:20
|
Update of /cvsroot/foo/foo/libfoo In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv16442 Modified Files: README Log Message: removed doubled readme text and pointed to toplevel README file Index: README =================================================================== RCS file: /cvsroot/foo/foo/libfoo/README,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** README 31 Jul 2004 04:09:18 -0000 1.2 --- README 24 Mar 2009 18:56:10 -0000 1.3 *************** *** 4,162 **** -------------------------- ! last edited 2004-07-29 rumori ! ! this readme contains information about the requirements, installation ! and yet undocumented features of foo. ! ! ! requirements ! ------------ ! ! - libsndfile >= 1.0.10 (!) ! IMPORTANT: libsndfile prior to 1.0.10 has severe bugs in AIFF | ! FLOAT file support (which could be used for incremental mixing in ! foo) and in soundfile read/write mode, which is heavily used in foo. ! the version of libsndfile coming with your distribution might be an ! older one and therefore *TOO OLD*. ! - pkgconfig (for detection of libsndfile) ! - fooelk >= 0.0.3 or recent "ordinary" elk ! (however, toplevel.foo relies on the readline-patch in elk, ! but there is the --no-rl option now) ! - gnustep-make, gnustep-base ! ! ! installation ! ------------ ! ! compiling from cvs ! ------------------ ! ! if you checked out from cvs, call ! ! ./bootstrap ! ! you'll need autoconf >= 2.50 to build the configure script. after ! that, you can continue like compiling from a release tarball. ! ! ! compiling from release tarball ! ------------------------------ ! ! ./configure ! ! as usual, you may set the install-prefix/paths with ! ! ./configure --prefix=/usr/local/anywhere etc. ! ! configure looks for an installation of fooelk first, after that it ! tries to find an "ordinary" elk installation. if elk is not found, ! foo refuses to build. you may specify the location of elk/fooelk with ! ! ./configure --with-elk-include=/path/to/elk/headers \ ! --with-elk-library=/path/to/elk/lib ! ! make ! make install ! ! should build and install foo. depending on the target directory, you ! may have to call 'make install' as root. ! ! configure should set the install paths to toplevel.scm and to the ! binary foo, so that you should be able to run the binary 'foo' from ! everywhere. depending on your installation, you might add the path to ! libsndfile and libfooelk/libelk to LD_LIBRARY_PATH: ! ! export LD_LIBRARY_PATH=${LD_LIBRARY_PATH}:/path/to/libs ! (sh-compatible shell) ! ! ! yet undocumented (new) features ! ------------------------------- ! ! while porting and developing foo it's undergoing several changes, ! which can't be documented right now: ! ! scripting foo via the #! directive ! ---------------------------------- ! ! *** DOCUMENT_ME *** ! ! for a simple example, see Examples/scripts/sine.foo ! ! ! user-accessible play command ! ---------------------------- ! ! the variable 'foo-default-play-command' may contain the play command ! being used with (play) along with additional initial arguments: ! ! (set! foo-default-play-command "alsaplayer -q -i text") ! ! ! customization with foo files ! ---------------------------- ! ! historically foo tries to evaluate the files '~/.initfoo' and ! './.initfoo' (in this order) on startup. these files may contain ! normal foo code to customize the behavior of foo. ! ! from foo-0.0.4 on, the following files are evaluated for ! customization: ! ! /etc/foo/init.foo (system wide settings) ! ~/.foo/init.foo (user's settings) ! ./.init.foo (working dir settings) ! ! backwards compatability to the behavior of foo-2.1 is still retained. ! it should not be used for new projects. ! ! ! start option to disable readline support ! ---------------------------------------- ! ! if foo is started with the '--no-rl'-option, a different toplevel file ! will be used which doesn't rely on fooelk's readline extension. as a ! side effect, the symbol completer is disabled, too, which avoids ! problems which sourcecode containing tabs at stdin (script or in ! emacs' inferior mode). ! ! ! fractional tone custom reader ! ----------------------------- ! ! the foo-(NeXT)-2.1-semitone reader is not longer supported. the new ! syntax for fractional tones is: ! ! #s1 ; half tone ! 1.05946309435929530984310531494 ! ! #s12 ; twelve half tones = 1 octave ! 2 ! ! #s1/2 ; half half tone = 1 quarter tone ! 1.029302236643492074463779317739 ! ! #q1 ; quarter tone ! 1.029302236643492074463779317739 ! ! ! libsndfile support (since foo-0.0.2) ! ------------------------------------ ! ! foo can read and write every sound format supported by libsndfile. in ! constrast to the foo-2.1-(NeXT)-documentation, the following ! functions/macros where adopted to reflect this feature: ! ! (make-soundfile "name" fileformat channels samplingrate . filetype) ! (create-soundfile "name" fileformat channels samplingrate . filetype) ! ! (synt channels duration samplingrate "name" fileformat filetype) ! ! where filetype is one of: ! ! 'wav 'aiff 'snd 'paf 'svx 'nist 'voc 'ircam 'wav64 'mat4 'mat5 'pvf 'xi ! note: there is no special 'au type, but 'snd is the same format (Sun/NeXT). ! the default filetype is 'aiff. --- 4,11 ---- -------------------------- ! last edited 2004-03-24 rumori ! this is libfoo, part of the foo sound synthesis system. ! for further informations, please refer to the toplevel README file. |
From: Martin R. <ru...@us...> - 2009-03-24 18:55:46
|
Update of /cvsroot/foo/foo In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv16357 Modified Files: README Log Message: adjusted readme to new default paths in configure.ac Index: README =================================================================== RCS file: /cvsroot/foo/foo/README,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** README 9 Mar 2009 01:13:15 -0000 1.3 --- README 24 Mar 2009 18:55:35 -0000 1.4 *************** *** 4,8 **** -------------------------- ! last edited 2009-03-09 rumori this readme contains information about the requirements, installation --- 4,8 ---- -------------------------- ! last edited 2009-03-24 rumori this readme contains information about the requirements, installation *************** *** 86,108 **** ! compiling on mac os x (tested on 10.5) ! -------------------------------------- use macports (http://www.macports.org) in order to install libsndfile: ! sudo port install libsndfile ! ! usually, there is a variant for libsndfile for adding flac file support: ! sudo port install libsndfile +flac ! currently, however, the version of flac in macports seems to be ! incompatible with libsndfile. ! for compiling foo, specify the library locations, for the standard ! paths this would read: ! env LDFLAGS="-L/opt/local/lib" \ ! CPPFLAGS="-I/opt/local/include" \ ./configure [--enable-flac-support (optionally)] --- 86,106 ---- ! compiling on mac os x (tested on 10.5 and 10.4) ! ----------------------------------------------- use macports (http://www.macports.org) in order to install libsndfile: ! $ sudo port install libsndfile ! $ ./configure [--enable-flac-support] ! configure will look for the necessary libraries in macport's standard ! locations /opt/local/lib and /opt/local/include. ! if you installed macports into a different location, you have to ! specify it for configure: ! env LDFLAGS="-L/opt/otherlocal/lib" \ ! CPPFLAGS="-I/opt/otherlocal/include" \ ./configure [--enable-flac-support (optionally)] |
From: Martin R. <ru...@us...> - 2009-03-24 18:55:31
|
Update of /cvsroot/foo/fooelk In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv16305 Modified Files: README.FOO Log Message: adjusted readme to new default paths in configure.ac Index: README.FOO =================================================================== RCS file: /cvsroot/foo/fooelk/README.FOO,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** README.FOO 9 Mar 2009 01:06:32 -0000 1.5 --- README.FOO 24 Mar 2009 18:55:19 -0000 1.6 *************** *** 63,67 **** ./configure --enable-gnu-readline ! readline extension and mac os x 10.5 on mac os x 10.5, the readline extension of fooelk does not seem to --- 63,68 ---- ./configure --enable-gnu-readline ! ! ** readline extension and mac os x 10.5 ** on mac os x 10.5, the readline extension of fooelk does not seem to *************** *** 69,80 **** install another version of libreadline: ! sudo port install readline then compile fooelk ! env LDFLAGS="-L/opt/local/lib" \ ! CPPFLAGS="-I/opt/local/include" \ ./configure --enable-gnu-readline if you want to create a statically linked readline extension (which contains the the readline library itself, so that the extension is --- 70,91 ---- install another version of libreadline: ! $ sudo port install readline then compile fooelk ! $ ./configure --enable-gnu-readline ! ! which will look for the readline library in /opt/local/lib and the ! headers in /opt/local/include (macports standard locations) ! ! if you installed macports into a different locations, you have to ! specify them to fooelk: ! ! env LDFLAGS="-L/opt/otherlocal/lib" \ ! CPPFLAGS="-I/opt/otherlocal/include" \ ./configure --enable-gnu-readline + ** + if you want to create a statically linked readline extension (which contains the the readline library itself, so that the extension is |
From: Martin R. <ru...@us...> - 2009-03-24 18:44:39
|
Update of /cvsroot/foo/fooelk In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv14911 Modified Files: configure.ac Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: configure.ac =================================================================== RCS file: /cvsroot/foo/fooelk/configure.ac,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** configure.ac 23 Jan 2005 15:02:33 -0000 1.9 --- configure.ac 24 Mar 2009 18:44:22 -0000 1.10 *************** *** 58,63 **** *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! CPPFLAGS="${CPPFLAGS} -I/sw/include" ! LDFLAGS="${LDFLAGS} -L/sw/lib" ;; esac --- 58,63 ---- *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! CPPFLAGS="${CPPFLAGS} -I/sw/include -I/opt/local/include" ! LDFLAGS="${LDFLAGS} -L/sw/lib -L/opt/local/lib" ;; esac |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:22
|
Update of /cvsroot/foo/foo/elkfoo/scm/util In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/scm/util Modified Files: soundfile-funs.foo Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: soundfile-funs.foo =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scm/util/soundfile-funs.foo,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** soundfile-funs.foo 10 Apr 2007 14:01:45 -0000 1.1 --- soundfile-funs.foo 24 Mar 2009 18:31:02 -0000 1.2 *************** *** 60,71 **** ; - ;;default type (probably to be changed). Leaning on the definition in elkfoo.scm - ; - (define (foo:default-soundfile-type) foo-default-soundfile-filetype) - (define (foo:set-default-soundfile-type! type) - (if (symbol? type) (set! type (symbol->string type))) - (set! foo-default-soundfile-filetype type)) - - ; ;;get extension from type (see all database or see defaultdatabase) ; --- 60,63 ---- *************** *** 236,240 **** (set! maximum (if (null? maximum) 1 (car maximum))) (create-soundfile output ! (soundfile-filetype input) 'short (soundfile-srate input) --- 228,232 ---- (set! maximum (if (null? maximum) 1 (car maximum))) (create-soundfile output ! (soundfile-type input) 'short (soundfile-srate input) *************** *** 267,271 **** (srate (soundfile-srate file)) (maxi) (sampi) (timi) (comm)) (format #t "Filename : ~a~%" file) ! (format #t "Type : ~a~%" (soundfile-filetype file)) (format #t "Size : ~a~%" (soundfile-length file)) (format #t "Format : ~a~%" (soundfile-format file)) --- 259,263 ---- (srate (soundfile-srate file)) (maxi) (sampi) (timi) (comm)) (format #t "Filename : ~a~%" file) ! (format #t "Type : ~a~%" (soundfile-type file)) (format #t "Size : ~a~%" (soundfile-length file)) (format #t "Format : ~a~%" (soundfile-format file)) |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:20
|
Update of /cvsroot/foo/foo/elkfoo/scripts In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/scripts Modified Files: foocat foodiary foofold foojoin Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: foofold =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scripts/foofold,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** foofold 14 Dec 2007 19:36:40 -0000 1.1 --- foofold 24 Mar 2009 18:31:02 -0000 1.2 *************** *** 86,90 **** (if ext ext ! (soundfile-filetype (car infiles)))))) ;; sample format --- 86,90 ---- (if ext ext ! (soundfile-type (car infiles)))))) ;; sample format Index: foodiary =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scripts/foodiary,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** foodiary 14 Dec 2007 19:36:40 -0000 1.1 --- foodiary 24 Mar 2009 18:31:02 -0000 1.2 *************** *** 107,111 **** (if ext ext ! (soundfile-filetype (car infiles)))))) ;; sample format --- 107,111 ---- (if ext ext ! (soundfile-type (car infiles)))))) ;; sample format Index: foocat =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scripts/foocat,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** foocat 14 Dec 2007 19:36:40 -0000 1.1 --- foocat 24 Mar 2009 18:31:02 -0000 1.2 *************** *** 80,84 **** (if ext ext ! (soundfile-filetype (car infiles)))))) ;; sample format --- 80,84 ---- (if ext ext ! (soundfile-type (car infiles)))))) ;; sample format Index: foojoin =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scripts/foojoin,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** foojoin 7 Jan 2008 21:20:03 -0000 1.1 --- foojoin 24 Mar 2009 18:31:02 -0000 1.2 *************** *** 85,89 **** (if ext ext ! (soundfile-filetype (car infiles)))))) ;; sample format --- 85,89 ---- (if ext ext ! (soundfile-type (car infiles)))))) ;; sample format |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:20
|
Update of /cvsroot/foo/foo/elkfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/src Modified Files: soundfile.m Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: soundfile.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/soundfile.m,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** soundfile.m 4 Apr 2007 14:36:04 -0000 1.10 --- soundfile.m 24 Mar 2009 18:31:02 -0000 1.11 *************** *** 367,371 **** SND_FUNC(P_Soundfile_Srate, SND_SRATE) ! SND_FUNC(P_Soundfile_Filetype, SND_FILETYPE) SND_FUNC(P_Soundfile_Format, SND_FORMAT) SND_FUNC(P_Soundfile_Length, SND_LENGTH) --- 367,371 ---- SND_FUNC(P_Soundfile_Srate, SND_SRATE) ! SND_FUNC(P_Soundfile_Type, SND_FILETYPE) SND_FUNC(P_Soundfile_Format, SND_FORMAT) SND_FUNC(P_Soundfile_Length, SND_LENGTH) *************** *** 496,500 **** DP(P_Soundfile_Srate, "foo:soundfile-srate", 1, 1, EVAL); DP(P_Soundfile_Channels, "foo:soundfile-channels", 1, 1, EVAL); ! DP(P_Soundfile_Filetype, "foo:soundfile-filetype", 1, 1, EVAL); DP(P_Soundfile_Play, "foo:soundfile-play", 1, 5, VARARGS); --- 496,500 ---- DP(P_Soundfile_Srate, "foo:soundfile-srate", 1, 1, EVAL); DP(P_Soundfile_Channels, "foo:soundfile-channels", 1, 1, EVAL); ! DP(P_Soundfile_Type, "foo:soundfile-type", 1, 1, EVAL); DP(P_Soundfile_Play, "foo:soundfile-play", 1, 5, VARARGS); |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:20
|
Update of /cvsroot/foo/foo/elkfoo/scm/control/interface-lib In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/scm/control/interface-lib Modified Files: sp-patchgen-funs.foo Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: sp-patchgen-funs.foo =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scm/control/interface-lib/sp-patchgen-funs.foo,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** sp-patchgen-funs.foo 10 Apr 2007 14:12:12 -0000 1.3 --- sp-patchgen-funs.foo 24 Mar 2009 18:31:02 -0000 1.4 *************** *** 112,119 **** (define (ParseTypeFormat Type Format) (let ((aux)) ! (if (not Type) (set! Type foo-default-soundfile-filetype) (set! aux (ParseFormat Type)) (if aux (begin (set! Format aux) ! (set! Type foo-default-soundfile-filetype)) (set! Type (ParseType Type)))) (if (not Format) --- 112,119 ---- (define (ParseTypeFormat Type Format) (let ((aux)) ! (if (not Type) (set! Type (foo-default-soundfile-type)) (set! aux (ParseFormat Type)) (if aux (begin (set! Format aux) ! (set! Type (foo-default-soundfile-type))) (set! Type (ParseType Type)))) (if (not Format) |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:17
|
Update of /cvsroot/foo/foo/elkfoo/scm/kernel In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/scm/kernel Modified Files: elkfoo.scm Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: elkfoo.scm =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scm/kernel/elkfoo.scm,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** elkfoo.scm 26 Aug 2005 19:40:50 -0000 1.8 --- elkfoo.scm 24 Mar 2009 18:31:02 -0000 1.9 *************** *** 70,78 **** (define set-foo-default-bsize! foo:set-default-bsize!) ! (define foo-default-soundfile-format 'short) ! (define foo-default-soundfile-filetype 'aiff) ! (define foo-default-play-command "sndfile-play") ! (define foo-default-edit-command "snd") ;;; --- 70,120 ---- (define set-foo-default-bsize! foo:set-default-bsize!) ! ; default format ! (define foo:default-soundfile-format) ! (define foo:set-default-soundfile-format!) ! (let ((default-soundfile-format 'short)) ! (set! foo:default-soundfile-format ! (lambda () default-soundfile-format)) ! (set! foo:set-default-soundfile-format! ! (lambda (x) ! (if (string? x) (set! x (string->symbol y))) ! (set! default-soundfile-format x)))) ! (define foo-default-soundfile-format foo:default-soundfile-format) ! (define set-foo-default-soundfile-format! foo:set-default-soundfile-format!) ! ! ; default type ! (define foo:default-soundfile-type) ! (define foo:set-default-soundfile-type!) ! (let ((default-soundfile-type 'aiff)) ! (set! foo:default-soundfile-type ! (lambda () default-soundfile-type)) ! (set! foo:set-default-soundfile-type! ! (lambda (x) ! (if (string? x) (set! x (string->symbol x))) ! (set! default-soundfile-type x)))) ! (define foo-default-soundfile-type foo:default-soundfile-type) ! (define set-foo-default-soundfile-type! foo:set-default-soundfile-type!) ! ; default player ! (define foo:default-play-command) ! (define foo:set-default-play-command!) ! (let ((default-play-command "sndfile-play")) ! (set! foo:default-play-command ! (lambda () default-play-command)) ! (set! foo:set-default-play-command! ! (lambda (x) (set! default-play-command x)))) ! (define foo-default-play-command foo:default-play-command) ! (define set-foo-default-play-command! foo:set-default-play-command!) ! ! ; default editor ! (define foo:default-edit-command) ! (define foo:set-default-edit-command!) ! (let ((default-edit-command "snd")) ! (set! foo:default-edit-command ! (lambda () default-edit-command)) ! (set! foo:set-default-edit-command! ! (lambda (x) (set! default-edit-command x)))) ! (define foo-default-edit-command foo:default-edit-command) ! (define set-foo-default-edit-command! foo:set-default-edit-command!) ;;; *************** *** 221,238 **** (define soundfile-srate foo:soundfile-srate) (define soundfile-length foo:soundfile-length) ! (define soundfile-filetype foo:soundfile-filetype) (define soundfile-play foo:soundfile-play) ! (define (make-soundfile name filetype sampleformat samplingrate channels) (set! name (tilde-expand name)) ! (foo:make-soundfile name filetype sampleformat samplingrate channels)) ! (define (create-soundfile name filetype sampleformat samplingrate channels) (set! name (tilde-expand name)) (if (file-exists? name) (system (string-append "rm -rf " name))) ! (foo:make-soundfile name filetype sampleformat samplingrate channels)) --- 263,280 ---- (define soundfile-srate foo:soundfile-srate) (define soundfile-length foo:soundfile-length) ! (define soundfile-type foo:soundfile-type) (define soundfile-play foo:soundfile-play) ! (define (make-soundfile name type sampleformat samplingrate channels) (set! name (tilde-expand name)) ! (foo:make-soundfile name type sampleformat samplingrate channels)) ! (define (create-soundfile name type sampleformat samplingrate channels) (set! name (tilde-expand name)) (if (file-exists? name) (system (string-append "rm -rf " name))) ! (foo:make-soundfile name type sampleformat samplingrate channels)) *************** *** 252,256 **** "/foo" (number->string (getpid)) ! (foo:soundfile-type-extension foo-default-soundfile-filetype))) (define (foo:cleanup) --- 294,298 ---- "/foo" (number->string (getpid)) ! (foo:soundfile-type-extension (foo-default-soundfile-type)))) (define (foo:cleanup) *************** *** 297,301 **** (substring path 0 (1+ (foo:string-rindex path #\/)))) ! (define (foo:synthesize channels duration filename filetype sampleformat srate thunk) (let ((c (make-context channels)) (d (foo:dirname filename))) --- 339,343 ---- (substring path 0 (1+ (foo:string-rindex path #\/)))) ! (define (foo:synthesize channels duration filename type sampleformat srate thunk) (let ((c (make-context channels)) (d (foo:dirname filename))) *************** *** 303,307 **** (if (not (file-exists? d)) (system (string-append "mkdir -p " d)))) ! (create-soundfile filename filetype sampleformat srate channels) (with-context c thunk) (let ((start 0) (finish 0) (done 0)) --- 345,349 ---- (if (not (file-exists? d)) (system (string-append "mkdir -p " d)))) ! (create-soundfile filename type sampleformat srate channels) (with-context c thunk) (let ((start 0) (finish 0) (done 0)) *************** *** 317,321 **** (pf (- finish start) 7) (pf (/ (- finish start) done) 7) ! (pf srate 7) filename filetype sampleformat))) #v) --- 359,363 ---- (pf (- finish start) 7) (pf (/ (- finish start) done) 7) ! (pf srate 7) filename type sampleformat))) #v) *************** *** 324,329 **** ,d (foo:test-file-name) ! foo-default-soundfile-filetype ! foo-default-soundfile-format (foo-default-srate) (lambda () ,@e))) --- 366,371 ---- ,d (foo:test-file-name) ! (foo-default-soundfile-type) ! (foo-default-soundfile-format) (foo-default-srate) (lambda () ,@e))) *************** *** 347,351 **** string-append (cons ! (string-append foo-default-play-command " ") (if (null? name) (list (foo:test-file-name)) --- 389,393 ---- string-append (cons ! (string-append (foo-default-play-command) " ") (if (null? name) (list (foo:test-file-name)) *************** *** 367,371 **** (system (string-append ! foo-default-edit-command " " (if (null? name) --- 409,413 ---- (system (string-append ! (foo-default-edit-command) " " (if (null? name) |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:10
|
Update of /cvsroot/foo/foo/elkfoo In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184 Modified Files: configure.ac Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: configure.ac =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/configure.ac,v retrieving revision 1.18 retrieving revision 1.19 diff -C2 -d -r1.18 -r1.19 *** configure.ac 14 Dec 2007 19:41:44 -0000 1.18 --- configure.ac 24 Mar 2009 18:31:01 -0000 1.19 *************** *** 50,61 **** # check for foundation library to use # os dependent check case "${target_os}" in *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! enable_gnustep=no; ;; *linux*) AC_DEFINE(SYS_LINUX, 1, Define if the system is Linux) ! enable_gnustep=yes; ;; *) --- 50,65 ---- # check for foundation library to use # os dependent check + # adjust typical os-specific paths case "${target_os}" in *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! enable_gnustep=no ! # for macports ! CPPFLAGS="$CPPFLAGS -I/opt/local/include" ! LDFLAGS="$LDFLAGS -L/opt/local/lib" ;; *linux*) AC_DEFINE(SYS_LINUX, 1, Define if the system is Linux) ! enable_gnustep=yes ;; *) |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:08
|
Update of /cvsroot/foo/foo/elkfoo/scm In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13184/scm Modified Files: next-compat.foo Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: next-compat.foo =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scm/next-compat.foo,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** next-compat.foo 10 Apr 2007 14:07:16 -0000 1.4 --- next-compat.foo 24 Mar 2009 18:31:02 -0000 1.5 *************** *** 1,6 **** ;; foo-2.1 (NeXTStep) compatibility for foo ! (set! foo-default-soundfile-format 'short) ! (set! foo-default-soundfile-filetype 'snd) (set! create-soundfile --- 1,6 ---- ;; foo-2.1 (NeXTStep) compatibility for foo ! (set-foo-default-soundfile-format! 'short) ! (set-foo-default-soundfile-type! 'snd) (set! create-soundfile *************** *** 10,14 **** (system (string-append "rm -rf " name))) ;; note: comment is ignored (not supported anymore) ! (foo:make-soundfile name foo-default-soundfile-filetype sampleformat samplingrate channels))) (set! make-soundfile --- 10,14 ---- (system (string-append "rm -rf " name))) ;; note: comment is ignored (not supported anymore) ! (foo:make-soundfile name (foo-default-soundfile-type) sampleformat samplingrate channels))) (set! make-soundfile *************** *** 16,20 **** (set! name (tilde-expand name)) ;; note: comment is ignored (not supported anymore) ! (foo:make-soundfile name foo-default-soundfile-filetype sampleformat samplingrate channels))) (set! foo:synthesize --- 16,20 ---- (set! name (tilde-expand name)) ;; note: comment is ignored (not supported anymore) ! (foo:make-soundfile name (foo-default-soundfile-type) sampleformat samplingrate channels))) (set! foo:synthesize *************** *** 46,50 **** (foo-default-srate) (foo:test-file-name) ! foo-default-soundfile-format (lambda () ,@e))) --- 46,50 ---- (foo-default-srate) (foo:test-file-name) ! (foo-default-soundfile-format) (lambda () ,@e))) |
From: Martin R. <ru...@us...> - 2009-03-24 18:31:05
|
Update of /cvsroot/foo/foo/libfoo In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv13158 Modified Files: configure.ac Log Message: added macports paths /opt/local/xxx to default search path on darwin Index: configure.ac =================================================================== RCS file: /cvsroot/foo/foo/libfoo/configure.ac,v retrieving revision 1.18 retrieving revision 1.19 diff -C2 -d -r1.18 -r1.19 *** configure.ac 14 Dec 2007 14:26:47 -0000 1.18 --- configure.ac 24 Mar 2009 18:30:46 -0000 1.19 *************** *** 83,94 **** # check for foundation library to use # os dependent check case "${target_os}" in *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! enable_gnustep=no; ;; *linux*) AC_DEFINE(SYS_LINUX, 1, Define if the system is Linux) ! enable_gnustep=yes; ;; *) --- 83,98 ---- # check for foundation library to use # os dependent check + # adjust typical os-specific paths case "${target_os}" in *darwin*) AC_DEFINE(SYS_DARWIN, 1, Define if the system is Darwin) ! enable_gnustep=no ! # for macports ! CPPFLAGS="$CPPFLAGS -I/opt/local/include" ! LDFLAGS="$LDFLAGS -L/opt/local/lib" ;; *linux*) AC_DEFINE(SYS_LINUX, 1, Define if the system is Linux) ! enable_gnustep=yes ;; *) |
Update of /cvsroot/foo/foo/libfoo/modules In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv29085/modules Modified Files: FOOMAllpass.m FOOMBandlimitedNoise.h FOOMComb.m FOOMFof.m FOOMLookup.h FOOMLookup.m FOOMOscillator.m FOOMReadBpf.m FOOMReadSnd.h FOOMReadSnd.m FOOMReadTranspSnd.h FOOMReadTranspSnd.m FOOMReverb.h FOOMReverb8.h FOOMTransposeBpf.h FOOMTransposeBpf.m FOOMTransposeSnd.h FOOMTransposeSnd.m Log Message: fixed another memory leak. lots of cosmetic corrections Index: FOOMLookup.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMLookup.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMLookup.h 14 Dec 2007 14:16:12 -0000 1.1 --- FOOMLookup.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 45,50 **** @interface FOOMLookup : FOOEagerModule <NSCoding> { ! /* Substrate *substrate; // statically typed */ ! id _substrate; sample_t *_samples; int _offset; --- 45,49 ---- @interface FOOMLookup : FOOEagerModule <NSCoding> { ! FOOSubstrate *_substrate; sample_t *_samples; int _offset; Index: FOOMLookup.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMLookup.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMLookup.m 14 Dec 2007 14:16:12 -0000 1.1 --- FOOMLookup.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 57,61 **** } ! _substrate = substr; _taps = n; _count = SAMPLE_BUFFER_SIZE; --- 57,61 ---- } ! _substrate = RETAIN(substr); _taps = n; _count = SAMPLE_BUFFER_SIZE; *************** *** 71,74 **** --- 71,75 ---- { NSZoneFree([self zone], _samples); + RELEASE(_substrate); [super dealloc]; } Index: FOOMReadBpf.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReadBpf.m,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** FOOMReadBpf.m 22 Mar 2009 01:11:40 -0000 1.2 --- FOOMReadBpf.m 23 Mar 2009 00:08:15 -0000 1.3 *************** *** 51,55 **** FOO_ERROR(YES, self); } ! _substrate = substr; _beginT = TIMEFRAME; _firsttime = YES; --- 51,55 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substr); _beginT = TIMEFRAME; _firsttime = YES; *************** *** 62,65 **** --- 62,72 ---- + - (void) dealloc + { + RELEASE(_substrate); + [super dealloc]; + } + + - reset { Index: FOOMReadTranspSnd.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReadTranspSnd.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReadTranspSnd.h 14 Dec 2007 14:16:14 -0000 1.1 --- FOOMReadTranspSnd.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 48,53 **** @interface FOOMReadTranspSnd : FOOEagerModule <NSCoding> { ! id _substrate; /* input */ ! /* Substrate *substrate; /\* input *\/ */ sample_t *_samples; /* cache */ int _offset; /* cache's sample position in input */ --- 48,52 ---- @interface FOOMReadTranspSnd : FOOEagerModule <NSCoding> { ! FOOSubstrate *_substrate; /* input */ sample_t *_samples; /* cache */ int _offset; /* cache's sample position in input */ *************** *** 63,67 **** } ! - initializeWith: substr; - initializeTaps: (int)n; - initPos; --- 62,66 ---- } ! - initializeWith: (FOOSubstrate *) substr; - initializeTaps: (int)n; - initPos; Index: FOOMTransposeSnd.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMTransposeSnd.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMTransposeSnd.m 14 Dec 2007 14:16:16 -0000 1.1 --- FOOMTransposeSnd.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 45,49 **** @implementation FOOMTransposeSnd ! - initializeWith: substr taps: (int) n { if ([substr isKindOfClass: [FOOSoundFile class]] == NO && --- 45,49 ---- @implementation FOOMTransposeSnd ! - (id) initializeWith: (FOOSubstrate *)substr taps: (int) n { if ([substr isKindOfClass: [FOOSoundFile class]] == NO && *************** *** 54,58 **** } ! _substrate = substr; _beginT = TIMEFRAME; _taps = n; --- 54,58 ---- } ! _substrate = RETAIN(substr); _beginT = TIMEFRAME; _taps = n; *************** *** 88,91 **** --- 88,92 ---- NSZoneFree([self zone], _samples); } + RELEASE(_substrate); [super dealloc]; } Index: FOOMTransposeBpf.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMTransposeBpf.m,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** FOOMTransposeBpf.m 22 Mar 2009 17:18:33 -0000 1.2 --- FOOMTransposeBpf.m 23 Mar 2009 00:08:15 -0000 1.3 *************** *** 42,46 **** ! - initializeWith: substr { if ([substr isKindOfClass: [FOOBreakpointFunction class]] == NO) --- 42,46 ---- ! - (id) initializeWith: (FOOBreakpointFunction *)substr { if ([substr isKindOfClass: [FOOBreakpointFunction class]] == NO) *************** *** 48,52 **** FOO_ERROR(YES, self); } ! _substrate = substr; _beginT = TIMEFRAME; [self doInit]; --- 48,52 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substr); _beginT = TIMEFRAME; [self doInit]; *************** *** 56,59 **** --- 56,66 ---- + - (void) dealloc + { + RELEASE(_substrate); + [super dealloc]; + } + + - doInit { Index: FOOMReadTranspSnd.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReadTranspSnd.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReadTranspSnd.m 14 Dec 2007 14:16:14 -0000 1.1 --- FOOMReadTranspSnd.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 58,62 **** ! - initializeWith: substr { if ([substr isKindOfClass: [FOOSoundFile class]] == NO && --- 58,62 ---- ! - (id) initializeWith: (FOOSubstrate *)substr { if ([substr isKindOfClass: [FOOSoundFile class]] == NO && *************** *** 66,70 **** FOO_ERROR(YES, self); } ! _substrate = substr; _beginT = TIMEFRAME; _taps = 0; --- 66,70 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substr); _beginT = TIMEFRAME; _taps = 0; *************** *** 75,79 **** ! - initializeTaps: (int)n { _taps = n; --- 75,79 ---- ! - (id) initializeTaps: (int)n { _taps = n; *************** *** 95,99 **** ! - initializeWith:substr taps: (int)n { [self initializeWith:substr]; --- 95,99 ---- ! - (id) initializeWith: (FOOSubstrate *)substr taps: (int)n { [self initializeWith:substr]; *************** *** 110,114 **** NSZoneFree([self zone], _samples); } ! [super dealloc]; } --- 110,114 ---- NSZoneFree([self zone], _samples); } ! RELEASE(_substrate); [super dealloc]; } Index: FOOMTransposeBpf.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMTransposeBpf.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMTransposeBpf.h 14 Dec 2007 14:16:15 -0000 1.1 --- FOOMTransposeBpf.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 45,50 **** @interface FOOMTransposeBpf : FOOEagerModule <NSCoding> { ! /* Substrate *substrate; */ ! id _substrate; int _begin; BOOL _end; --- 45,49 ---- @interface FOOMTransposeBpf : FOOEagerModule <NSCoding> { ! FOOBreakpointFunction *_substrate; int _begin; BOOL _end; *************** *** 58,62 **** } ! - initializeWith: substr; - doInit; --- 57,61 ---- } ! - (id) initializeWith: (FOOBreakpointFunction *)substr; - doInit; Index: FOOMTransposeSnd.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMTransposeSnd.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMTransposeSnd.h 14 Dec 2007 14:16:16 -0000 1.1 --- FOOMTransposeSnd.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 49,54 **** @interface FOOMTransposeSnd : FOOEagerModule <NSCoding> { ! /* Substrate *substrate; /\* input *\/ */ ! id _substrate; sample_t *_samples; /* cache */ int _offset; /* cache's sample position in input */ --- 49,53 ---- @interface FOOMTransposeSnd : FOOEagerModule <NSCoding> { ! FOOSubstrate *_substrate; sample_t *_samples; /* cache */ int _offset; /* cache's sample position in input */ *************** *** 63,67 **** } ! - initializeWith: substr taps: (int)n; - initPos; --- 62,66 ---- } ! - (id) initializeWith: (FOOSubstrate *)substr taps: (int)n; - initPos; Index: FOOMComb.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMComb.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMComb.m 14 Dec 2007 14:16:08 -0000 1.1 --- FOOMComb.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 55,60 **** - (void) dealloc { ! NSZoneFree([self zone], _line); ! _line = NULL; [super dealloc]; --- 55,63 ---- - (void) dealloc { ! if (_line) ! { ! NSZoneFree([self zone], _line); ! _line = NULL; ! } [super dealloc]; *************** *** 91,103 **** - (BOOL) activate { - // if (INPUTS < 2 || [INPUT(0) activate] == NO || [INPUT(1) activate] == NO) - // { - // _active = NO; - // } - // else - // { - // _active = YES; - // } - // take feedback in account [INPUT(0) activate]; --- 94,97 ---- Index: FOOMReverb8.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReverb8.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReverb8.h 14 Dec 2007 14:16:15 -0000 1.1 --- FOOMReverb8.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 64,69 **** @interface FOOMReverb8 : FOOEagerModule <NSCoding> { ! NSMutableArray *_buffers; // statically typed ! NSMutableArray *_outputs; // statically typed delay8_t **_delays; filter8_t **_filters; --- 64,69 ---- @interface FOOMReverb8 : FOOEagerModule <NSCoding> { ! NSMutableArray *_buffers; ! NSMutableArray *_outputs; delay8_t **_delays; filter8_t **_filters; Index: FOOMOscillator.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMOscillator.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMOscillator.m 14 Dec 2007 14:16:14 -0000 1.1 --- FOOMOscillator.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 137,141 **** { RELEASE(_filename); - [super dealloc]; } --- 137,140 ---- Index: FOOMReverb.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReverb.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReverb.h 14 Dec 2007 14:16:15 -0000 1.1 --- FOOMReverb.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 59,64 **** @interface FOOMReverb : FOOEagerModule <NSCoding> { ! NSMutableArray *_buffers; // statically typed ! NSMutableArray *_outputs; // statically typed delay_t **_delays; filter_t **_filters; --- 59,64 ---- @interface FOOMReverb : FOOEagerModule <NSCoding> { ! NSMutableArray *_buffers; ! NSMutableArray *_outputs; delay_t **_delays; filter_t **_filters; Index: FOOMBandlimitedNoise.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMBandlimitedNoise.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMBandlimitedNoise.h 14 Dec 2007 14:16:08 -0000 1.1 --- FOOMBandlimitedNoise.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 47,51 **** int _init; int _taps; ! FOOLookupTable *_table; // statically typed double *_samples; double _phase; --- 47,51 ---- int _init; int _taps; ! FOOLookupTable *_table; double *_samples; double _phase; Index: FOOMReadSnd.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReadSnd.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReadSnd.h 14 Dec 2007 14:16:14 -0000 1.1 --- FOOMReadSnd.h 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 48,53 **** @interface FOOMReadSnd : FOOEagerModule <NSCoding> { ! /* Substrate *substrate; */ ! id _substrate; int _begin; int _end; --- 48,52 ---- @interface FOOMReadSnd : FOOEagerModule <NSCoding> { ! FOOSubstrate *_substrate; int _begin; int _end; Index: FOOMAllpass.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMAllpass.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMAllpass.m 14 Dec 2007 14:16:08 -0000 1.1 --- FOOMAllpass.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 61,73 **** - (BOOL) activate { - // if (INPUTS < 2 || [INPUT(0) activate] == NO || [INPUT(1) activate] == NO) - // { - // _active = NO; - // } - // else - // { - // _active = YES; - // } - // take feedback in account [INPUT(0) activate]; --- 61,64 ---- Index: FOOMReadSnd.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMReadSnd.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMReadSnd.m 14 Dec 2007 14:16:14 -0000 1.1 --- FOOMReadSnd.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 49,53 **** FOO_ERROR(YES, self); } ! _substrate = substr; _beginT = TIMEFRAME; _position = 0; --- 49,53 ---- FOO_ERROR(YES, self); } ! _substrate = RETAIN(substr); _beginT = TIMEFRAME; _position = 0; *************** *** 57,60 **** --- 57,67 ---- + - (void) dealloc + { + RELEASE(_substrate); + [super dealloc]; + } + + - reset { Index: FOOMFof.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMFof.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMFof.m 14 Dec 2007 14:16:11 -0000 1.1 --- FOOMFof.m 23 Mar 2009 00:08:15 -0000 1.2 *************** *** 103,107 **** if (p[i].next != NULL) { - // (char *)(p[i].next) += offset; // cast as lvalue p[i].next += offset; } --- 103,106 ---- *************** *** 117,121 **** if (x->used.next != NULL) { - // (char *)(x->used.next) += offset; // cast as lvalue x->used.next += offset; } --- 116,119 ---- *************** *** 356,360 **** { fof_free_list(&(_fof.list)); - [super dealloc]; } --- 354,357 ---- |
From: Martin R. <ru...@us...> - 2009-03-23 00:08:34
|
Update of /cvsroot/foo/foo/libfoo/FOO In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv29085/FOO Modified Files: FOOOutputManager.h Log Message: fixed another memory leak. lots of cosmetic corrections Index: FOOOutputManager.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOOutputManager.h,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOOOutputManager.h 22 Mar 2009 18:51:31 -0000 1.5 --- FOOOutputManager.h 23 Mar 2009 00:08:15 -0000 1.6 *************** *** 88,92 **** - (FOOOutputManager *) reset; - (double) getMaximum: (int)chan; - - (FOOObjectManager *) removeAllObjects; @end --- 88,91 ---- |
From: Martin R. <ru...@us...> - 2009-03-23 00:08:26
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv29085/src Modified Files: FOOModule.m Log Message: fixed another memory leak. lots of cosmetic corrections Index: FOOModule.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOModule.m,v retrieving revision 1.11 retrieving revision 1.12 diff -C2 -d -r1.11 -r1.12 *** FOOModule.m 22 Mar 2009 18:59:22 -0000 1.11 --- FOOModule.m 23 Mar 2009 00:08:15 -0000 1.12 *************** *** 61,64 **** --- 61,71 ---- + - (void) dealloc + { + RELEASE(_inputs); + [super dealloc]; + } + + - (FOOModule *) reset { |
From: Martin R. <ru...@us...> - 2009-03-22 18:59:34
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv19564 Modified Files: FOOContextPart.m FOOEagerModule.m FOOEagerModuleManager.m FOOModule.m FOOModuleManager.m FOONilModule.m FOORegion.m FOOSoundStream.m FOOSubstrate.m FOOSubstrateManager.m Log Message: cosmetic changes Index: FOOSubstrateManager.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOSubstrateManager.m,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** FOOSubstrateManager.m 28 Feb 2005 16:37:22 -0000 1.4 --- FOOSubstrateManager.m 22 Mar 2009 18:59:22 -0000 1.5 *************** *** 70,74 **** ! - (FOOSubstrateManager *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 70,74 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOORegion.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOORegion.m,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** FOORegion.m 30 Sep 2007 12:26:44 -0000 1.7 --- FOORegion.m 22 Mar 2009 18:59:22 -0000 1.8 *************** *** 165,169 **** ! - (FOORegion *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 165,169 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOONilModule.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOONilModule.m,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOONilModule.m 28 Feb 2005 16:37:22 -0000 1.5 --- FOONilModule.m 22 Mar 2009 18:59:22 -0000 1.6 *************** *** 56,60 **** ! - (FOONilModule *) initWithCoder: (NSCoder *)coder { // self = [super initWithCoder: coder]; --- 56,60 ---- ! - (id) initWithCoder: (NSCoder *)coder { // self = [super initWithCoder: coder]; Index: FOOContextPart.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOContextPart.m,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** FOOContextPart.m 28 Feb 2005 16:37:22 -0000 1.4 --- FOOContextPart.m 22 Mar 2009 18:59:22 -0000 1.5 *************** *** 97,101 **** ! - (FOOContextPart *) initWithCoder: (NSCoder *)coder { self = [super init]; --- 97,101 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super init]; Index: FOOModule.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOModule.m,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** FOOModule.m 14 Dec 2007 14:26:47 -0000 1.10 --- FOOModule.m 22 Mar 2009 18:59:22 -0000 1.11 *************** *** 280,284 **** ! - (FOOModule *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 280,284 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOEagerModuleManager.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOEagerModuleManager.m,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** FOOEagerModuleManager.m 28 Feb 2005 16:37:22 -0000 1.4 --- FOOEagerModuleManager.m 22 Mar 2009 18:59:22 -0000 1.5 *************** *** 70,74 **** ! - (FOOEagerModuleManager *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 70,74 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOSubstrate.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOSubstrate.m,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** FOOSubstrate.m 30 Sep 2007 12:26:44 -0000 1.7 --- FOOSubstrate.m 22 Mar 2009 18:59:22 -0000 1.8 *************** *** 135,139 **** ! - (FOOSubstrate *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 135,139 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOSoundStream.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOSoundStream.m,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** FOOSoundStream.m 30 Sep 2007 12:26:44 -0000 1.7 --- FOOSoundStream.m 22 Mar 2009 18:59:22 -0000 1.8 *************** *** 157,161 **** ! - (FOOSoundStream *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 157,161 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOEagerModule.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOEagerModule.m,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOOEagerModule.m 28 Feb 2005 16:37:22 -0000 1.5 --- FOOEagerModule.m 22 Mar 2009 18:59:22 -0000 1.6 *************** *** 75,79 **** ! - (FOOEagerModule *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 75,79 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOModuleManager.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOModuleManager.m,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOOModuleManager.m 28 Feb 2005 16:37:22 -0000 1.5 --- FOOModuleManager.m 22 Mar 2009 18:59:22 -0000 1.6 *************** *** 74,78 **** ! - invalidatePrint { [_objects makeObjectsPerformSelector: @selector(invalidatePrint)]; --- 74,78 ---- ! - (FOOModuleManager *) invalidatePrint { [_objects makeObjectsPerformSelector: @selector(invalidatePrint)]; *************** *** 145,149 **** ! - (FOOModuleManager *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 145,149 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; |
From: Martin R. <ru...@us...> - 2009-03-22 18:51:42
|
Update of /cvsroot/foo/foo/libfoo/FOO In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv18699/libfoo/FOO Modified Files: FOOOutputManager.h Log Message: fixed possible memleak Index: FOOOutputManager.h =================================================================== RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOOutputManager.h,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** FOOOutputManager.h 28 Feb 2005 16:37:20 -0000 1.4 --- FOOOutputManager.h 22 Mar 2009 18:51:31 -0000 1.5 *************** *** 88,91 **** --- 88,92 ---- - (FOOOutputManager *) reset; - (double) getMaximum: (int)chan; + - (FOOObjectManager *) removeAllObjects; @end |
From: Martin R. <ru...@us...> - 2009-03-22 18:51:42
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv18699/libfoo/src Modified Files: FOOContext.m FOOObjectManager.m FOOOutput.m FOOOutputManager.m FOOSoundFile.m Log Message: fixed possible memleak Index: FOOOutputManager.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOOutputManager.m,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOOOutputManager.m 25 Jun 2005 13:20:56 -0000 1.5 --- FOOOutputManager.m 22 Mar 2009 18:51:31 -0000 1.6 *************** *** 67,84 **** RELEASE(_filename); } if (_buffers != nil) { - [_buffers removeAllObjects]; RELEASE(_buffers); } if (_caches != nil) { ! [_caches removeAllObjects]; ! RELEASE(_caches); } if (_outputs != nil) { ! [_outputs removeAllObjects]; ! RELEASE(_outputs); } [super dealloc]; --- 67,89 ---- RELEASE(_filename); } + if (_soundfile != nil) + { + if ([_soundfile isOpen] == YES) + { + [_soundfile close]; + } + RELEASE(_soundfile); + } if (_buffers != nil) { RELEASE(_buffers); } if (_caches != nil) { ! RELEASE(_caches); } if (_outputs != nil) { ! RELEASE(_outputs); } [super dealloc]; *************** *** 346,349 **** --- 351,373 ---- + - (FOOObjectManager *) removeAllObjects + { + if (_buffers != nil) + { + [_buffers removeAllObjects]; + } + if (_caches != nil) + { + [_caches removeAllObjects]; + } + if (_outputs != nil) + { + [_outputs removeAllObjects]; + } + + return [super removeAllObjects]; + } + + /* * archiving methods *************** *** 369,373 **** ! - (FOOOutputManager *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 393,397 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOObjectManager.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOObjectManager.m,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** FOOObjectManager.m 28 Feb 2005 16:37:22 -0000 1.6 --- FOOObjectManager.m 22 Mar 2009 18:51:31 -0000 1.7 *************** *** 115,118 **** --- 115,119 ---- + /* * archiving methods *************** *** 135,139 **** ! - (FOOObjectManager *) initWithCoder: (NSCoder *)coder { self = [super init]; --- 136,140 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super init]; Index: FOOContext.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOContext.m,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** FOOContext.m 25 Jun 2005 13:20:56 -0000 1.10 --- FOOContext.m 22 Mar 2009 18:51:31 -0000 1.11 *************** *** 178,187 **** - (void) dealloc { ! RELEASE([_moduleManager removeAllObjects]); ! RELEASE([_eagerModuleManager removeAllObjects]); ! RELEASE([_substrateManager removeAllObjects]); ! RELEASE([_volatileBufferManager removeAllObjects]); ! RELEASE([_sharedBufferManager removeAllObjects]); ! RELEASE([_outputManager removeAllObjects]); RELEASE(_nilModule); [super dealloc]; --- 178,187 ---- - (void) dealloc { ! RELEASE(_moduleManager); ! RELEASE(_eagerModuleManager); ! RELEASE(_substrateManager); ! RELEASE(_volatileBufferManager); ! RELEASE(_sharedBufferManager); ! RELEASE(_outputManager); RELEASE(_nilModule); [super dealloc]; *************** *** 506,510 **** ! - (FOOContext *) initWithCoder: (NSCoder *)coder { self = [super init]; --- 506,510 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super init]; Index: FOOSoundFile.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOSoundFile.m,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** FOOSoundFile.m 7 Nov 2007 20:28:13 -0000 1.10 --- FOOSoundFile.m 22 Mar 2009 18:51:31 -0000 1.11 *************** *** 95,99 **** { if ([self isOpen]) ! { [self close]; } --- 95,99 ---- { if ([self isOpen]) ! { [self close]; } *************** *** 897,901 **** ! - (FOOSoundFile *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 897,901 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; Index: FOOOutput.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOOutput.m,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** FOOOutput.m 28 Feb 2005 16:37:22 -0000 1.4 --- FOOOutput.m 22 Mar 2009 18:51:31 -0000 1.5 *************** *** 127,131 **** ! - (FOOOutput *) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; --- 127,131 ---- ! - (id) initWithCoder: (NSCoder *)coder { self = [super initWithCoder: coder]; |
From: Martin R. <ru...@us...> - 2009-03-22 17:18:44
|
Update of /cvsroot/foo/foo/libfoo/modules In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv9598/libfoo/modules Modified Files: FOOMTransposeBpf.m Log Message: smaller cosmetic cleanups Index: FOOMTransposeBpf.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/modules/FOOMTransposeBpf.m,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** FOOMTransposeBpf.m 14 Dec 2007 14:16:16 -0000 1.1 --- FOOMTransposeBpf.m 22 Mar 2009 17:18:33 -0000 1.2 *************** *** 38,43 **** #include "FOOMTransposeBpf.h" - #define FIRST_TIME -1 - @implementation FOOMTransposeBpf --- 38,41 ---- |
From: Martin R. <ru...@us...> - 2009-03-22 17:18:44
|
Update of /cvsroot/foo/foo/elkfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv9598/elkfoo/src Modified Files: bpf.m Log Message: smaller cosmetic cleanups Index: bpf.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/bpf.m,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** bpf.m 22 Mar 2009 01:12:32 -0000 1.10 --- bpf.m 22 Mar 2009 17:18:33 -0000 1.11 *************** *** 111,115 **** else { ! alpha = 1; } if (first) --- 111,115 ---- else { ! alpha = 1.; } if (first) |
From: Martin R. <ru...@us...> - 2009-03-22 17:18:38
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv9598/libfoo/src Modified Files: FOOBreakpointFunction.m Log Message: smaller cosmetic cleanups Index: FOOBreakpointFunction.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOBreakpointFunction.m,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** FOOBreakpointFunction.m 22 Mar 2009 01:11:40 -0000 1.6 --- FOOBreakpointFunction.m 22 Mar 2009 17:18:33 -0000 1.7 *************** *** 115,119 **** { lineseg_t *sp; ! int time, lasttime = SEC_TO_SAM(_beginT), first = 1; sample_t value, lastvalue = _firstV; --- 115,119 ---- { lineseg_t *sp; ! int time, lasttime = SEC_TO_SAM(_beginT); sample_t value, lastvalue = _firstV; *************** *** 236,240 **** - (FOOBreakpointFunction *) reverse { ! FOOBreakpointFunction *new = [[FOOBreakpointFunction allocWithZone:[self zone]] init]; lineseg_t *s = _segments, *c, *p; int n = 0; --- 236,240 ---- - (FOOBreakpointFunction *) reverse { ! FOOBreakpointFunction *new = [[FOOBreakpointFunction allocWithZone: [self zone]] init]; lineseg_t *s = _segments, *c, *p; int n = 0; *************** *** 259,263 **** p->delta = 0; p->value = 0; ! // [new setBpf:c begin:[self begin] end:[self size] - [self begin]]; return new; } --- 259,264 ---- p->delta = 0; p->value = 0; ! // [new setBpf: c begin: [self begin] end: [self size] - [self begin]]; ! return new; } *************** *** 358,362 **** ! - (FOOBreakpointFunction *) initWithCoder: (NSCoder *)coder { NSArray *segments; --- 359,363 ---- ! - (id) initWithCoder: (NSCoder *)coder { NSArray *segments; |
From: Martin R. <ru...@us...> - 2009-03-22 01:12:45
|
Update of /cvsroot/foo/foo/elkfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv25072/src Modified Files: bpf.m Log Message: removed superfluous (fingers crossed) Check_Type Index: bpf.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/bpf.m,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** bpf.m 20 Jun 2005 08:57:13 -0000 1.9 --- bpf.m 22 Mar 2009 01:12:32 -0000 1.10 *************** *** 81,150 **** np++; } ! if (np < 2) ! { ! Primitive_Error("at least two break-points expected"); ! } ! GC_Link(points); ! /* rumori 2005-06-19: avoid memleak, therefore AUTORELEASE */ ! bpf = A_Make_Bpf(AUTORELEASE([[FOOBreakpointFunction alloc] init])); ! GC_Unlink; ! zone = [IdOf(bpf) zone]; ! seglist = NSZoneCalloc(zone, np, sizeof(lineseg_t)); ! for (p = points, sp = seglist, i = 0; i < np; i++) ! { ! Check_Type(p, T_Pair); ! pp = Car(p); ! Check_Type(pp, T_Pair); ! time = Get_Double(Car(pp)); ! pp = Cdr(pp); ! Check_Type(pp, T_Pair); ! value = Get_Double(Car(pp)); ! pp = Cdr(pp); ! if (!Nullp(pp)) ! { ! if (i == 0) ! { ! Primitive_Error("illegal first alpha value"); ! } ! Check_Type(pp, T_Pair); ! alpha = Get_Double(Car(pp)); ! } ! else ! { ! alpha = 1; ! } ! if (first) ! { ! begin = time; ! firstvalue = value; ! first = 0; ! } ! else ! { ! if (time <= lasttime) ! { ! Primitive_Error("ascending time values expected"); ! } ! sp->time = time; ! sp->value = value; ! sp->alpha = log(alpha); ! sp->count = -1; ! sp->delta = 0; ! sp++; ! } ! lasttime = time; ! lastvalue = value; ! p = Cdr(p); ! } ! sp->value = 0; ! sp->count = 0; ! sp->delta = 0; ! sp->alpha = 0; ! [IdOf(bpf) setBpf:seglist first:firstvalue begin:begin end:lasttime]; ! BPF_T(bpf)->offset = [IdOf(bpf) beginT]; ! BPF_T(bpf)->length = [IdOf(bpf) sizeT]; ! BPF_T(bpf)->reversed = 0; ! return bpf; } --- 81,149 ---- np++; } ! if (np < 2) ! { ! Primitive_Error("at least two break-points expected"); ! } ! GC_Link(points); ! /* rumori 2005-06-19: avoid memleak, therefore AUTORELEASE */ ! bpf = A_Make_Bpf(AUTORELEASE([[FOOBreakpointFunction alloc] init])); ! GC_Unlink; ! zone = [IdOf(bpf) zone]; ! seglist = NSZoneCalloc(zone, np, sizeof(lineseg_t)); ! for (p = points, sp = seglist, i = 0; i < np; i++) ! { ! pp = Car(p); ! Check_Type(pp, T_Pair); ! time = Get_Double(Car(pp)); ! pp = Cdr(pp); ! Check_Type(pp, T_Pair); ! value = Get_Double(Car(pp)); ! pp = Cdr(pp); ! if (!Nullp(pp)) ! { ! if (i == 0) ! { ! Primitive_Error("illegal first alpha value"); ! } ! Check_Type(pp, T_Pair); ! alpha = Get_Double(Car(pp)); ! } ! else ! { ! alpha = 1; ! } ! if (first) ! { ! begin = time; ! firstvalue = value; ! first = 0; ! } ! else ! { ! if (time <= lasttime) ! { ! Primitive_Error("ascending time values expected"); ! } ! sp->time = time; ! sp->value = value; ! sp->alpha = log(alpha); ! sp->count = -1; ! sp->delta = 0; ! sp++; ! } ! lasttime = time; ! lastvalue = value; ! p = Cdr(p); ! } ! sp->value = 0; ! sp->count = 0; ! sp->delta = 0; ! sp->alpha = 0; ! [IdOf(bpf) setBpf:seglist first:firstvalue begin:begin end:lasttime]; ! BPF_T(bpf)->offset = [IdOf(bpf) beginT]; ! BPF_T(bpf)->length = [IdOf(bpf) sizeT]; ! BPF_T(bpf)->reversed = 0; ! return bpf; } |
From: Martin R. <ru...@us...> - 2009-03-22 01:11:53
|
Update of /cvsroot/foo/foo/libfoo/src In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv25010/src Modified Files: FOOBreakpointFunction.m Log Message: fixed bpf when starting calculation inside bpf (e.g. with ref/off) Index: FOOBreakpointFunction.m =================================================================== RCS file: /cvsroot/foo/foo/libfoo/src/FOOBreakpointFunction.m,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** FOOBreakpointFunction.m 28 Feb 2005 16:37:22 -0000 1.5 --- FOOBreakpointFunction.m 22 Mar 2009 01:11:40 -0000 1.6 *************** *** 169,173 **** NSString *b; ! b = [NSString stringWithFormat: @"beginT = %f, endT = %f\n", _beginT, _endT]; [FOOGlobalsManager schemeOutput: b]; while (sp->count != 0) --- 169,173 ---- NSString *b; ! b = [NSString stringWithFormat: @"firstV = %f, beginT = %f, endT = %f\n", _firstV, _beginT, _endT]; [FOOGlobalsManager schemeOutput: b]; while (sp->count != 0) |