foo-cvs — mailing list for CVS commit messages.

[foo-cvs] last (hopefully) test

[Gerhard E. <ec...@ie...>]

please ignore one more time

[foo-cvs] foo/libfoo/FOO FOOBreakpointFunction.h,1.3,1.4 FOOBuffer.h,1.2,1.3 FOOBufferManager.h,1.3,1.4 FOOContext.h,1.5,1.6 FOOContextPart.h,1.3,1.4 FOOEagerModule.h,1.3,1.4 FOOEagerModuleManager.h,1.3,1.4 FOOFileTable.h,1.2,1.3 FOOGlobal.h,1.4,1.5 FOOGlobalsManager.h,1.6,1.7 FOOLookupTable.h,1.2,1.3 FOOModule.h,1.5,1.6 FOOModuleManager.h,1.3,1.4 FOONilModule.h,1.3,1.4 FOOObject.h,1.2,1.3 FOOObjectManager.h,1.3,1.4 FOOOutput.h,1.3,1.4 FOOOutputManager.h,1.3,1.4 FOORegion.h,1.3,1.4 FOOSineTable.h,1.2,1.3 FOOSineXoverXTable.h,1.2,1.3 FOOSoundFile.h,1.5,1.6 FOOSoundStream.h,1.3,1.4 FOOSubstrate.h,1.3,1.4 FOOSubstrateManager.h,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/FOO
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo/FOO

Modified Files:
	FOOBreakpointFunction.h FOOBuffer.h FOOBufferManager.h 
	FOOContext.h FOOContextPart.h FOOEagerModule.h 
	FOOEagerModuleManager.h FOOFileTable.h FOOGlobal.h 
	FOOGlobalsManager.h FOOLookupTable.h FOOModule.h 
	FOOModuleManager.h FOONilModule.h FOOObject.h 
	FOOObjectManager.h FOOOutput.h FOOOutputManager.h FOORegion.h 
	FOOSineTable.h FOOSineXoverXTable.h FOOSoundFile.h 
	FOOSoundStream.h FOOSubstrate.h FOOSubstrateManager.h 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: FOOObject.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOObject.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOObject.h	6 Aug 2004 00:14:45 -0000	1.2
--- FOOObject.h	28 Feb 2005 16:37:20 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSineXoverXTable.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSineXoverXTable.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOSineXoverXTable.h	4 Aug 2004 06:15:57 -0000	1.2
--- FOOSineXoverXTable.h	28 Feb 2005 16:37:20 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOFileTable.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOFileTable.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOFileTable.h	4 Aug 2004 06:15:57 -0000	1.2
--- FOOFileTable.h	28 Feb 2005 16:37:20 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOGlobalsManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOGlobalsManager.h,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** FOOGlobalsManager.h	17 Aug 2004 06:47:13 -0000	1.6
--- FOOGlobalsManager.h	28 Feb 2005 16:37:20 -0000	1.7
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSubstrateManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSubstrateManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOSubstrateManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOSubstrateManager.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBufferManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOBufferManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOBufferManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOBufferManager.h	28 Feb 2005 16:37:19 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOGlobal.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOGlobal.h,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOGlobal.h	26 Aug 2004 09:43:50 -0000	1.4
--- FOOGlobal.h	28 Feb 2005 16:37:20 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOOutput.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOOutput.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOOutput.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOOutput.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSubstrate.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSubstrate.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOSubstrate.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOSubstrate.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBreakpointFunction.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOBreakpointFunction.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOBreakpointFunction.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOBreakpointFunction.h	28 Feb 2005 16:37:19 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOModule.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOModule.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOModule.h	17 Aug 2004 05:51:53 -0000	1.5
--- FOOModule.h	28 Feb 2005 16:37:20 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOContext.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOContext.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOContext.h	15 Aug 2004 20:30:15 -0000	1.5
--- FOOContext.h	28 Feb 2005 16:37:20 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOContextPart.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOContextPart.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOContextPart.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOContextPart.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOONilModule.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOONilModule.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOONilModule.h	13 Aug 2004 22:26:13 -0000	1.3
--- FOONilModule.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSoundFile.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSoundFile.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOSoundFile.h	26 Jan 2005 23:19:12 -0000	1.5
--- FOOSoundFile.h	28 Feb 2005 16:37:20 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOEagerModuleManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOEagerModuleManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOEagerModuleManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOEagerModuleManager.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOOutputManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOOutputManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOOutputManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOOutputManager.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOObjectManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOObjectManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOObjectManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOObjectManager.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSoundStream.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSoundStream.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOSoundStream.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOSoundStream.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSineTable.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOSineTable.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOSineTable.h	4 Aug 2004 06:15:57 -0000	1.2
--- FOOSineTable.h	28 Feb 2005 16:37:20 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBuffer.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOBuffer.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOBuffer.h	4 Aug 2004 06:15:57 -0000	1.2
--- FOOBuffer.h	28 Feb 2005 16:37:19 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOModuleManager.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOModuleManager.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOModuleManager.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOModuleManager.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOLookupTable.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOLookupTable.h,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOLookupTable.h	4 Aug 2004 06:15:57 -0000	1.2
--- FOOLookupTable.h	28 Feb 2005 16:37:20 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOEagerModule.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOOEagerModule.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOEagerModule.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOOEagerModule.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOORegion.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/FOO/FOORegion.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOORegion.h	13 Aug 2004 21:36:50 -0000	1.3
--- FOORegion.h	28 Feb 2005 16:37:20 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/libfoo/modules/banff FOOMAllpass.h,1.1,1.2 FOOMAllpass.m,1.1,1.2 FOOMComb.h,1.1,1.2 FOOMComb.m,1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/modules/banff
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo/modules/banff

Modified Files:
	FOOMAllpass.h FOOMAllpass.m FOOMComb.h FOOMComb.m 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: FOOMAllpass.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/banff/FOOMAllpass.h,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** FOOMAllpass.h	26 Aug 2004 09:50:22 -0000	1.1
--- FOOMAllpass.h	28 Feb 2005 16:37:20 -0000	1.2
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMComb.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/banff/FOOMComb.m,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** FOOMComb.m	26 Aug 2004 09:50:22 -0000	1.1
--- FOOMComb.m	28 Feb 2005 16:37:21 -0000	1.2
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMComb.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/banff/FOOMComb.h,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** FOOMComb.h	26 Aug 2004 09:50:22 -0000	1.1
--- FOOMComb.h	28 Feb 2005 16:37:21 -0000	1.2
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMAllpass.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/banff/FOOMAllpass.m,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** FOOMAllpass.m	26 Aug 2004 09:50:22 -0000	1.1
--- FOOMAllpass.m	28 Feb 2005 16:37:21 -0000	1.2
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/elkfoo/src bpf.m,1.7,1.8 context.m,1.9,1.10 defaults.m,1.3,1.4 foofun.m,1.3,1.4 fooinit.m,1.5,1.6 fractone.c,1.2,1.3 main.c,1.4,1.5 misc.c,1.7,1.8 module.m,1.6,1.7 modules.m,1.7,1.8 pointer.m,1.10,1.11 signals.m,1.5,1.6 snd.m,1.5,1.6 soundfile.m,1.7,1.8 task.m,1.6,1.7 tell.m,1.17,1.18 types.m,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/elkfoo/src

Modified Files:
	bpf.m context.m defaults.m foofun.m fooinit.m fractone.c 
	main.c misc.c module.m modules.m pointer.m signals.m snd.m 
	soundfile.m task.m tell.m types.m 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: foofun.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/foofun.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** foofun.m	13 Aug 2004 21:34:39 -0000	1.3
--- foofun.m	28 Feb 2005 16:37:18 -0000	1.4
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: fractone.c
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/fractone.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** fractone.c	5 Aug 2004 08:55:09 -0000	1.2
--- fractone.c	28 Feb 2005 16:37:18 -0000	1.3
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  
***************
*** 31,35 ****
   */
  
! /* $Id */
  
  #ifdef HAVE_CONFIG_H
--- 32,36 ----
   */
  
! /* $Id$ */
  
  #ifdef HAVE_CONFIG_H

Index: tell.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/tell.m,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** tell.m	30 Aug 2004 15:58:59 -0000	1.17
--- tell.m	28 Feb 2005 16:37:18 -0000	1.18
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: signals.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/signals.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** signals.m	13 Aug 2004 21:34:39 -0000	1.5
--- signals.m	28 Feb 2005 16:37:18 -0000	1.6
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: misc.c
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/misc.c,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** misc.c	5 Aug 2004 23:58:47 -0000	1.7
--- misc.c	28 Feb 2005 16:37:18 -0000	1.8
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: modules.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/modules.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** modules.m	26 Aug 2004 09:52:02 -0000	1.7
--- modules.m	28 Feb 2005 16:37:18 -0000	1.8
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: soundfile.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/soundfile.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** soundfile.m	26 Jan 2005 23:19:51 -0000	1.7
--- soundfile.m	28 Feb 2005 16:37:18 -0000	1.8
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: bpf.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/bpf.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** bpf.m	13 Aug 2004 21:34:38 -0000	1.7
--- bpf.m	28 Feb 2005 16:37:18 -0000	1.8
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: snd.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/snd.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** snd.m	26 Jan 2005 23:19:51 -0000	1.5
--- snd.m	28 Feb 2005 16:37:18 -0000	1.6
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: context.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/context.m,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** context.m	15 Aug 2004 20:30:48 -0000	1.9
--- context.m	28 Feb 2005 16:37:18 -0000	1.10
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: types.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/types.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** types.m	30 Aug 2004 15:58:59 -0000	1.3
--- types.m	28 Feb 2005 16:37:18 -0000	1.4
***************
*** 10,15 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 10,16 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: fooinit.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/fooinit.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** fooinit.m	17 Aug 2004 06:47:12 -0000	1.5
--- fooinit.m	28 Feb 2005 16:37:18 -0000	1.6
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  
***************
*** 31,35 ****
   */
  
! /* $Id */
  
  #include "elkfoo.h"
--- 32,36 ----
   */
  
! /* $Id$ */
  
  #include "elkfoo.h"
***************
*** 48,53 ****
  {
    printf("foo sound synthesis: elkfoo %s using libfoo %s\n", VERSION, [[FOOGlobalsManager getVersion] cString]);
!   printf("(C) 1993-2004 gerhard eckel, ramon gonzalez-arroyo, zkm, ircam\n");
!   printf("(C) 2003-2004 martin rumori\n");
  
    return True;
--- 49,55 ----
  {
    printf("foo sound synthesis: elkfoo %s using libfoo %s\n", VERSION, [[FOOGlobalsManager getVersion] cString]);
!   printf("(C) 1993-2005 gerhard eckel, ramon gonzalez-arroyo\n");
!   printf("(C) 2003-2005 martin rumori\n");
!   printf("(C) 1993-1996 ircam, zkm\n");
  
    return True;

Index: pointer.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/pointer.m,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -d -r1.10 -r1.11
*** pointer.m	30 Aug 2004 15:58:59 -0000	1.10
--- pointer.m	28 Feb 2005 16:37:18 -0000	1.11
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: task.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/task.m,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** task.m	16 Aug 2004 04:42:26 -0000	1.6
--- task.m	28 Feb 2005 16:37:18 -0000	1.7
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: defaults.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/defaults.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** defaults.m	13 Aug 2004 21:34:39 -0000	1.3
--- defaults.m	28 Feb 2005 16:37:18 -0000	1.4
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: main.c
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/main.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** main.c	3 Feb 2005 15:26:35 -0000	1.4
--- main.c	28 Feb 2005 16:37:18 -0000	1.5
***************
*** 9,15 ****
   * foo sound synthesis system
   *
!  * (C)1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C)1993-1996 IRCAM, ZKM
!  * (C)2003-2005 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 1993-1996 IRCAM, ZKM
!  * (C) 2003-2005 Martin Rumori
   */
  

Index: module.m
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/module.m,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** module.m	13 Aug 2004 21:34:39 -0000	1.6
--- module.m	28 Feb 2005 16:37:18 -0000	1.7
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/libfoo AUTHORS,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo

Modified Files:
	AUTHORS 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: AUTHORS
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/AUTHORS,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** AUTHORS	31 Jul 2004 04:09:14 -0000	1.2
--- AUTHORS	28 Feb 2005 16:37:19 -0000	1.3
***************
*** 1,4 ****
  $Id$
  
! (C) 1993-2004 gerhard eckel, ramon gonzalez-arroyo, ircam, zkm
! (C) 2003-2004 martin rumori
--- 1,5 ----
  $Id$
  
! (C) 1993-2005 gerhard eckel, ramon gonzalez-arroyo
! (C) 2003-2005 martin rumori
! (C) 1993-1996 ircam, zkm

[foo-cvs] foo/elkfoo/include elkfoo.h,1.8,1.9

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/include
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/elkfoo/include

Modified Files:
	elkfoo.h 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: elkfoo.h
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/include/elkfoo.h,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** elkfoo.h	26 Jan 2005 23:19:50 -0000	1.8
--- elkfoo.h	28 Feb 2005 16:37:17 -0000	1.9
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo AUTHORS,1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174

Modified Files:
	AUTHORS 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: AUTHORS
===================================================================
RCS file: /cvsroot/foo/foo/AUTHORS,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** AUTHORS	7 Aug 2004 23:56:07 -0000	1.1
--- AUTHORS	28 Feb 2005 16:37:17 -0000	1.2
***************
*** 1,4 ****
  $Id$
  
! (C) 1993-2004 gerhard eckel, ramon gonzalez-arroyo, ircam, zkm
! (C) 2003-2004 martin rumori
--- 1,5 ----
  $Id$
  
! (C) 1993-2005 gerhard eckel, ramon gonzalez-arroyo
! (C) 2003-2005 martin rumori
! (C) 1993-1996 ircam, zkm

[foo-cvs] foo/elkfoo AUTHORS,1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/elkfoo

Modified Files:
	AUTHORS 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: AUTHORS
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/AUTHORS,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** AUTHORS	4 Aug 2004 07:13:08 -0000	1.1
--- AUTHORS	28 Feb 2005 16:37:17 -0000	1.2
***************
*** 1,4 ****
  $Id$
  
! (C) 1993-2004 gerhard eckel, ramon gonzalez-arroyo, ircam, zkm
! (C) 2003-2004 martin rumori
--- 1,5 ----
  $Id$
  
! (C) 1993-2005 gerhard eckel, ramon gonzalez-arroyo
! (C) 2003-2005 martin rumori
! (C) 1993-1996 ircam, zkm

[foo-cvs] foo/libfoo/modules/orthodox FOOMAdd.h,1.3,1.4 FOOMAdd.m,1.4,1.5 FOOMBandlimitedNoise.h,1.3,1.4 FOOMBandlimitedNoise.m,1.5,1.6 FOOMConstant.h,1.3,1.4 FOOMConstant.m,1.4,1.5 FOOMConstantBiquad.h,1.3,1.4 FOOMConstantBiquad.m,1.4,1.5 FOOMConstantTwoPole.h,1.3,1.4 FOOMConstantTwoPole.m,1.4,1.5 FOOMConstantTwoPoleTwoZero.h,1.3,1.4 FOOMConstantTwoPoleTwoZero.m,1.4,1.5 FOOMDiff.h,1.3,1.4 FOOMDiff.m,1.4,1.5 FOOMDirac.h,1.3,1.4 FOOMDirac.m,1.4,1.5 FOOMDiv.h,1.3,1.4 FOOMDiv.m,1.4,1.5 FOOMExpon.h,1.3,1.4 FOOMExpon.m,1.5,1.6 FOOMFiltreVariableEtat.h,1.3,1.4 FOOMFiltreVariableEtat.m,1.4,1.5 FOOMFof.h,1.3,1.4 FOOMFof.m,1.6,1.7 FOOMGate.h,1.3,1.4 FOOMGate.m,1.5,1.6 FOOMInteg.h,1.3,1.4 FOOMInteg.m,1.4,1.5 FOOMLine.h,1.3,1.4 FOOMLine.m,1.5,1.6 FOOMLookup.h,1.4,1.5 FOOMLookup.m,1.7,1.8 FOOMMath.h,1.4,1.5 FOOMMath.m,1.4,1.5 FOOMMul.h,1.3,1.4 FOOMMul.m,1.3,1.4 FOOMNeg.h,1.3,1.4 FOOMNeg.m,1.3,1.4 FOOMNoise.h,1.3,1.4 FOOMNoise.m,1.2,1.3 FOOMOscillator.h,1.3,1.4 FOOMOscillator.m,1.4,1.5 FOOMReadBpf.h,1.3,1.4 FOOMReadBpf.m,1.4,1.5 FOOMReadSnd.h,1.3,1.4 FOOMReadSnd.m,1.4,1.5 FOOMReadTranspSnd.h,1.3,1.4 FOOMReadTranspSnd.m,1.6,1.7 FOOMReverb.h,1.3,1.4 FOOMReverb.m,1.3,1.4 FOOMReverb8.h,1.3,1.4 FOOMReverb8.m,1.3,1.4 FOOMReverbOutput.h,1.3,1.4 FOOMReverbOutput.m,1.2,1.3 FOOMSub.h,1.3,1.4 FOOMSub.m,1.3,1.4 FOOMTransposeBpf.h,1.3,1.4 FOOMTransposeBpf.m,1.3,1.4 FOOMTransposeSnd.h,1.3,1.4 FOOMTransposeSnd.m,1.6,1.7 FOOMVariableTwoPole.h,1.3,1.4 FOOMVariableTwoPole.m,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/modules/orthodox
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo/modules/orthodox

Modified Files:
	FOOMAdd.h FOOMAdd.m FOOMBandlimitedNoise.h 
	FOOMBandlimitedNoise.m FOOMConstant.h FOOMConstant.m 
	FOOMConstantBiquad.h FOOMConstantBiquad.m 
	FOOMConstantTwoPole.h FOOMConstantTwoPole.m 
	FOOMConstantTwoPoleTwoZero.h FOOMConstantTwoPoleTwoZero.m 
	FOOMDiff.h FOOMDiff.m FOOMDirac.h FOOMDirac.m FOOMDiv.h 
	FOOMDiv.m FOOMExpon.h FOOMExpon.m FOOMFiltreVariableEtat.h 
	FOOMFiltreVariableEtat.m FOOMFof.h FOOMFof.m FOOMGate.h 
	FOOMGate.m FOOMInteg.h FOOMInteg.m FOOMLine.h FOOMLine.m 
	FOOMLookup.h FOOMLookup.m FOOMMath.h FOOMMath.m FOOMMul.h 
	FOOMMul.m FOOMNeg.h FOOMNeg.m FOOMNoise.h FOOMNoise.m 
	FOOMOscillator.h FOOMOscillator.m FOOMReadBpf.h FOOMReadBpf.m 
	FOOMReadSnd.h FOOMReadSnd.m FOOMReadTranspSnd.h 
	FOOMReadTranspSnd.m FOOMReverb.h FOOMReverb.m FOOMReverb8.h 
	FOOMReverb8.m FOOMReverbOutput.h FOOMReverbOutput.m FOOMSub.h 
	FOOMSub.m FOOMTransposeBpf.h FOOMTransposeBpf.m 
	FOOMTransposeSnd.h FOOMTransposeSnd.m FOOMVariableTwoPole.h 
	FOOMVariableTwoPole.m 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: FOOMLookup.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMLookup.h,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMLookup.h	30 Aug 2004 14:33:53 -0000	1.4
--- FOOMLookup.h	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMLookup.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMLookup.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** FOOMLookup.m	27 Aug 2004 17:02:47 -0000	1.7
--- FOOMLookup.m	28 Feb 2005 16:37:21 -0000	1.8
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstant.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstant.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMConstant.h	13 Aug 2004 21:38:46 -0000	1.3
--- FOOMConstant.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMInteg.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMInteg.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMInteg.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMInteg.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDiv.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDiv.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMDiv.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMDiv.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadTranspSnd.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadTranspSnd.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReadTranspSnd.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReadTranspSnd.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMTransposeSnd.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMTransposeSnd.m,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** FOOMTransposeSnd.m	27 Aug 2004 17:02:47 -0000	1.6
--- FOOMTransposeSnd.m	28 Feb 2005 16:37:21 -0000	1.7
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverb.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverb.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReverb.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReverb.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadTranspSnd.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadTranspSnd.m,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** FOOMReadTranspSnd.m	27 Aug 2004 17:02:47 -0000	1.6
--- FOOMReadTranspSnd.m	28 Feb 2005 16:37:21 -0000	1.7
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDiv.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDiv.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMDiv.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMDiv.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMTransposeSnd.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMTransposeSnd.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMTransposeSnd.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMTransposeSnd.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverb.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverb.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReverb.m	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReverb.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMLine.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMLine.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOMLine.m	16 Aug 2004 05:20:49 -0000	1.5
--- FOOMLine.m	28 Feb 2005 16:37:21 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMNeg.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMNeg.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMNeg.m	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMNeg.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadBpf.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadBpf.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMReadBpf.m	15 Aug 2004 17:42:37 -0000	1.4
--- FOOMReadBpf.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDirac.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDirac.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMDirac.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMDirac.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverbOutput.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverbOutput.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOMReverbOutput.m	15 Aug 2004 17:42:37 -0000	1.2
--- FOOMReverbOutput.m	28 Feb 2005 16:37:21 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMOscillator.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMOscillator.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMOscillator.h	13 Aug 2004 21:38:46 -0000	1.3
--- FOOMOscillator.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverbOutput.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverbOutput.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReverbOutput.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReverbOutput.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDirac.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDirac.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMDirac.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMDirac.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantTwoPoleTwoZero.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantTwoPoleTwoZero.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMConstantTwoPoleTwoZero.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMConstantTwoPoleTwoZero.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMAdd.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMAdd.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMAdd.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMAdd.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantBiquad.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantBiquad.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMConstantBiquad.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMConstantBiquad.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadBpf.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadBpf.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReadBpf.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReadBpf.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMMath.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMMath.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMMath.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMMath.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMNoise.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMNoise.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMNoise.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMNoise.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantBiquad.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantBiquad.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMConstantBiquad.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMConstantBiquad.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMMath.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMMath.h,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMMath.h	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMMath.h	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMGate.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMGate.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMGate.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMGate.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMGate.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMGate.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOMGate.m	16 Aug 2004 05:20:49 -0000	1.5
--- FOOMGate.m	28 Feb 2005 16:37:21 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMNoise.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMNoise.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOMNoise.m	15 Aug 2004 17:42:37 -0000	1.2
--- FOOMNoise.m	28 Feb 2005 16:37:21 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMVariableTwoPole.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMVariableTwoPole.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMVariableTwoPole.m	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMVariableTwoPole.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMFiltreVariableEtat.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMFiltreVariableEtat.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMFiltreVariableEtat.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMFiltreVariableEtat.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMVariableTwoPole.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMVariableTwoPole.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMVariableTwoPole.h	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMVariableTwoPole.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantTwoPole.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantTwoPole.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMConstantTwoPole.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMConstantTwoPole.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantTwoPole.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantTwoPole.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMConstantTwoPole.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMConstantTwoPole.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDiff.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDiff.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMDiff.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMDiff.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMTransposeBpf.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMTransposeBpf.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMTransposeBpf.m	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMTransposeBpf.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMDiff.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMDiff.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMDiff.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMDiff.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMTransposeBpf.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMTransposeBpf.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMTransposeBpf.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMTransposeBpf.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMExpon.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMExpon.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMExpon.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMExpon.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverb8.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverb8.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReverb8.m	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReverb8.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReverb8.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReverb8.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReverb8.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReverb8.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMExpon.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMExpon.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOMExpon.m	16 Aug 2004 05:20:49 -0000	1.5
--- FOOMExpon.m	28 Feb 2005 16:37:21 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadSnd.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadSnd.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMReadSnd.h	15 Aug 2004 17:42:37 -0000	1.3
--- FOOMReadSnd.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMReadSnd.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMReadSnd.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMReadSnd.m	15 Aug 2004 17:42:37 -0000	1.4
--- FOOMReadSnd.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstant.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstant.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMConstant.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMConstant.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMFof.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMFof.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMFof.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMFof.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMSub.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMSub.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMSub.m	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMSub.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMFof.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMFof.m,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** FOOMFof.m	17 Aug 2004 06:05:49 -0000	1.6
--- FOOMFof.m	28 Feb 2005 16:37:21 -0000	1.7
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMSub.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMSub.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMSub.h	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMSub.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMLine.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMLine.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMLine.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMLine.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMNeg.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMNeg.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMNeg.h	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMNeg.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMInteg.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMInteg.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMInteg.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMInteg.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMBandlimitedNoise.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMBandlimitedNoise.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOMBandlimitedNoise.m	26 Aug 2004 09:49:16 -0000	1.5
--- FOOMBandlimitedNoise.m	28 Feb 2005 16:37:21 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMAdd.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMAdd.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMAdd.m	16 Aug 2004 05:20:48 -0000	1.4
--- FOOMAdd.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMMul.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMMul.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMMul.h	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMMul.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMOscillator.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMOscillator.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMOscillator.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMOscillator.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMMul.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMMul.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMMul.m	16 Aug 2004 05:20:49 -0000	1.3
--- FOOMMul.m	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMBandlimitedNoise.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMBandlimitedNoise.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMBandlimitedNoise.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMBandlimitedNoise.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMConstantTwoPoleTwoZero.h
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMConstantTwoPoleTwoZero.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOMConstantTwoPoleTwoZero.h	14 Aug 2004 07:09:45 -0000	1.3
--- FOOMConstantTwoPoleTwoZero.h	28 Feb 2005 16:37:21 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOMFiltreVariableEtat.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/modules/orthodox/FOOMFiltreVariableEtat.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOMFiltreVariableEtat.m	16 Aug 2004 05:20:49 -0000	1.4
--- FOOMFiltreVariableEtat.m	28 Feb 2005 16:37:21 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/libfoo/src FOOBreakpointFunction.m,1.4,1.5 FOOBuffer.m,1.2,1.3 FOOBufferManager.m,1.4,1.5 FOOContext.m,1.7,1.8 FOOContextPart.m,1.3,1.4 FOOEagerModule.m,1.4,1.5 FOOEagerModuleManager.m,1.3,1.4 FOOFileTable.m,1.2,1.3 FOOGlobalsManager.m,1.8,1.9 FOOLookupTable.m,1.3,1.4 FOOModule.m,1.8,1.9 FOOModuleManager.m,1.4,1.5 FOONilModule.m,1.4,1.5 FOOObject.m,1.2,1.3 FOOObjectManager.m,1.5,1.6 FOOOutput.m,1.3,1.4 FOOOutputManager.m,1.3,1.4 FOORegion.m,1.4,1.5 FOOSineTable.m,1.2,1.3 FOOSineXoverXTable.m,1.7,1.8 FOOSoundFile.m,1.7,1.8 FOOSoundStream.m,1.4,1.5 FOOSubstrate.m,1.5,1.6 FOOSubstrateManager.m,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo/src

Modified Files:
	FOOBreakpointFunction.m FOOBuffer.m FOOBufferManager.m 
	FOOContext.m FOOContextPart.m FOOEagerModule.m 
	FOOEagerModuleManager.m FOOFileTable.m FOOGlobalsManager.m 
	FOOLookupTable.m FOOModule.m FOOModuleManager.m FOONilModule.m 
	FOOObject.m FOOObjectManager.m FOOOutput.m FOOOutputManager.m 
	FOORegion.m FOOSineTable.m FOOSineXoverXTable.m FOOSoundFile.m 
	FOOSoundStream.m FOOSubstrate.m FOOSubstrateManager.m 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: FOOSubstrateManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSubstrateManager.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOSubstrateManager.m	13 Aug 2004 21:38:01 -0000	1.3
--- FOOSubstrateManager.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOGlobalsManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOGlobalsManager.m,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** FOOGlobalsManager.m	27 Aug 2004 06:19:09 -0000	1.8
--- FOOGlobalsManager.m	28 Feb 2005 16:37:22 -0000	1.9
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSineXoverXTable.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSineXoverXTable.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** FOOSineXoverXTable.m	30 Aug 2004 15:50:00 -0000	1.7
--- FOOSineXoverXTable.m	28 Feb 2005 16:37:22 -0000	1.8
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOObject.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOObject.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOObject.m	4 Aug 2004 06:16:41 -0000	1.2
--- FOOObject.m	28 Feb 2005 16:37:22 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOFileTable.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOFileTable.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOFileTable.m	4 Aug 2004 06:16:41 -0000	1.2
--- FOOFileTable.m	28 Feb 2005 16:37:22 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBufferManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOBufferManager.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOBufferManager.m	26 Aug 2004 09:47:52 -0000	1.4
--- FOOBufferManager.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOObjectManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOObjectManager.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOObjectManager.m	14 Aug 2004 02:01:32 -0000	1.5
--- FOOObjectManager.m	28 Feb 2005 16:37:22 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOORegion.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOORegion.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOORegion.m	13 Aug 2004 21:38:01 -0000	1.4
--- FOORegion.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOOutput.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOOutput.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOOutput.m	13 Aug 2004 21:38:01 -0000	1.3
--- FOOOutput.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOOutputManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOOutputManager.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOOutputManager.m	13 Aug 2004 21:38:01 -0000	1.3
--- FOOOutputManager.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOModule.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOModule.m,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** FOOModule.m	27 Aug 2004 06:19:10 -0000	1.8
--- FOOModule.m	28 Feb 2005 16:37:22 -0000	1.9
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOContext.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOContext.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** FOOContext.m	17 Aug 2004 06:47:13 -0000	1.7
--- FOOContext.m	28 Feb 2005 16:37:22 -0000	1.8
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOContextPart.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOContextPart.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOContextPart.m	13 Aug 2004 21:38:01 -0000	1.3
--- FOOContextPart.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSubstrate.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSubstrate.m,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** FOOSubstrate.m	13 Aug 2004 21:38:01 -0000	1.5
--- FOOSubstrate.m	28 Feb 2005 16:37:22 -0000	1.6
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOONilModule.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOONilModule.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOONilModule.m	13 Aug 2004 22:52:25 -0000	1.4
--- FOONilModule.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSoundFile.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSoundFile.m,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** FOOSoundFile.m	26 Jan 2005 23:19:12 -0000	1.7
--- FOOSoundFile.m	28 Feb 2005 16:37:22 -0000	1.8
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBreakpointFunction.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOBreakpointFunction.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOBreakpointFunction.m	27 Aug 2004 06:42:21 -0000	1.4
--- FOOBreakpointFunction.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOEagerModuleManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOEagerModuleManager.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOEagerModuleManager.m	13 Aug 2004 21:38:01 -0000	1.3
--- FOOEagerModuleManager.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSineTable.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSineTable.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOSineTable.m	4 Aug 2004 06:16:41 -0000	1.2
--- FOOSineTable.m	28 Feb 2005 16:37:22 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOBuffer.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOBuffer.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FOOBuffer.m	4 Aug 2004 06:16:41 -0000	1.2
--- FOOBuffer.m	28 Feb 2005 16:37:22 -0000	1.3
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOSoundStream.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOSoundStream.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOSoundStream.m	13 Aug 2004 21:38:01 -0000	1.4
--- FOOSoundStream.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOLookupTable.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOLookupTable.m,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** FOOLookupTable.m	4 Aug 2004 06:16:41 -0000	1.3
--- FOOLookupTable.m	28 Feb 2005 16:37:22 -0000	1.4
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOEagerModule.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOEagerModule.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOEagerModule.m	15 Aug 2004 17:50:44 -0000	1.4
--- FOOEagerModule.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

Index: FOOModuleManager.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/src/FOOModuleManager.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FOOModuleManager.m	13 Aug 2004 21:38:01 -0000	1.4
--- FOOModuleManager.m	28 Feb 2005 16:37:22 -0000	1.5
***************
*** 11,16 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 11,17 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/libfoo/tests/foosine foosine.m,1.4,1.5

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/libfoo/tests/foosine
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28174/libfoo/tests/foosine

Modified Files:
	foosine.m 
Log Message:
changed copyright statement: ircam/zkm 1993-1996 only.  rest -2005.

Index: foosine.m
===================================================================
RCS file: /cvsroot/foo/foo/libfoo/tests/foosine/foosine.m,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** foosine.m	4 Aug 2004 06:42:34 -0000	1.4
--- foosine.m	28 Feb 2005 16:37:23 -0000	1.5
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C) 1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C) 2003-2005 Martin Rumori
!  * (C) 1993-1996 IRCAM, ZKM
   */
  

[foo-cvs] foo/elkfoo/scm/control/tools/util Makefile.am,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/tools/util
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14328/tools/util

Modified Files:
	Makefile.am 
Log Message:
changed Makefiles according to new control

Index: Makefile.am
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/tools/util/Makefile.am,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Makefile.am	30 Aug 2004 16:01:20 -0000	1.2
--- Makefile.am	27 Feb 2005 20:25:31 -0000	1.3
***************
*** 14,17 ****
--- 14,18 ----
  ELKFOO_UTILITIES_FILES = \
  	misc-funs.foo \
+ 	pitch.foo \
  	soundfile-funs.foo \
  	$(NULL)

[foo-cvs] foo/elkfoo/scm/control/tools Makefile.am,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/tools
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14328/tools

Modified Files:
	Makefile.am 
Log Message:
changed Makefiles according to new control

Index: Makefile.am
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/tools/Makefile.am,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Makefile.am	30 Aug 2004 16:01:19 -0000	1.2
--- Makefile.am	27 Feb 2005 20:25:31 -0000	1.3
***************
*** 15,18 ****
  
  ELKFOO_TOOLS_FILES = \
- 	pitch.foo \
  	$(NULL)
--- 15,17 ----

[foo-cvs] foo/elkfoo/scm/control Makefile.am,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14328

Modified Files:
	Makefile.am 
Log Message:
changed Makefiles according to new control

Index: Makefile.am
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/Makefile.am,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Makefile.am	30 Aug 2004 13:42:07 -0000	1.3
--- Makefile.am	27 Feb 2005 20:25:31 -0000	1.4
***************
*** 23,26 ****
  ELKFOO_CONTROL_FILES = \
  	init-control.foo \
- 	init-tools.foo \
  	$(NULL)
--- 23,25 ----

[foo-cvs] foo/elkfoo/scm/control init-control.foo,1.3,1.4 init-tools.foo,1.1,NONE

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10423

Modified Files:
	init-control.foo 
Removed Files:
	init-tools.foo 
Log Message:
raw checkin of new control (changed init-x file)

Index: init-control.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/init-control.foo,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** init-control.foo	30 Aug 2004 13:43:45 -0000	1.3
--- init-control.foo	27 Feb 2005 20:13:08 -0000	1.4
***************
*** 6,11 ****
  (require 'foops)
  
! (if (not (feature? 'foo-tools))
!     (global-load "control/init-tools.foo"))
  
  (global-load "control/interface-lib/sp-sigpack-type.foo")
--- 6,20 ----
  (require 'foops)
  
! ;; init-tools.foo
! 
! (autoload 'mixsnd "control/tools/mixsnd/mixsnd.foo")
! (autoload 'pitch "control/tools/pitch.foo")
! (autoload 'pitch->frq "control/tools/pitch.foo")
! (autoload 'frq->pitch "control/tools/pitch.foo")
! 
! (global-load "control/tools/util/misc-funs.foo")
! (global-load "control/tools/util/soundfile-funs.foo")
! 
! (provide 'foo-tools)
  
  (global-load "control/interface-lib/sp-sigpack-type.foo")

--- init-tools.foo DELETED ---

[foo-cvs] foo/elkfoo/scm/control/tools pitch.foo,1.1,NONE

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/tools
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9734

Removed Files:
	pitch.foo 
Log Message:
moved pitch.foo into util dir

--- pitch.foo DELETED ---

[foo-cvs] foo/elkfoo/scm/control/tools/util pitch.foo,NONE,1.1

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/tools/util
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9734/util

Added Files:
	pitch.foo 
Log Message:
moved pitch.foo into util dir

--- NEW FILE: pitch.foo ---
(define (kw sbdv)
    (if (<= sbdv 0) 1.
		    (exp (/ (log 2) sbdv))))
;
(define (nwnt frq intv sbdv)
   (let ((n) (frq (pitch frq)))
    (if (= intv 0) frq
    		   (set! n (pow  (kw sbdv) (abs intv)))
		   (if (> intv 0) (* frq n)
			    	  (/ frq n)))))
;
(define (xpose frq intv sbdv)
   (let ((frq (pitch frq)))
      (* frq (exp (* (/ intv sbdv) (log 2))))))
;
(define (decodepitch note)
   (let ((note (if (symbol? note) (symbol->string note) note))
   	 (pitchclass) (octvsign) (octv) (accidental)
	 (xst) (xsy) (xnu) (i) (num))
    (for-each
    	(lambda (x)
	    (set! xst (make-string 1 x))
	    (set! xsy (string->symbol xst))
	    (set! xnu (string->number xst))
	    (if (not (or (equal? '- xsy)
			 (equal? '+ xsy)
			  xnu))
		(if (or (equal? "b" xst)
			(equal? "h" xst)
			(equal? "q" xst)
			(equal? "#" xst)
			(equal? "z" xst)
			(equal? "x" xst))
		    (set! accidental (cons xst accidental))
		    (set! pitchclass (cons x pitchclass)))
		    (if (null? octvsign)
		  	(if xnu (begin (set! octv (cons xnu octv))
				       (set!  octvsign 1))
		      		(set! octvsign (if (equal? '- xsy) -1 +1)))
			(set! octv (cons xnu octv))))) (string->list note))
    (set! pitchclass (string->symbol (list->string (reverse pitchclass))))
    (set! accidental
      		(map (lambda (x) (string->symbol x)) (reverse accidental)))
    (set! i -1)
    (set! num 0)
    (if (not (null? octv))
      (begin
        (for-each
    	   (lambda (x) (set! i (1+ i))
		       (set! num (+ num (* x (pow 10 i))))) octv)
      (list pitchclass accidental (* num octvsign)))
      (list pitchclass accidental))))

(define (decodepitchclass symb)

   (cond
     ((string? symb)	#t)
     ((symbol? symb)	(set! symb (symbol->string symb)))
     (#t		(error 'decodepitchclass "Not a pitch-class ~s"symb)))

   (cond
     ((equal? symb "do")	0)
     ((equal? symb "re")	8)
     ((equal? symb "mi")	16)
     ((equal? symb "fa")	20)
     ((equal? symb "sol")	28)
     ((equal? symb "la")	36)
     ((equal? symb "si")	44)
     (#t			symb)))

(define (decodeaccidental acc)
  (if (list? acc) 
     (map (lambda (x) (decodeaccidental x)) acc)
     (cond
	((string? acc)	#t)
	((symbol? acc)	(set! acc (symbol->string acc)))
	((char?   acc)	(set! acc (make-string 1 acc)))
	(#t		(error 'decodeaccidental "Not an accidental ~s"acc)))
     (cond
	((equal? acc "b")	-4)

	((equal? acc "")	0)

	((equal? acc "h")	1)
	((equal? acc "q")	2)

	((equal? acc "#")	4)
	((equal? acc "z")	4)

	((equal? acc "x")	8)
	
	(#t 		(error 'decodeaccidental "Not an accidental ~s"acc)))))

(define foo:pitchreference (list 'la 4 440.))

(define (Relativefrequency intv octave . Reference)
   (let* ((Reference (if (not (null? Reference)) (clean Reference)))
   	  (Reference (if (and (pair? Reference)
			      (symbol? (car Reference))
			      (number? (cadr Reference))
			      (number? (caddr Reference))) Reference
			      				   foo:pitchreference))
	 (frqreference  (caddr Reference))
	 (octvreference (cadr Reference))
	 (intvreference (decodepitchclass (car Reference)))
	 (frq) (nwintv))

	    (set! frq (* frqreference (pow 2 (- octave octvreference))))
	    (set! nwintv (- intv intvreference))
	    (xpose frq nwintv 48)))

(define (pitch->frq note)
   (cond
      ((or (symbol? note)
      	   (string? note))
      	  (let* ((auxy (decodepitch note))
      		 (pit (decodepitchclass (car auxy)))
      		 (accs (decodeaccidental (cadr auxy)))
		 (octv))
	     (if (< (length auxy) 3)
	        note
		(set! octv (caddr auxy))
	        (if (and (number? octv)
	     	         (number? pit)
		         (or (numerical? accs)
		      	     (null? accs)))
		   (Relativefrequency (apply + (cons pit accs)) octv)
		   note))))
      ((and (pair? note)
      	    (or (stringed? note)
      	        (symbolic? note))) (map (lambda (x) (pitch->freq x)) note))
      (#t		note)))
;
(define pitch->freq pitch->frq)
(define pitch pitch->frq)
;
;;
;;;
;;
;
(define (decodepitnumb posit)
   (cond
      ((= posit 0 )	'do)
      ((= posit 1 )	'doh)
      ((= posit 2 )	'doq)
      ((= posit 3 )	'doqh)
      ((= posit 4 )	'doz)
      ((= posit 5 )	'dozh)
      ((= posit 6 )	'dozq)
      ((= posit 7 )	'dozqh)
      ((= posit 8 )	're)
      ((= posit 9 )	'reh)
      ((= posit 10)	'req)
      ((= posit 11)	'reqh)
      ((= posit 12)	'mib)
      ((= posit 13)	'rezh)
      ((= posit 14)	'rezq)
      ((= posit 15)	'rezqh)
      ((= posit 16)	'mi)
      ((= posit 17)	'mih)
      ((= posit 18)	'miq)
      ((= posit 19)	'miqh)
      ((= posit 20)	'fa)
      ((= posit 21)	'fah)
      ((= posit 22)	'faq)
      ((= posit 23)	'faqh)
      ((= posit 24)	'faz)
      ((= posit 25)	'fazh)
      ((= posit 26)	'fazq)
      ((= posit 27)	'fazqh)
      ((= posit 28)	'sol)
      ((= posit 29)	'solh)
      ((= posit 30)	'solq)
      ((= posit 31)	'solqh)
      ((= posit 32)	'lab)
      ((= posit 33)	'solzh)
      ((= posit 34)	'solzq)
      ((= posit 35)	'solzqh)
      ((= posit 36)	'la)
      ((= posit 37)	'lah)
      ((= posit 38)	'laq)
      ((= posit 39)	'laqh)
      ((= posit 40)	'sib)
      ((= posit 41)	'lazh)
      ((= posit 42)	'lazq)
      ((= posit 43)	'lazqh)
      ((= posit 44)	'si)
      ((= posit 45)	'sih)
      ((= posit 46)	'siq)
      ((= posit 47)	'siqh)
      ((= posit 48)	'do)))
;
(define (freq2pitch1 frq . Rfrnz)
  (let* ((Rfrnz (if (not (null? Rfrnz)) (flatten Rfrnz))) (Pitref) (Sbdvref)
  	 (frqref) (ocvref) (refpos) (sbdvfac) (factor) (steps)
	 (posit) (octav) (pitsym) (frq (abs frq)))

    (if (and (pair? Rfrnz)		
    	     (or (number? (car Rfrnz))
	     	 (and (symbol? (car Rfrnz))
		      (number? (decodepitchclass (car Rfrnz)))))
	     (number? (cadr Rfrnz))
	     (number? (caddr Rfrnz)))
       (begin
	 (set! Pitref (list-head Rfrnz 3))
	 (set! Sbdvref (cadddr Rfrnz))
	 (if (not (number? Sbdvref)) (set! Sbdvref 48)))
       (set! Pitref foo:pitchreference)
       (if (and (not (null? Rfrnz))
       		(number? (car Rfrnz)))	(set! Sbdvref (car Rfrnz))
					(set! Sbdvref 48)))
    (set! frqref (caddr Pitref))
    (set! ocvref (cadr Pitref))
    (if (number? (car Pitref))
    	(set! refpos (car Pitref))
	(set! refpos (* (decodepitchclass (car Pitref)) (/ Sbdvref 48))))
    (set! sbdvfac (kw Sbdvref))

    (while (> frqref frq)
    	(set! frqref (/ frqref 2))
	(set! ocvref (- ocvref 1)))
    (while (< (* frqref 2) frq)
    	(set! frqref (* frqref 2))
	(set! ocvref (+ ocvref 1)))
    
    (set! factor (/ frq frqref))
    (set! steps  (/ (log factor) (log sbdvfac)))
    (set! posit  (round (+ refpos steps)))
    (set! octav  ocvref)

    (if (>= posit Sbdvref)
    	(begin
	   (set! posit (- posit Sbdvref))
	   (set! octav (+ octav 1))))

    (if (not (number? Pitref))
       (begin
	  (set! pitsym (decodepitnumb (round (* posit (/ 48 Sbdvref)))))
	  (string->symbol (format #f "~a~a" pitsym octav)))
       (list posit octav))))
;
(define (frq->pitch frq . Rfrnz)
   (cond
      ((number? frq)		(freq2pitch1 frq Rfrnz))
      ((and (pair? frq)
      	    (numerical? frq))	(map (lambda (x) (freq2pitch1 x Rfrnz)) frq))
      (#t			frq)))
;
(define pitchsymbol frq->pitch)
(define freq->pitch frq->pitch)

[foo-cvs] foo/elkfoo/scm/control/abstraction var-type.foo,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/abstraction
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8357/abstraction

Modified Files:
	var-type.foo 
Log Message:
raw checkin of new control

Index: var-type.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/abstraction/var-type.foo,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** var-type.foo	11 Aug 2004 12:26:17 -0000	1.2
--- var-type.foo	27 Feb 2005 20:06:31 -0000	1.3
***************
*** 1,3 ****
! (require 'foops)
  (define-class Var-Type (instance-vars  Variables
  				       (checkd #f)))
--- 1,3 ----
! (require 'oops)
  (define-class Var-Type (instance-vars  Variables
  				       (checkd #f)))

[foo-cvs] foo/elkfoo/scm/control/processes scheduler.foo,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/processes
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8357/processes

Modified Files:
	scheduler.foo 
Log Message:
raw checkin of new control

Index: scheduler.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/processes/scheduler.foo,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** scheduler.foo	11 Aug 2004 12:26:18 -0000	1.2
--- scheduler.foo	27 Feb 2005 20:06:34 -0000	1.3
***************
*** 1,4 ****
  (require 'foops)
! (require 'struct)
  
  ;;;
--- 1,4 ----
  (require 'foops)
! (require 'struct 'struct.scm)
  
  ;;;

[foo-cvs] foo/elkfoo/scm/control/node node-function-database.foo,1.1,1.2 node-functionalities.foo,1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/node
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8357/node

Modified Files:
	node-function-database.foo node-functionalities.foo 
Log Message:
raw checkin of new control

Index: node-functionalities.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/node/node-functionalities.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** node-functionalities.foo	7 Aug 2004 22:53:01 -0000	1.1
--- node-functionalities.foo	27 Feb 2005 20:06:34 -0000	1.2
***************
*** 63,67 ****
  	    (if (= Numb 1) (car aux) aux))))
  
!        `(define-method Node (,name . garbage)
  	   (let* ((aux) (Numb (send self 'get-NumResults)) (Args)
  		  (End (+ Index Numb)))
--- 63,67 ----
  	    (if (= Numb 1) (car aux) aux))))
  
!        `(define-method Node (,name . unusedargs)
  	   (let* ((aux) (Numb (send self 'get-NumResults)) (Args)
  		  (End (+ Index Numb)))

Index: node-function-database.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/node/node-function-database.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** node-function-database.foo	7 Aug 2004 22:53:01 -0000	1.1
--- node-function-database.foo	27 Feb 2005 20:06:33 -0000	1.2
***************
*** 4,12 ****
  ;;
  ;
  (define (rand01) (/ (random) 2147483647))
  
  (define (randint a z) (+ a (* (- z a) (rand01))))
  
! (define (alea a z) (inexact->exact (round (randint a z))))
  
  (define (mk-ordrlst lnz . start)
--- 4,26 ----
  ;;
  ;
+ (define (rround n)
+   (if (= n 0.) 0.
+       (let ((t (truncate n))
+ 	    (inc (/ n (abs n))))
+ 	(if (>= (abs (- n t)) 0.5) (+ t inc) t))))
+ ;
+ (define (rrund n) (inexact->exact (rround n)))
+ ;
  (define (rand01) (/ (random) 2147483647))
  
  (define (randint a z) (+ a (* (- z a) (rand01))))
  
! (define (alea a z) (inexact->exact (rround (randint a z))))
! 
! (define between randint)
! 
! (define (betweenlst lst) (apply between lst))
! 
! (define (alealst lst) (apply alea lst))
  
  (define (mk-ordrlst lnz . start)
***************
*** 106,111 ****
  	  (aux1 (/ lnz totn)))
       (if (> indx totn) (set! indx totn))
!      (if (>= lnz totn) (list-ref Lst indx)
! 		  (list-ref Lst (inexact->exact (truncate (* aux1 indx)))))))
  
  
--- 120,126 ----
  	  (aux1 (/ lnz totn)))
       (if (> indx totn) (set! indx totn))
!      (if (>= lnz totn) 
! 	(list-ref Lst (- indx 1))
! 	(list-ref Lst (- (inexact->exact (truncate (* aux1 indx))) 1)))))
  
  
***************
*** 114,118 ****
      (if (null? Dum)
  	(set! Numaux1 (map (lambda (x) (+ x mini))
! 	    				(mk-ordrlst (- maxi mini))))
  	(set! val     (car Dum))
  	(set! num     (cadr Dum))
--- 129,133 ----
      (if (null? Dum)
  	(set! Numaux1 (map (lambda (x) (+ x mini))
! 			   (mk-ordrlst (- maxi mini))))
  	(set! val     (car Dum))
  	(set! num     (cadr Dum))
***************
*** 120,123 ****
--- 135,140 ----
  	(set! Numaux2 (cadddr Dum))
  	(set! Lstaux  (car (cddddr Dum))))
+ ;    (prn "Dum "Dum)
+ ;    (prn val num Numaux1 Numaux2 Lstaux)
      (if (not (null? num))
  	(set! num (if (= num 2) '() (- num 1)))
***************
*** 184,187 ****
--- 201,272 ----
    (reverse rsl)))
  
+ 
+ (define (betweenlstlinint xi xa lsta xz lstz)
+    (betweenlst (map (lambda (ya yz) (linint xi xa ya xz yz)) lsta lstz)))
+ 
+ (define (betweenlstexpint xi xa lsta xz lstz pnd)
+    (betweenlst (map (lambda (ya yz) (expint xi xa ya xz yz pnd)) lsta lstz)))
+ 
+ (define (betweenlststadint xi xa lsta xz lstz)
+     (betweenlst (map (lambda (ya yz) (stadint xi xa ya xz yz)) lsta lstz)))
+ 
+ ;
+ (define (tendencylinseg xi xa Lsta xz Lstz)
+   (apply mk-ordrlst (map (lambda (x) (rrund x))
+ 			 (lstlinint xi xa Lsta xz Lstz))))
+ 
+ (define (tendencyexpseg xi xa Lsta xz Lstz pnd)
+   (apply mk-ordrlst (map (lambda (x) (rrund x))
+ 			 (lstexpint xi xa Lsta xz Lstz pnd))))
+ 
+ (define (tendencylinint xi xa Lsta xz Lstz)
+   (apply randint (lstlinint xi xa Lsta xz Lstz)))
+ 
+ (define (tendencyexpint xi xa Lsta xz Lstz pnd)
+   (apply randint (lstexpint xi xa Lsta xz Lstz pnd)))
+ 
+ (define (tendencylinsel xi xa Lsta xz Lstz Lst)
+   (list-ref Lst (rround (tendencylinint xi xa Lsta xz Lstz))))
+ 
+ (define (tendencysxpsel xi xa Lsta xz Lstz pnd Lst)
+   (list-ref Lst (rround (tendencyexpint xi xa Lsta xz Lstz pnd))))
+ ;
+ (define (tendencylinseg xi xa Lsta xz Lstz)
+   (apply mk-ordrlst (map (lambda (x) (rrund x))
+ 			 (lstlinint xi xa Lsta xz Lstz))))
+ 
+ (define (tendencyexpseg xi xa Lsta xz Lstz pnd)
+   (apply mk-ordrlst (map (lambda (x) (rrund x))
+ 			 (lstexpint xi xa Lsta xz Lstz pnd))))
+ 
+ (define (tendencyaleasel xi xa Lsta xz Lstz Lst)
+   (list-ref Lst (aleasel (tendencylinseg xi xa Lsta xz Lstz))))
+ 
+ (define (sersel Lst Dum)
+   (let ((lnz (1- (length Lst))) (elm) (aux))
+ ;    (prn "A" Dum lnz Lst)
+     (if (null? Dum)
+ 	(set! Dum (Lstshuffle (mk-ordrlst lnz)))
+ 	(for-each (lambda (x) (if (<= x lnz) (set! aux (cons x aux)))) Dum)
+ 	(set! Dum (if (null? aux) (Lstshuffle (mk-ordrlst lnz)) aux))
+         (if (= (length Dum) 1)
+ 	   (begin (set! elm (car Dum))
+ 	   	  (set! Dum (Lstshuffle (mk-ordrlst lnz)))
+ 	   	  (while (and (> lnz 1) (= elm (car Dum)))
+ 		  	(set! Dum (Lstshuffle (mk-ordrlst lnz))))
+ 		  (set! Dum (cons elm Dum)))))
+     (set! elm (car Dum))
+ ;    (prn "B" Dum elm (nth Lst elm))
+     (list (nth Lst elm) (cdr Dum))))
+ ;
+ (define (tendencylinsersel xi xa Lsta xz Lstz Lst Dum)
+   (let ((aux (sersel (tendencylinseg xi xa Lsta xz Lstz) Dum)))
+     (list (list-ref Lst (- (car aux) 1)) (cadr aux))))
+ ;
+ (define (tendencyexpsersel xi xa Lsta xz Lstz Lst pnd Dum)
+   (let ((aux (sersel (tendencyexpseg xi xa Lsta xz Lstz pnd) Dum)))
+     (list (list-ref Lst (- (car aux) 1)) (cadr aux))))
+ ;
+ (define tendencymask tendencylinsersel)
  ;
  ;;
***************
*** 191,195 ****
--- 276,298 ----
  
  (add-Node-Function ALEA	(aleasel Data))
+ 
+ (add-Node-Function ALEALSTSTADINT
+     (lambda (x)
+       (aleasel 
+ 	 (lststadint x (car Data) (cadr Data) (caddr Data) (cadddr Data))))
+       Xi)
+ 
  (add-Node-Function ALCIRC (alcircsel Data Index))
+ 
+ (add-Node-Function BETWEENLSTEXPINT
+     (lambda (x)
+ 	(betweenlstexpint x (car Data) (cadr Data) (caddr Data) (cadddr Data)
+ 	    					(car (cddddr Data))))
+     Xi)
+ (add-Node-Function BETWEENLSTLININT
+     (lambda (x)
+ 	(betweenlstlinint x (car Data) (cadr Data) (caddr Data) (cadddr Data)))
+     Xi)
+ 
  (add-Node-Function CIRC	(circsel Data Index))
  (add-Node-Function EXPINT
***************
*** 217,220 ****
--- 320,324 ----
  	(linint x (car Data) (cadr Data) (caddr Data) (cadddr Data)))
      Xi)
+ 
  (add-Node-Function LSTEXPINT
      (lambda (x)
***************
*** 244,245 ****
--- 348,395 ----
  	(stepfun x (car Data) (cadr Data) (caddr Data) (cadddr Data)))
      Xi)
+ ;
+ ;;
+ ;
+ (add-Node-Function TENDENCY
+     (lambda (x)
+       (let ((aux1 (apply tendencylinsersel (append (list x) 
+ 						   Data 
+ 						   (list Partial-Result)))))
+ 	(set! Partial-Result (cadr aux1)) (car aux1)))
+       Xi)
+ 
+ (add-Node-Function TENDENCYX
+     (lambda (x)
+       (let ((aux1 (apply tendencyexpsersel (append (list x) 
+ 						   Data 
+ 						   (list Partial-Result)))))
+ 	(set! Partial-Result (cadr aux1)) (car aux1)))
+       Xi)
+ ;
+ (add-Node-Function ENV_TENDENCY
+     (lambda (x)
+       (let* ((xa (car Data)) (Lsta (cadr Data)) 
+ 	     (xz (caddr Data)) (Lstz (cadddr Data))
+ 	     (Lst) (aux1))
+ 	(set! Lsta (car Lsta))
+ 	(set! Lst (cadr Lstz))
+ 	(set! Lstz (car Lstz))
+ 	(set! aux1 (tendencylinsersel x xa Lsta xz Lstz Lst Partial-Result))
+ 	(set! Partial-Result (cadr aux1)) (car aux1)))
+     Xi)
+ 
+ (add-Node-Function ENV_TENDENCYX
+     (lambda (x)
+       (let* ((xa (car Data))   (Lsta (cadr Data)) 
+ 	     (xz (caddr Data)) (Lstz (cadddr Data)) 
+ 	     (Lst) (pnd) (aux1))
+        (set! Lsta (car Lsta))
+        (set! pnd (caddr Lstz))
+        (set! Lst (cadr Lstz))
+        (set! Lstz (car Lstz))
+        (set! aux1 (tendencyexpsersel x xa Lsta xz Lstz Lst pnd Partial-Result))
+        (set! Partial-Result (cadr aux1)) (car aux1)))
+     Xi)
+ ;
+ 
+ 

[foo-cvs] foo/elkfoo/scm/control/interface-lib sp-components.foo,1.1,1.2 sp-datapack-funs.foo,1.1,1.2 sp-patchgen-funs.foo,1.1,1.2 sp-sigpack-type.foo,1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/interface-lib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8357/interface-lib

Modified Files:
	sp-components.foo sp-datapack-funs.foo sp-patchgen-funs.foo 
	sp-sigpack-type.foo 
Log Message:
raw checkin of new control

Index: sp-components.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/interface-lib/sp-components.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** sp-components.foo	7 Aug 2004 22:53:01 -0000	1.1
--- sp-components.foo	27 Feb 2005 20:06:33 -0000	1.2
***************
*** 1,2 ****
--- 1,10 ----
+ ;
+ ;;
+ ;;; missing modules
+ ;
+ ; cbiquad~ in d0 d1 d2 c0 c1 //foo:shelfing-coefs
+ ; osc~ frq tablefile [initphase] // tablefile length = power of two
+ ; reverb8~ tr0 trl trm trh fl fh
+ 
  (define (Bln Dur Frq . args)
     (let* ((Frq  (Sigpar-fun Frq Dur))
***************
*** 9,12 ****
--- 17,28 ----
  	(bln~ Frq taps seed)))
  
+ (define (CBiquad Dur Glow Gmed Ghih Flow Fmed Input)
+    (let ((Input (Input-fun Input Dur))
+ 	 (SR (foo-default-srate)))
+ 	(apply cbiquad~ (append 
+ 			 (list Input)
+ 			 (foo:shelfing-coefs Glow Gmed Ghih Flow Fmed SR)))
+ 	))
+ 
  (define (Cfilter Dur Frq Bdw Input)
     (let ((Input (Input-fun Input Dur)))
***************
*** 65,68 ****
--- 81,90 ----
  		  (noise~))))
  
+ (define (Osc Dur Frq TablFile . initphas)
+    (let ((Frq      (Sigpar-fun Frq Dur))
+          (initphas (cleanlist initphas)))
+ 	(if (not (null? initphas))  (osc~ Frq TablFile(car initphas))
+ 		     		    (osc~ Frq TablFile))))
+ 
  (define (Reverb Dur NCh Ndl Rvt0 Damp Input . delays)
    (let ((Input (if (pair? Input) (map (lambda (x) (Input-fun x Dur)) Input)
***************
*** 99,103 ****
--- 121,188 ----
        (do ((c NCh (- c 1))) ((= c 0) (if (= (length rout) 1) (car rout) rout))
  	   (set! rout (cons (revout~ c rin) rout)))))
+ ;
+ ;;
+ ;;; True definition of Reverb8Nw but revout~ doesn't work yet with revreb8~
+ ;;; so we use the next definition for the time being. Mono output.
+ ;;
+ ;
+ (define (ReverbNw Dur NCh Rvt0 RvtL RvtM RvtH FrqL FrqH Input . delays)
+   (let ((Input (if (pair? Input) (map (lambda (x) (Input-fun x Dur)) Input)
+ 				 (list (Input-fun Input Dur))))
+     	(delays (if (not (null? delays)) (list (flatten delays)) '()))
+ 	(Cmbjn (if (= (modulo NCh 2) 0) NCh (+ NCh 1)))
+ 	(rin) (rout))
+     (set! rin 
+ 	   (apply reverb8~ (append (list Rvt0 RvtL RvtM RvtH FrqL FrqH Cmbjn)
+ 				   Input delays)))
+     (do ((c NCh (- c 1))) ((= c 0) (if (= (length rout) 1) (car rout) rout))
+        (set! rout (cons (revout~ c rin) rout)))))
  
+ ;(define (ReverbNw Dur NCh Rvt0 RvtL RvtM RvtH FrqL FrqH Input . delays)
+ ;  (let* ((Input (if (pair? Input) (map (lambda (x) (Input-fun x Dur)) Input)
+ ;		                  (list (Input-fun Input Dur))))
+ ;;	 (Cmbjn (if (= (modulo NCh 2) 0) NCh (+ NCh 1)))
+ ;	 (Cmbjn 2)
+ ;	 (rin) (rout)
+ ;	 (del1 (if (not (null? delays)) (list (flatten delays)) '()))
+ ;;	       '(.051129990 .059387966 .062981972 .069091782
+ ;;	         .078113106 .083835861 .090198380 .098070000))) ;default
+ ;	 (del2 '((.051129997 .059387965 .062981977 .069091789
+ ;		 .078113104 .083835861 .090198385 .098070008)))
+ ;	 (del3 '((.051129993 .059387962 .062981977 .069091784
+ ;		 .078113105 .083835861 .090198388 .098070007)))
+ ;	 (del4 '((.051129993 .059387963 .062981975 .069091783
+ ;	         .078113103 .083835864 .090198385 .098070003)))
+ ;	 (del5 '((.051129999 .059387961 .062981977 .069091789
+ ;		 .078113100 .083835867 .090198381 .098070007)))
+ ;	 (del6 '((.051129994 .059387968 .062981977 .069091788
+ ;	         .078113109 .083835862 .090198387 .098070003)))
+ ;	 (del7 '((.051129994 .059387965 .062981977 .069091781
+ ;		 .078113106 .083835866 .090198388 .098070008)))
+ ;	 (del8 '((.051129990 .059387964 .062981978 .069091780
+ ;		 .078113102 .083835869 .090198388 .098070006)))
+ ;	(delaylst (list del1 del2 del3 del4 del5 del6 del7 del8)))
+ ;;    (prn Dur NCh Rvt0 RvtL RvtM RvtH FrqL FrqH)
+ ;    (if (= NCh 1)
+ ;       (apply reverb8~ 
+ ;	      (append (list Rvt0 RvtL RvtM RvtH FrqL FrqH Cmbjn) Input del1))
+ ;       (if (= (length Input) NCh)
+ ;	(begin
+ ;	  (prn "NChns Out = NChans In")
+ ;	  (map 
+ ;	   (lambda (inp) 
+ ;	     (apply reverb8~ (append (list Rvt0 RvtL RvtM RvtH FrqL FrqH Cmbjn)
+ ;				     (list inp) del1))) Input))
+ ;	  (map 
+ ;	   (lambda (dels) 
+ ;	     (apply reverb8~ (append (list Rvt0 RvtL RvtM RvtH FrqL FrqH Cmbjn)
+ ;				     Input dels))) delaylst)))
+ ;    ))
+ ;;
+ ;
+ ;;
+ ;;;
+ ;;
+ ;
  (define (Sampler Dur Frq Snd . taps)
    (let ((Snd  (Sndpar-fun Snd))
***************
*** 105,110 ****
  	(taps (if (not (null? (cleanlist taps))) (cleanlist taps) #f)))
       (if (pair? Snd)
! 	(apply add~ (map (lambda (x) (if taps (transp-snd~ Snd Frq (car taps))
! 	  	 			      (transp-snd~ Snd Frq))) Snd))
  	(if taps (transp-snd~ Snd Frq (car taps))
  		 (transp-snd~ Snd Frq)))))
--- 190,195 ----
  	(taps (if (not (null? (cleanlist taps))) (cleanlist taps) #f)))
       (if (pair? Snd)
! 	(apply add~ (map (lambda (x) (if taps (transp-snd~ x Frq (car taps))
! 	  	 			      (transp-snd~ x Frq))) Snd))
  	(if taps (transp-snd~ Snd Frq (car taps))
  		 (transp-snd~ Snd Frq)))))
***************
*** 124,128 ****
     (let ((Input (Input-fun Input Dur))
  	 (Frq   (Sigpar-fun Frq Dur))
! 	 (Bdw   (Sigpar-fun Bdw Dur)))
  	(v2pf~ Input Frq Bdw)))
  
--- 209,213 ----
     (let ((Input (Input-fun Input Dur))
  	 (Frq   (Sigpar-fun Frq Dur))
! 	 (Bdw   (Sigpar-fun Bdw Dur))); (prn Bdw) (print~ Bdw)
  	(v2pf~ Input Frq Bdw)))
  

Index: sp-patchgen-funs.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/interface-lib/sp-patchgen-funs.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** sp-patchgen-funs.foo	7 Aug 2004 22:53:01 -0000	1.1
--- sp-patchgen-funs.foo	27 Feb 2005 20:06:33 -0000	1.2
***************
*** 10,14 ****
      	(Input  (if (null? (flatout Input)) '() (flatout Input))))
  
!     (if (and (not (null? Args)) (= (length Args) 1)) (set! Args (car Args)))		
      (time Off
  	(if (not (null? Input))
--- 10,14 ----
      	(Input  (if (null? (flatout Input)) '() (flatout Input))))
  
!     (if (and (not (null? Args)) (= (length Args) 1)) (set! Args (car Args)))
      (time Off
  	(if (not (null? Input))
***************
*** 110,123 ****
  	(#t	(error 'SP-run "Unknown Mode ~s" Mode))))
  
  (define (ParseType Type)
     (if (symbol? Type) (set! Type (symbol->string Type)))
     (cond
! 	((string-ci=? Type "Incremental")	'incremental)
! 	((string-ci=? Type "Float")		'float)
! 	((string-ci=? Type "Short")		'short)
! 	((string-ci=? Type "Long")		'long)
! 	((string-ci=? Type "Double")		'double)
! 	((string-ci=? Type "Char")		'char)
! 	(#t	(error 'SP-run "Unknown Snd-Type ~s" Type))))
  
  (define (putimx filnam)
--- 110,155 ----
  	(#t	(error 'SP-run "Unknown Mode ~s" Mode))))
  
+ (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) 
+       (set! Format 'float)
+       (set! Format (ParseFormat Format))
+       (if (not Format) (error 'SP-run "Unknown Snd-Format ~s" Format)))
+    (list Type Format)))
+ 
+ (define (ParseFormat Format)
+    (if (symbol? Format) (set! Format (symbol->string Format)))
+    (cond
+ ;	((string-ci=? Format "Incremental")	'incremental)
+ 	((string-ci=? Format "Float")		'float)
+ 	((string-ci=? Format "Short")		'short)
+ 	((string-ci=? Format "Long")		'long)
+ 	((string-ci=? Format "Double")		'double)
+ 	((string-ci=? Format "Char")		'char)
+ 	(#t                                     #f)))
+ 
  (define (ParseType Type)
     (if (symbol? Type) (set! Type (symbol->string Type)))
     (cond
!         ((string-ci=? Type "Incremental")'incremental)
! 	((string-ci=? Type "Wav")	'wav)
! 	((string-ci=? Type "Aiff")	'aiff)
! 	((string-ci=? Type "Snd")	'snd)
! 	((string-ci=? Type "Paf")	'paf)
! 	((string-ci=? Type "Svx")	'svx)
! 	((string-ci=? Type "Nist")	'nist)
! 	((string-ci=? Type "Vac")	'vac)
! 	((string-ci=? Type "Ircam")	'ircam)
! 	((string-ci=? Type "Wav64")	'wav64)
! 	((string-ci=? Type "Mat4")	'mat4)
! 	((string-ci=? Type "Mat5")	'mat5)
! 	((string-ci=? Type "Pvf")	'pvf)
! 	((string-ci=? Type "Xi")	'xi)
! 	(#t	(error 'SP-run "Unknown Soundfile Type ~s" Type))))
  
  (define (putimx filnam)
***************
*** 189,193 ****
  	(Workfile) (FileRS)
     	(Mode 'punch) (Off 0) (Ref 0) (Sclr 1) (Nfctr 1)
! 	(Chns) (Type 'float) (SRat) (SRc)  
  	(Offctxt) (Durctxt) (Chnctxt) (Pflg #t)
  	(aux) (ctxt) (DUM) (strm) (tsk) (flg #t)
--- 221,227 ----
  	(Workfile) (FileRS)
     	(Mode 'punch) (Off 0) (Ref 0) (Sclr 1) (Nfctr 1)
! 	(Chns) (SRat) (SRc)
! ;	(Format 'float) (Type 'aiff) 	
! 	(Format #f) (Type #f) 
  	(Offctxt) (Durctxt) (Chnctxt) (Pflg #t)
  	(aux) (ctxt) (DUM) (strm) (tsk) (flg #t)
***************
*** 209,218 ****
      (set! DUM (assq 'Snd-Chns Args))	(if DUM (set! Chns (cadr DUM)))
      (set! DUM (assq 'Snd-Type Args))	(if DUM (set! Type (cadr DUM)))
      (set! DUM (assq 'Snd-SR Args))	(if DUM (set! SRat (cadr DUM)))
      (set! DUM (assq 'Task-SR Args))	(if DUM (set! SRc (cadr DUM)))
      (set! DUM (assq 'Print Args))	(if DUM (set! Pflg (cadr DUM)))
      (if (symbol? Filename) (set! Filename (symbol->string Filename)))
!     (set! Mode (ParseMode Mode))
!     (set! Type (ParseType Type))
      (cond
        ((equal? Mode 'Undo)
--- 243,260 ----
      (set! DUM (assq 'Snd-Chns Args))	(if DUM (set! Chns (cadr DUM)))
      (set! DUM (assq 'Snd-Type Args))	(if DUM (set! Type (cadr DUM)))
+     (set! DUM (assq 'Snd-Format Args))	(if DUM (set! Format (cadr DUM)))
      (set! DUM (assq 'Snd-SR Args))	(if DUM (set! SRat (cadr DUM)))
      (set! DUM (assq 'Task-SR Args))	(if DUM (set! SRc (cadr DUM)))
      (set! DUM (assq 'Print Args))	(if DUM (set! Pflg (cadr DUM)))
      (if (symbol? Filename) (set! Filename (symbol->string Filename)))
!     (set! Mode   (ParseMode   Mode))
! ;
! ;;  for backward compatibility {the old Type was the new Format}
! ;;  we group in one function the parsing of Type and Format
! ;
!     (set! DUM   (ParseTypeFormat Type Format))
!     (set! Type (car DUM))
!     (set! Format (cadr DUM))
! ;
      (cond
        ((equal? Mode 'Undo)
***************
*** 271,287 ****
  
  	    (set! Workfile
  	      (make-sndname
  	    	(if (equal? Type 'incremental)
! 		   (begin (set! Mode 'blend) (string-append Filename ".imx"))
! 		   Filename)))
  	    (if (file-exists? Workfile)
  	       (if (not (equal? Mode 'blend))
! 	          (if (or (equal? Filename foo:name)
  	       	          (SP-Demand Workfile))
  		     (begin
  		        (system (string-append "rm -rf "Workfile))
!                         (make-soundfile Workfile Type Chns SRat))
                       (set! flg #f)))
! 		(make-soundfile Workfile Type Chns SRat))
  
  	    (if flg
--- 313,333 ----
  
  	    (set! Workfile
+ 	     (tilde-expand
  	      (make-sndname
  	    	(if (equal? Type 'incremental)
! 		   (begin (set! Mode 'blend)
! 			  (set! Format 'auto)
! 			  (string-append Filename ".imx"))
! 		   (if (equal? Filename foo:name) (foo:test-file-name)
! 		                                  Filename)))))
  	    (if (file-exists? Workfile)
  	       (if (not (equal? Mode 'blend))
! 	          (if (or (equal? Workfile (foo:test-file-name))
  	       	          (SP-Demand Workfile))
  		     (begin
  		        (system (string-append "rm -rf "Workfile))
!                         (make-soundfile Workfile Type Format SRat Chns))
                       (set! flg #f)))
! 		(make-soundfile Workfile Type Format SRat Chns))
  
  	    (if flg
***************
*** 294,298 ****
  	           (prn " Synthesizing = <<Duration Factor>> ==> "Dur Sclr))
  	        (run-task tsk Dur Sclr)
! 	        (if (and (equal? Type 'float)
  	       		 (not (equal? Mode 'blend)))
  	          (begin
--- 340,344 ----
  	           (prn " Synthesizing = <<Duration Factor>> ==> "Dur Sclr))
  	        (run-task tsk Dur Sclr)
! 	        (if (and (equal? Format 'float)
  	       		 (not (equal? Mode 'blend)))
  	          (begin
***************
*** 400,403 ****
--- 446,463 ----
  	 (equal? Type 'Bln)
  	 (equal? Type Bln))	(append (list SP-Component Bln Dur) Args))
+ 
+     ((or (equal? Type 'ReverbNw)
+ 	 (equal? Type 'Reverbnw)
+ 	 (equal? Type 'reverbnw)
+       (equal? Type ReverbNw))  (append (list SP-Component ReverbNw Dur) Args))
+     ((or (equal? Type 'CBiquad)
+ 	 (equal? Type 'cbiquad)
+ 	 (equal? Type 'shelf)
+ 	 (equal? Type CBiquad))	(append (list SP-Component CBiquad Dur) Args))
+     ((or (equal? Type 'Osc)
+ 	 (equal? Type 'osc)
+ 	 (equal? Type 'Oscillator)
+ 	 (equal? Type Osc))	(append (list SP-Component Osc Dur) Args))
+ 
      ((or (equal? Type 'Module)
  	 (equal? Type Module))	(append (list SP-Component Module Dur) Args))
***************
*** 486,489 ****
--- 546,563 ----
  	     (equal? Type 'Bln)
  	     (equal? Type Bln))		(append (list Bln) Args))
+ 
+ 	((or (equal? Type 'ReverbNw)
+ 	     (equal? Type 'Reverbnw)
+ 	     (equal? Type 'reverbnw)
+ 	     (equal? Type ReverbNw))  (append (list ReverbNw) Args (list Inp)))
+ 	((or (equal? Type 'CBiquad)
+ 	     (equal? Type 'cbiquad)
+ 	     (equal? Type 'shelf)
+ 	     (equal? Type CBiquad))   (append (list CBiquad) Args (list Inp)))
+ 	((or (equal? Type 'Osc)
+ 	     (equal? Type 'osc)
+ 	     (equal? Type 'Oscillator)
+ 	     (equal? Type Osc))	      (append (list Osc) Args))
+ 	
  	((or (equal? Type 'Module)
  	     (equal? Type Module)) (if (not (null? Inp))

Index: sp-datapack-funs.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/interface-lib/sp-datapack-funs.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** sp-datapack-funs.foo	7 Aug 2004 22:53:01 -0000	1.1
--- sp-datapack-funs.foo	27 Feb 2005 20:06:33 -0000	1.2
***************
*** 9,13 ****
  ;
  
! (define (Sigpar-fun Pack Dur)
    (let ((Dur (if (number? Dur) Dur 1)))
  
--- 9,13 ----
  ;
  
! (define (Sigpar-fun Pack Dur) ;(prn "Sigpar-fun "Pack Dur)
    (let ((Dur (if (number? Dur) Dur 1)))
  
***************
*** 188,198 ****
  	(#t			(let ((Amp (Sigpar-fun (car Pack) Dur))
  			      	      (Frq (Sigpar-fun (cadr Pack) Dur)))
! 				   (mul~ Amp  (bln~ Frq 4 1993))))))
  
  (define (Jittermod Pack Dur)
     (let ((Amp (Sigpar-fun (car Pack) Dur)))
!        (mul~ Amp (~ 2.13) (div~ (add~ (bln~ (~ 20.134) 4 1993)
!        				      (bln~ (~ 9.109) 4 1994)
!        				      (bln~ (~ 0.821) 4 1995)) (~ 3)))))
  
  (define (Decode-spk arg Dur)
--- 188,198 ----
  	(#t			(let ((Amp (Sigpar-fun (car Pack) Dur))
  			      	      (Frq (Sigpar-fun (cadr Pack) Dur)))
! 				   (mul~ Amp  (bln~ Frq 6 1993))))))
  
  (define (Jittermod Pack Dur)
     (let ((Amp (Sigpar-fun (car Pack) Dur)))
!        (mul~ Amp (~ 2.13) (div~ (add~ (bln~ (~ 20.134) 6 1993)
!        				      (bln~ (~ 9.109)  6 1994)
!        				      (bln~ (~ 0.821)  6 1995)) (~ 3)))))
  
  (define (Decode-spk arg Dur)
***************
*** 256,260 ****
     	((snd? Pack)	    	Pack)
  	((or (string? Pack)
! 	     (symbol? Pack)) 	(open-snd Pack))
  	((procedure? Pack)	(Pack))
  	((node? Pack)		(compute-node Pack))
--- 256,260 ----
     	((snd? Pack)	    	Pack)
  	((or (string? Pack)
! 	     (symbol? Pack)) 	(Eval-sndpack (make-sndpack Pack)))
  	((procedure? Pack)	(Pack))
  	((node? Pack)		(compute-node Pack))
***************
*** 264,281 ****
  
  (define (get-Sound Pack)
!   (let ((Snd  (sndpack.name Pack))
!   	(Chnl (sndpack.channel Pack)))
  
      (set! Snd
  	    (cond
! 	        ((procedure? Snd)		(Snd))
! 		((or (string? Snd)
! 		     (symbol? Snd))		(open-snd Snd))
! 		((snd? Snd)			Snd)))
      (set! Chnl
  	    (cond
  		((number? Chnl)			Chnl)
  		((and (pair? Chnl)
! 		      (numerical? Chnl))	Chnl)))
  
      (cond
--- 264,287 ----
  
  (define (get-Sound Pack)
!   (let ((Snd  (make-sndname (sndpack.name Pack)))
!   	(Chnl (sndpack.channel Pack))
! 	(Nchs 1))
  
      (set! Snd
  	    (cond
! 	        ((procedure? Snd)	(Snd))
! 		((symbol? Snd)		(set! Snd (symbol->string Snd))
! 					(set! Nchs (soundfile-channels Snd))
! 					(open-snd Snd))
! 		((string? Snd)		(set! Nchs (soundfile-channels Snd))
! 					(open-snd Snd))
! 		((snd? Snd)		Snd)))
      (set! Chnl
  	    (cond
  		((number? Chnl)			Chnl)
  		((and (pair? Chnl)
! 		      (numerical? Chnl))	Chnl)
!                 ((and (null? Chnl)
!                       (> Nchs 1))         (mk-ordrlst Nchs 1))))
  
      (cond
***************
*** 382,391 ****
  
        ((snd? Pack)	(read-snd~ Pack))
!       ((sndpack? Pack)	(set! Snd (Sndpar-fun Pack))
!       			(if (pair? Snd)
! 			    (apply add~ (map (lambda (x) (read-snd~ x)) Snd))
! 			    (read-snd~ Snd)))
!       ((string? Pack)   (read-snd~ (Sndpar-fun Pack)))
!       ((symbol? Pack)	(read-snd~ (Sndpar-fun Pack)))
        ((and (pair? Pack)
        	    (or (snd? (car Pack))
--- 388,398 ----
  
        ((snd? Pack)	(read-snd~ Pack))
!       ((or (string? Pack)
! 	   (sndpack? Pack)
! 	   (symbol? Pack))  (set! Snd (Sndpar-fun Pack))
! 	                    (if (pair? Snd)
! 			       (apply add~ 
! 				      (map (lambda (x) (read-snd~ x)) Snd))
! 			       (read-snd~ Snd)))
        ((and (pair? Pack)
        	    (or (snd? (car Pack))

Index: sp-sigpack-type.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/interface-lib/sp-sigpack-type.foo,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** sp-sigpack-type.foo	7 Aug 2004 22:53:01 -0000	1.1
--- sp-sigpack-type.foo	27 Feb 2005 20:06:33 -0000	1.2
***************
*** 312,322 ****
   (set! set-sigpack.rfr
      (lambda (obj val)
!      (make-sigpack val (sigpack.env obj) (sigpack.mod obj) (sigpack.val obj))))
   (set! set-sigpack.env
      (lambda (obj val)
!      (make-sigpack (sigpack.rfr obj) val (sigpack.mod obj) (sigpack.val obj))))
   (set! set-sigpack.mod
      (lambda (obj val)
!      (make-sigpack (sigpack.rfr obj) (sigpack.env obj) val (sigpack.val obj))))
   (set! set-sigpack.cal
      (lambda (obj val)
--- 312,322 ----
   (set! set-sigpack.rfr
      (lambda (obj val)
!      (make-sigpack val (sigpack.env obj) (sigpack.mod obj) (sigpack.cal obj))))
   (set! set-sigpack.env
      (lambda (obj val)
!      (make-sigpack (sigpack.rfr obj) val (sigpack.mod obj) (sigpack.cal obj))))
   (set! set-sigpack.mod
      (lambda (obj val)
!      (make-sigpack (sigpack.rfr obj) (sigpack.env obj) val (sigpack.cal obj))))
   (set! set-sigpack.cal
      (lambda (obj val)

[foo-cvs] foo/elkfoo/scm/control/envelope envelope.foo,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm/control/envelope
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8357/envelope

Modified Files:
	envelope.foo 
Log Message:
raw checkin of new control

Index: envelope.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/control/envelope/envelope.foo,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** envelope.foo	11 Aug 2004 12:26:18 -0000	1.2
--- envelope.foo	27 Feb 2005 20:06:32 -0000	1.3
***************
*** 560,567 ****
    (let ((xmax (+ (send self 'get-Xmin) (send self 'get-Xlength)))
    	(xi) (yi) (env (send self 'get-Envelope)) (Qtum) (rsl)
! 	(aux) (xl (send self 'get-Xlast)) (yl (send self 'get-Ylast)))
  
      (if (and (not (null? Args))
  	    (number? (car Args))) (send self 'set-Quantum (car Args)))
      (send self 'set-Xlast (send self 'default-Xlast))
      (set! Qtum (send self 'get-Quantum))
--- 560,570 ----
    (let ((xmax (+ (send self 'get-Xmin) (send self 'get-Xlength)))
    	(xi) (yi) (env (send self 'get-Envelope)) (Qtum) (rsl)
! 	(aux) (xl (send self 'get-Xlast)) (yl (send self 'get-Ylast))
!         (lpair) (lval))
  
      (if (and (not (null? Args))
  	    (number? (car Args))) (send self 'set-Quantum (car Args)))
+     (set! lpair (last-pair env))
+ ;    (set! lval (caar lpair))
      (send self 'set-Xlast (send self 'default-Xlast))
      (set! Qtum (send self 'get-Quantum))
***************
*** 570,578 ****
          (begin
            (set! xi (send self 'get-Xlast))
!  	  (while (<= (+ xi Qtum) xmax)
  		(set! yi  (send self 'Envnext))
  		(set! xi  (send self 'get-Xlast))
  		(set! rsl (cons (list xi yi) rsl)))
! 	  (reverse rsl))
          (send self 'invent-a-bpf)))
       (send self 'set-Xlast xl)
--- 573,581 ----
          (begin
            (set! xi (send self 'get-Xlast))
!           (while (< (+ xi Qtum) (- xmax (/ Qtum 2.)))
  		(set! yi  (send self 'Envnext))
  		(set! xi  (send self 'get-Xlast))
  		(set! rsl (cons (list xi yi) rsl)))
! 	  (reverse (append lpair rsl)))
          (send self 'invent-a-bpf)))
       (send self 'set-Xlast xl)

[foo-cvs] foo/elkfoo/examples/scripts sine.foo,1.2,1.3

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/examples/scripts
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21752

Modified Files:
	sine.foo 
Log Message:
adopted sine example to new cmdline: stuff in order to show how to use it...

Index: sine.foo
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/examples/scripts/sine.foo,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** sine.foo	16 Aug 2004 19:50:05 -0000	1.2
--- sine.foo	3 Feb 2005 15:30:55 -0000	1.3
***************
*** 1,31 ****
! #!/usr/local/bin/foo
  
  ;; foo scripting example
! ;; (c) 2004 rumori
  
  ;; checking command line
! (if (< (length (command-line-args)) 3)
!     (begin
!       (format #t "usage: ~a <duration> <frequency>\n"
! 	      (car (command-line-args)))
!       (quit)))
  
! (format #t "~a script example~%" (car (command-line-args)))
! (format #t "creating, playing and removing a test-file.~%")
  
! ;; extract parameters from command line
! (define duration (string->number (list-ref (command-line-args) 1)))
! (define freq (string->number (list-ref (command-line-args) 2)))
  
! (format #t "duration: ~a  frequency: ~a~%" duration freq)
  
! (format #t "synthesizing...~%")
  
! ;; here we do the major work
! (syn 1 duration (output~ 1 (sine~ (~ freq))))
  
! (format #t "~%playing using '~a'~%" foo-default-play-command)
  
! (format #t "exiting (will remove temporary file as well)~%")
  
  ;; done
--- 1,63 ----
! #!/usr/local/bin/foo --
  
  ;; foo scripting example
! ;; (c) 2004-2005 rumori
! 
! (require 'cmdline)
  
  ;; checking command line
! (let*
!     ;; single-opt or equiv-opts-list | mandatory? | with-params? | help-string
!     ((option-list '(("--help" #f #f "this help screen")
! 		    (("--freq" "-f") #t #t "frequency (hz)")
! 		    (("--amp" "-a") #t #t "amplitude (0...1)")
! 		    (("--dur" "-d") #t #t "duration (s)")))
!      (help
!       (lambda ()
! 	(format #t "usage: ~a [options]\noptions understood:\n" (car (foo:script-args)))
! 	(format #t "~a\n" (cmdline:help-message option-list))
! 	(exit)))
!      (number-check
!       (lambda (arg description)
! 	(if (not (number? arg))
! 	    (begin
! 	      (format #t "~a has to be number!\n" description)
! 	      (help)))))
!      (freq)
!      (amp)
!      (dur))
  
!   ;; help needed?
!   (if (cmdline:option-given? (foo:script-args) option-list "--help")
!       (help))
!   ;; validate cmdline
!   (if (not (cmdline:cmdline-valid? (cdr (foo:script-args)) option-list #t))
!       (help))
!   ;; get parameters (take in account just 1st param of each option)
!   (set! freq (string->number (car (cmdline:get-option-param (foo:script-args) option-list "--freq"))))
!   (set! amp (string->number (car (cmdline:get-option-param (foo:script-args) option-list "--amp"))))
!   (set! dur (string->number (car (cmdline:get-option-param (foo:script-args) option-list "--dur"))))
!   ;; check parameters
!   (number-check freq "frequency")
!   (number-check amp "amplitude")
!   (number-check dur "duration")
  
!   (format #t "~a script example~%" (car (foo:script-args)))
!   (format #t "creating, playing and removing a test-file.~%")
  
!   (format #t "frequency: ~a amplitude: ~a duration: ~a~%" freq amp dur)
  
!   (format #t "synthesizing...~%")
  
!   ;; here we do the major work
!   (syn 1 dur (output~ 1 (mul~ (~ amp) (sine~ (~ freq)))))
  
!   (format #t "~%playing using '~a'~%" foo-default-play-command)
  
!   (play)
! 
!   (format #t "exiting (will remove temporary file as well)~%"))
! 
! (quit)
  
  ;; done

[foo-cvs] foo/elkfoo/scm cmdline.scm,NONE,1.1 initialize.foo,NONE,1.1 Makefile.am,1.5,1.6 toplevel.foo.in,1.7,1.8

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/scm
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21309

Modified Files:
	Makefile.am toplevel.foo.in 
Added Files:
	cmdline.scm initialize.foo 
Log Message:
refined startup code.  added cmdline: tools for parsing cmdlines e. g. with scripting.  added foo options like --load --unload for packaging support.

Index: Makefile.am
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/Makefile.am,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** Makefile.am	30 Aug 2004 13:45:51 -0000	1.5
--- Makefile.am	3 Feb 2005 15:28:39 -0000	1.6
***************
*** 13,17 ****
--- 13,19 ----
  
  FOO_FILES = \
+ 	initialize.foo \
  	next-compat.foo \
+ 	cmdline.scm \
  	foops.scm \
  	$(NULL)

--- NEW FILE: cmdline.scm ---
;;; -*-Scheme-*-
;;;

;; cmdline.foo
;; command line parsing

;; helper function "multi-assoc" find list entry in associative array
;; while allowing multiple keys (list of keys)
;; uses (equal?) like assoc
(define (cmdline:multi-assoc key array)
  (cond
   ((null? array) #f)
   ((equal? (caar array) key) (car array))
   ((and (list? (caar array)) (member key (caar array))) (car array))
   (else (cmdline:multi-assoc key (cdr array)))))


;; validate cmdline string against optstring
(define (cmdline:cmdline-valid? cmdline opts notify)
  (letrec ((given-valid? ; validate given options
	    (lambda (cmd)
	      (cond
	       ((null? cmd) #t)
	       ((string=? "--" (car cmd)) #t) ; stop on "--"
	       ((and (char=? #\- (string-ref (car cmd) 0)) ; treat "-" as arg
		     (not (string=? "-" (car cmd))))
		(let ((opt (cmdline:multi-assoc (car cmd) opts))) ; option
		  (cond
		   ((not opt) ; option not in optstring
		    (begin
		      (if notify
			  (format #t "(cmdline:validate) unknown option: ~a\n" (car cmd)))
		      #f))
		   ((caddr opt) ; option with param?
		    (if (null? (cdr cmd))
			(begin
			  (if notify
			      (format #t "(cmdline:validate) missing parameter for option: ~a\n" (car opt)))
			  #f) ; opt w/ missing param
			(given-valid? (cddr cmd)))) ; opt w/ param
		   (else (given-valid? (cdr cmd)))))) ; opt w/o param
	       (else
		;; argument
		(given-valid? (cdr cmd))))))

	   ;; build list of non-optional "options"
	   (non-opts
	    (let loop ((opt opts))
	      (cond
	       ((null? opt) '())
	       ((cadar opt) (cons (if (list? (caar opt))
				      (caar opt)
				      (list (caar opt)))
				  (loop (cdr opt))))
	       (else (loop (cdr opt))))))

	    ;; check for presence of non-options
	   (non-opts-present?
	    (lambda (non-opt)
	      (cond
	       ((null? non-opt) #t) ; no more non-opts
	       ((cmdline:option-given? cmdline opts (caar non-opt))
		(non-opts-present? (cdr non-opt)))
	       (else
		(if notify
		    (format #t "(cmdline:validate) mandatory option missing: ~a\n" (caar non-opt)))
		#f)))))

    ;; main
    (if (given-valid? cmdline)
	(non-opts-present? non-opts)
	#f)))


;; get arguments in commandline (exclude options and params)
(define (cmdline:get-arguments cmdline opts)
  (cond
   ((null? cmdline)
    '())
   ((string=? "--" (car cmdline))
    (cdr cmdline))
   ((and (char=? #\- (string-ref (car cmdline) 0))
	     (not (string=? "-" (car cmdline))))
    ;; option
    (let ((opt (cmdline:multi-assoc (car cmdline) opts)))
      (cond
       ((not opt) ; ignore option not being in opts
	(cmdline:get-arguments (cdr cmdline) opts))
       ((caddr opt) ; opt with param
	(if (null? (cdr cmdline))
	    '() ; missing param
	    (cmdline:get-arguments (cddr cmdline) opts))) ; w/ param
       (else (cmdline:get-arguments (cdr cmdline) opts))))) ; w/o param
   (else
    ;; argument
    (cons (car cmdline)
	  (cmdline:get-arguments (cdr cmdline) opts)))))


;; determine whether a specific option was given
(define (cmdline:option-given? cmdline opts option)
  (let loop ((cmd cmdline)
	     (opt (cmdline:multi-assoc option opts))) ; check for alt options
    (cond
     ((null? cmd) #f)			; parse end
     ((string=? "--" (car cmd)) #f)	; -- : options end, arg start
     ((not opt) #f)			; option not in optstring
     ((string=? option (car cmd)) #t)	; direct match
     ((and (list? (car opt)) (member (car cmd) (car opt))) #t) ; alt arg
     (else (loop (cdr cmd) opt)))))


;; get parameter(s) for specific option
(define (cmdline:get-option-param cmdline opts option)
  (let ((tokenize
	 ;; we are using a modified version of (string-tokenize)
	 ;; from parse.scm here (added delim parameter)
	 (lambda (s delim)
	   (let ((i 0) (j)
		 (n (string-length s)))
	     (let loop ((args '()))
	       (while (and (< i n)
			   (char=? delim (string-ref s i)))
		      (set! i (1+ i)))
	       (if (>= i n)
		   (reverse! args)
		   (set! j i)
		   (while (and (< i n)
			       (not (char=? delim (string-ref s i))))
			  (set! i (1+ i)))
		   (loop (cons (substring s j i) args)))))))
	(alt-opts (let ((entry (cmdline:multi-assoc option opts)))
		    (cond
		     ((not entry) '())
		     ((list? (car entry)) (car entry))
		     (else (list (car entry)))))))

    (let loop ((cmd cmdline))
      (cond
       ((null? cmd) '())		; end of cmdline
       ((string=? "--" (car cmd)) '())	; end of options
       ((not (member (car cmd) alt-opts)) (loop (cdr cmd))) ; try next opt
       ((null? (cdr cmd)) '())		; param expected, but EOL
       (else (append (tokenize (cadr cmd) #\,) ; param found
		     (loop (cddr cmd))))))))
	       

;; split command line: return list of 2 lists, the first containing
;; all cmdline contents until the first occurence of arg (excluding
;; arg), the latter the rest of the cmdline (including arg)
(define (cmdline:split cmdline arg)
  (let loop ((rest cmdline)
	     (first '()))
    (cond
     ((null? rest)
      (list (reverse! first) '()))
     ((string=? arg (car rest))
      (list (reverse! first) rest))
     (else
      (loop (cdr rest)
	    (cons (car rest) first))))))


;; format help message from optlist
(define (cmdline:help-message opts)
  (let loop ((opt opts))
    (if (null? opt) ;; recursion done
	"multiple <args>: --opt <arg1> --opt <arg2> or --opt <arg1,arg2,...>\n"
	(let ((cadddar (lambda (l) (car (cdddar l))))
	      (option (string-append
		       "   "
		       (if (list? (caar opt)) ; multiple alt options
			   (string-append
			    (caaar opt)
			    (let loop ((o (cdaar opt)))
			      (if (not (null? o))
				  (string-append
				   ", "
				   (car o)
				   (loop (cdr o)))
				  "")))
			   (caar opt)) ; single option
		       (if (caddar opt)
			   " <args>"
			   ""))))
	  (string-append
	   option
	   (cond
	    ((< (string-length option) 8) "\t\t\t\t")
	    ((< (string-length option) 16) "\t\t\t")
	    ((< (string-length option) 24) "\t\t")
	    (else "\t"))
	   (cadddar opt)
	   "\n"
	   (loop (cdr opt)))))))


(provide 'cmdline)

Index: toplevel.foo.in
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/scm/toplevel.foo.in,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** toplevel.foo.in	30 Aug 2004 13:44:58 -0000	1.7
--- toplevel.foo.in	3 Feb 2005 15:28:39 -0000	1.8
***************
*** 4,26 ****
  ;; @edited_input@
  
! ;; set load path according to installation
! (begin
!   (define foo-scm-path "@datadir@")
!   (define foo-lib-path "@ELKFOO_LIB_DIR@")
  
!   (define (add-to-load-path path)
!     ;; don't add if not expanded by autoconf
!     (if (> (string-length path) 1)
! 	;; if ./ at the beginning of load-path, keep it there
! 	(if (string=? (car load-path) ".")
! 	    (set! load-path
! 		  (cons (car load-path)
! 			(cons path
! 			      (cdr load-path))))
! 	    (set! load-path
! 		  (cons path load-path)))))
  
!   (add-to-load-path foo-lib-path)
!   (add-to-load-path foo-scm-path))
  
  ;;; requirements
--- 4,32 ----
  ;; @edited_input@
  
! ;; add path to load-path
! (define (foo:add-to-load-path! path)
!   ;; don't add if empty string
!   (if (> (string-length path) 0)
!       ;; if ./ at the beginning of load-path, keep it there
!       (if (or (string=? "." (car load-path))
! 	      (string=? "./" (car load-path)))
! 	  (set! load-path (cons (car load-path)
! 				(cons path (cdr load-path))))
! 	  (set! load-path (cons path load-path)))))
  
! ;; remove path from load-path
! (define (foo:remove-from-load-path! path)
!   (set! load-path (let loop ((path-rest load-path))
! 		    (cond
! 		     ((null? path-rest)
! 		      '())
! 		     ((equal? path (car path-rest))
! 		      (cdr path-rest))
! 		     (else
! 		      (cons (car path-rest) (loop (cdr path-rest))))))))
  
! ;; set load path according to installation
! (foo:add-to-load-path! "@datadir@")
! (foo:add-to-load-path! "@ELKFOO_LIB_DIR@")
  
  ;;; requirements
***************
*** 29,33 ****
  (require 'struct)
  
! (require 'elkfoo) ;; load the foo library
  
  (autoload 'pp 'pp.scm)
--- 35,40 ----
  (require 'struct)
  
! (require 'cmdline) ; load command line tools
! (require 'elkfoo) ; load the foo library
  
  (autoload 'pp 'pp.scm)
***************
*** 39,53 ****
  (autoload 'inspect 'debug.scm)
  
! ;; readline support (depending on environment var)
! (if (string? (getenv "ELK_READLINE"))
!     (if (> (string-length (getenv "ELK_READLINE")) 1)
!         (require 'readline.la)))
  
! (if (feature? 'readline.la)
!     (define foo-prompt-base "foo> "))
  
! ;; foo scripting
! (define foo-script-file "") 
! (define load-foo-script-file #f) 
  
  ;;; Read-eval-print loop and error handler (readline extension support)
--- 46,115 ----
  (autoload 'inspect 'debug.scm)
  
! ;; arg vector for foo main
! (define foo:main-args)
! ;; options uderstood by foo main
! (define foo:main-option-list)
! ;; foo main help screen
! (define foo:main-help)
! ;; arg vector for foo script
! (define foo:script-args)
  
! (let*
!     ;; options understood by foo main startup
!     ((main-option-list '((("--help" "-h") #f #f "this help screen")
! 			 ("--load" #f #t "load package(s) at startup")
! 			 ("--unload" #f #t "do not load package(s) at startup")
! 			 (("--readline" "--rl") #f #f "enable readline extension")
! 			 (("--no-readline" "--no-rl") #f #f "disable readline extension")))
!      (main-args '())
!      (script-args '())
!      (main-help (lambda ()
! 		  (format #t "Usage: foo [foo/elk-options] -- [foo-options] [script-file [script-options]]\nfoo-options understood:\n")
! 		  (format #t "~a\n" (cmdline:help-message main-option-list))
! 		  (exit))))
  
!   (set! foo:main-args (lambda () main-args))
!   (set! foo:main-option-list (lambda () main-option-list))
!   (set! foo:main-help main-help)
!   (set! foo:script-args (lambda () script-args))
! 
!   (set! main-args
! 	(if (null? (command-line-args))
! 	    '()
! 	    (cmdline:split
! 	     (command-line-args)
! 	     (let ((args (cmdline:get-arguments
! 			  (command-line-args) main-option-list)))
! 	       (if (null? args)
! 		   ""
! 		   (car args))))))
!   (if (not (null? main-args))
!       (begin
! 	(set! script-args (cadr main-args))
! 	(set! main-args (car main-args)))))
! 
! (if (not (cmdline:cmdline-valid? (foo:main-args) (foo:main-option-list) #t))
!     (foo:main-help))
! 
! ;; help needed?
! (if (cmdline:option-given? (foo:main-args) (foo:main-option-list) "--help")
!     (foo:main-help))
! 
! ;; readline support?
! (if (cond
!      ((cmdline:option-given?
!        (foo:main-args) (foo:main-option-list) "--no-readline") #f)
!      ((cmdline:option-given?
!        (foo:main-args) (foo:main-option-list) "--readline") #t)
!      ((if (string? (getenv "ELK_READLINE"))
! 	  (cond ((string-ci=? "no" (getenv "ELK_READLINE")) #f)
! 		((string-ci=? "yes" (getenv "ELK_READLINE")) #t)
! 		(else #t))
! 	  #t))
!      (else #t))
!     (require 'readline.la))
! 
! ;; input port for initialization
! (define foo-init-port)
  
  ;;; Read-eval-print loop and error handler (readline extension support)
***************
*** 71,103 ****
  	(display-flush-output dpy))
  
!     (if (feature? 'readline.la)
! 	(if (> rep-level 0)
! 	    (readline-set-prompt (string-append
! 				  (format #f "~a-" rep-level)
! 				  foo-prompt-base))
! 	    (readline-set-prompt foo-prompt-base))
! 	(begin
  	  (if (> rep-level 0)
! 	      (format #t "~a-" rep-level))
! 	  (display "foo> ")))
  
!     (if load-foo-script-file
! 	(begin
! 	  (set! load-foo-script-file #f)
! 	  (load foo-script-file))
! 	(begin
! 	  (if (feature? 'readline.la)
! 	      (set! input (readline-read))
! 	      (set! input (read)))
! 	  (set! & input)
! 	  (if (not (eof-object? input))
! 	      (begin
! 		(set! value (eval input env))
! 		(set! !!! !!)
! 		(set! !! !)
! 		(set! ! value)
! 		(write value)
! 		(newline)
! 		(loop)))))))
  
  (define rep-frames)
--- 133,169 ----
  	(display-flush-output dpy))
  
!     (begin
!       (cond
!        ((input-port? foo-init-port)	; not yet initialized
! 	(set! input (read foo-init-port))) ; read from port
!        ((feature? 'readline.la)		; readline support
! 	(let ((prompt-base "foo> "))
  	  (if (> rep-level 0)
! 	      (readline-set-prompt (string-append
! 				    (format #f "~a-" rep-level)
! 				    prompt-base))
! 	      (readline-set-prompt prompt-base)))
! 	(set! input (readline-read)))
!        (else				; standard reader
! 	(if (> rep-level 0)
! 	    (format #t "~a-" rep-level))
! 	(display "foo> ")
! 	(set! input (read))))
  
!       (set! & input)
!       (if (not (eof-object? input))
! 	  (begin
! 	    (set! value (eval input env))
! 	    (set! !!! !!)
! 	    (set! !! !)
! 	    (set! ! value)
! 	    (if (input-port? foo-init-port)
! 		(begin ; restore normal state and avoid newline
! 		  (close-input-port foo-init-port)
! 		  (set! foo-init-port #f))
! 		(begin
! 		  (write value)
! 		  (newline)))
! 	    (loop))))))
  
  (define rep-frames)
***************
*** 165,182 ****
    (newline)
    (if (feature? 'foo)
!       (if (> (string-length foo-script-file) 0)
! 	  (begin
! 	    (if (bound? 'foo:cleanup)
! 		(foo:cleanup))
! 	    (exit))
! 	  (begin
! 	    (format #t "do you really want to exit foo? [ny] (n): ")
! 	    (if (equal? (read-char) #\y)
! 		(begin
! 		  (format #t "bye~%")
! 		  (if (bound? 'foo:cleanup)
! 		      (foo:cleanup))
! 		  (exit))
! 		(the-top-level))))
        (exit)))
  
--- 231,243 ----
    (newline)
    (if (feature? 'foo)
!       (begin
! 	(format #t "do you really want to exit foo? [ny] (n): ")
! 	(if (equal? (read-char) #\y)
! 	    (begin
! 	      (format #t "bye~%")
! 	      (if (bound? 'foo:cleanup)
! 		  (foo:cleanup))
! 	      (exit))
! 	    (the-top-level)))
        (exit)))
  
***************
*** 189,251 ****
  (define (global-load file)
    (if global-load-notify?
!     (begin
! 	  (display "[Globloading ")
! 	  (display file)
! 	  (display "]")
! 	  (newline)
! 		))
    (load file (global-environment)))
  
! ;; scripting
! (if (not (null? (command-line-args)))
!     (if (file-exists? (car (command-line-args)))
! 	(begin
! 	  (set! foo-script-file (car (command-line-args)))
! 	  (set! load-foo-script-file #t))
! 	(begin
! 	  (format #t "couldn't load foo script ~s\n" (car (command-line-args)))
! 	  (if (bound? 'foo:cleanup)
! 	      (foo:cleanup))
! 	  (exit)))
!     ;; load history (ignore errors)
!     (if (and (feature? 'readline.la) (bound? 'readline-read-history))
! 	(readline-read-history (tilde-expand "~/.foo/foo_history"))))
! 
! ;; std list of initialization files
! (define foo-init-files
!   (list "control/init-tools.foo"
! 	"control/init-control.foo"))
! 
! ;; load init files
! (map load foo-init-files)
! 
! ;; load customization files
! (if (feature? 'elkfoo)
!     (begin
! 
!       ;; system wide defaults
!       (if (file-exists? "/etc/foo/init.foo")
! 	  (load "/etc/foo/init.foo"))
! 
!       ;; user defaults (backwards compat)
!       (if (file-exists? (tilde-expand "~/.initfoo"))
! 	  (load "~/.initfoo"))
!       ;; wd defaults (backwards compat)
!       (if (and (not (string=? (getenv "HOME") (getwd)))
!  	       (file-exists? ".initfoo"))
! 	  (load ".initfoo"))
! 
!       ;; user defaults
!       (if (file-exists? (tilde-expand "~/.foo/init.foo"))
! 	  (load "~/.foo/init.foo"))
!       ;; wd defaults
!       (if (file-exists? ".init.foo")
! 	  (load ".init.foo"))))
! 
! ;;; load init files
! ;(map load foo-init-files)
  
  (provide 'foo)
  
  (the-top-level)
  
--- 250,270 ----
  (define (global-load file)
    (if global-load-notify?
!       (begin
! 	(display "[Globloading ")
! 	(display file)
! 	(display "]")
! 	(newline)
! 	))
    (load file (global-environment)))
  
! ;; load history (ignore errors)
! (if (and (feature? 'readline.la) (bound? 'readline-read-history))
!     (readline-read-history (tilde-expand "~/.foo/foo_history")))
  
  (provide 'foo)
  
+ ;; trigger initialization
+ (set! foo-init-port (open-input-string "(load \"initialize.foo\")"))
+ 
  (the-top-level)
  

--- NEW FILE: initialize.foo ---
;;; -*-Scheme-*-
;;;

;; initialization

(require 'elkfoo)
(require 'cmdline)

(define foo:pre-init-files)
(define foo:set-pre-init-files!) ; this is pointless, when could this be done?
(define foo:load-packages)
(define foo:add-to-load-packages!)
(define foo:remove-from-load-packages!)
(define foo:init-files)
(define foo:set-init-files!)

(let
      ;; defaults (in order of evaluation)
    ((pre-init-files
      (list "/etc/foo/pre-init.foo"	; system wide
	    "~/.foo/pre-init.foo"	; user home
	    "./.pre-init.foo"))		; working dir

     (load-packages
      (list "control"))		; oh happy day...

     (init-files
      (list "/etc/foo/init.foo"	; system wide defaults
	    "~/.foo/init.foo"	; user home defaults
	    "./.init.foo"	; working dir defaults
	    "~/.initfoo"	; user home defaults (backwards compat)
	    "./.initfoo")))	; working dir defaults (backwards compat)

  ;; get pre-init files
  (set! foo:pre-init-files
	(lambda () pre-init-files))

  ;; set pre-init files
  (set! foo:set-pre-init-files!
	(lambda (files)
	  (set! pre-init-files files)))

  ;; get init files
  (set! foo:init-files
	(lambda () init-files))

  ;; set init files
  (set! foo:set-init-files!
	(lambda (files)
	  (set! init-files files)))

  ;; get load-packages
  (set! foo:load-packages
	(lambda () load-packages))

  ;; add package name to set load-packages, if not already there
  (set! foo:add-to-load-packages!
	(lambda (pack)
	  (set! load-packages
		(if (not (member pack load-packages))
		    (cons pack load-packages)
		    load-packages))))

  ;; remove all occurences of package name from set load-packages
  (set! foo:remove-from-load-packages!
	(lambda (pack)
	  (set! load-packages
		(let loop ((pack-rest load-packages))
		  (cond
		   ((null? pack-rest)
		    '())
		   ((equal? pack (car pack-rest))
		    (loop (cdr pack-rest)))
		   (else
		    (cons (car pack-rest) (loop (cdr pack-rest))))))))))


;; load file with existence check
;; not yet optimal, uses (tilde-expand) only
(define (foo:load-file file . notify)
  (if (file-exists? (tilde-expand file))
      (load file)
      (if (and (not (null? notify)) (car notify))
	  (format #t "(foo:load-file ~a) not found\n" file))))

;; load package
(define (foo:load-package pack)
  (let ((file (format #f "~a/init-~a.foo" pack pack)))
    ;; look for file in path
    (if (let loop ((path load-path))
	  (cond ((null? path) #f)
		((file-exists? (string-append (car path) "/" file)) #t)
		(else (loop (cdr path)))))
	(load file)
	(format #t "(foo:load-package ~a) ~a not found\n" pack file))))


;; und ab die post

;; load pre-init files
(map foo:load-file (foo:pre-init-files))

;; prepare load packages
(map foo:add-to-load-packages!
     (cmdline:get-option-param (foo:main-args)
			       (foo:main-option-list)
			       "--load"))
(map foo:remove-from-load-packages!
     (cmdline:get-option-param (foo:main-args)
			       (foo:main-option-list)
			       "--unload"))
;; do it
(map foo:load-package (foo:load-packages))

;; load init files
(map foo:load-file (foo:init-files))

;; what about scripting?
(if (not (null? (foo:script-args)))
    (foo:load-file (car (foo:script-args)) #t))

;; EOF

[foo-cvs] foo/elkfoo/src main.c,1.3,1.4

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/foo/elkfoo/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20937

Modified Files:
	main.c 
Log Message:
added hack for scripting support: tokenize cmdline args which get messed together when coming from a script

Index: main.c
===================================================================
RCS file: /cvsroot/foo/foo/elkfoo/src/main.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** main.c	7 Aug 2004 21:20:42 -0000	1.3
--- main.c	3 Feb 2005 15:26:35 -0000	1.4
***************
*** 9,14 ****
   * foo sound synthesis system
   *
!  * (C)1993-2004 Gerhard Eckel, Ramon Gonzalez-Arroyo, IRCAM, ZKM
!  * (C)2003-2004 Martin Rumori
   */
  
--- 9,15 ----
   * foo sound synthesis system
   *
!  * (C)1993-2005 Gerhard Eckel, Ramon Gonzalez-Arroyo
!  * (C)1993-1996 IRCAM, ZKM
!  * (C)2003-2005 Martin Rumori
   */
  
***************
*** 54,98 ****
  extern int Case_Insensitive;
  
- #define ELKFOO_NO_READLINE_OPTION "--no-rl"
- 
  
  int
  main (int argc,
!       char **argv)
  {
!   int i, rl = 1;
    char toplevel[PATH_MAX] = ELKFOO_SCM_PATH;
!   char *elk_rl;
  
    /* toplevel filename */
    strcat(toplevel, "/toplevel.foo");
  
!   /* readline extension? */
!   for (i = 0; i < argc; ++i)
      {
!       if (! strcmp(argv[i], ELKFOO_NO_READLINE_OPTION))
  	{
! 	  rl = 0;
! 	  /* tweak argv so that elk sees nothing */
! 	  for (; i < argc; ++i)
! 	    {
! 	      argv[i] = argv[i + 1];
! 	    }
! 	  --argc;
! 
  	  break;
  	}
      }
  
!   if (rl
!       && ((elk_rl = getenv("ELK_READLINE"))
! 	  && (strlen(elk_rl) && strcasecmp(elk_rl, "NO"))
! 	  || (! elk_rl)))
      {
!       setenv("ELK_READLINE", "YES", 1);
!     }
!   else
!     { /* --no-rl */
!       unsetenv("ELK_READLINE");
      }
  
--- 55,144 ----
  extern int Case_Insensitive;
  
  
  int
  main (int argc,
!       char **argv,
!       char **envp)
  {
!   int i, help = 0;
    char toplevel[PATH_MAX] = ELKFOO_SCM_PATH;
! 
!   /* scripting-mode-dirty-cmdline-tokenize-hack
!    *
!    * for scripting mode we have to tokenize the option string, since
!    * execve() sends the whole [arg] string in the #!/interpreter [arg]
!    * line as one single argument (string) to the process, which will
!    * render the options unparseable.  in that case, we construct a
!    * new, tokenized argv and do an execve() of ourselves because elk
!    * depends on a clean argv[] vector at the bottom of the stack.
!    * first hint for detecting the need for tokenizing is argc>2 (prog
!    * + arg string + script [+ additional cmdline given args]), second
!    * hint is argv[1] containing whitespace, third hint is a '-' at the
!    * beginning of this fat string (otherwise it could mean a filename
!    * containing spaces formerly quoted with '\' and removed by the
!    * shell).  not sure whether this heuristics is sufficient though.
!    */
!   if (argc > 2 && strchr(argv[1], ' ') && argv[1][0] == '-')
!     {
!       char *new_argv[512]; /* max cmdline args for scripting */
!       char **iter = new_argv;
! 
!       *iter++ = argv[0]; /* save program name */
!       *iter++ = (char *)strtok(argv[1], " "); /* start */
!       while ((*iter++ = (char *)strtok(NULL, " "))); /* iterate */
!       --iter;
! 
!       for (i = 0; i < argc; ++i)
! 	{
! 	  *iter++ = argv[i + 2]; /* save cmdline arguments */
! 	}
!       *iter = NULL; /* terminate */
! 
!       /* "recursively" execute ourselves with new argv */
!       execve(new_argv[0], new_argv, envp);
!     }
! 
! 
!   /*
!    * real start of main function (clean code only from now on, promised!)
!    */
  
    /* toplevel filename */
    strcat(toplevel, "/toplevel.foo");
  
!   /* show help? */
! 
!   /* the problem here is: elk will parse the cmdline again and
!      probably complain, but giving us no response about its decision.
!      thus we have to guess somehow whether to show our help as well.
!      we have to know that in advance, since elk does an exit()
!      directly after having printed its help.  options -help and --help
!      looks like a good constraint */
! 
!   /* PROMISED TOO MUCH: STILL HACKY CODE HERE */
!   for (i = 0; i < argc && strcmp(argv[i], "--"); ++i)
      {
!       /* we don't have --longopts at the moment in elk and no opts
!        * currently in foo.  thus we could suppose that the user might
!        * want to pass a given longopt to the scheme interpreter rather
!        * than to the startup code.  if so, we show our help, but "--"
!        * will have stopped the scan anyway */
!       if (! strncmp(argv[i], "--", 2) ||
! 	  ! strcmp(argv[i], "--help") || /* this is redundant */
! 	  ! strcmp(argv[i], "-help"))
  	{
! 	  help = 1;
  	  break;
  	}
      }
  
!   /* show help if requested */
!   if (help)
      {
!       fprintf(stderr, "Usage: %s [elk-options] \
! -- [foo-options] [script-file [script-options]]\n\
! foo-loader options:\n   currently none.\n\
!    call %s -- --help for foo scheme evaluated options\n\n\
! elk options following...\n", argv[0], argv[0]);
      }