Pd-cvs October 2005

pd-cvs@lists.iem.at

15 participants
477 discussions

externals/pidip/include xwindow-private.h,1.1,1.2
by Yves Degoyon 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/externals/pidip/include In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22746 Modified Files: xwindow-private.h Log Message: adapted to newer Image Magick Index: xwindow-private.h =================================================================== RCS file: /cvsroot/pure-data/externals/pidip/include/xwindow-private.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** xwindow-private.h 9 Jul 2005 19:38:22 -0000 1.1 --- xwindow-private.h 27 Oct 2005 13:20:08 -0000 1.2 *************** *** 34,37 **** --- 34,43 ---- #include "magick/quantize.h" + #if defined(__cplusplus) || defined(c_plusplus) + # define klass c_class + #else + # define klass class + #endif + /* Invoke pre-X11R6 ICCCM routines if XlibSpecificationRelease is not 6.

1 0

externals/iem/aconnect aconnects-help.pd, NONE, 1.1 aconnects.pd, NONE, 1.1 aconnect-help.pd, 1.2, 1.3 aconnect.c, 1.4, 1.5
by IOhannes m zmölnig 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/externals/iem/aconnect In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21311 Modified Files: aconnect-help.pd aconnect.c Added Files: aconnects-help.pd aconnects.pd Log Message: use "src"/"dst" instead of "input"/"output" added [aconnects] (depending on zexy), which can connect using symbolic names for ports,... --- NEW FILE: aconnects.pd --- #N canvas 243 174 662 643 10; #X obj 190 579 zexy; #X text 113 579 depends on; #X text 34 453 copyright (C) IOhannes m zmoelnig 2005; #X text 132 474 forum::fuer::umlaeute; #X text 132 491 institute of electronic music and acoustics \, IEM ; #X text 134 507 university of music and dramatic arts \, graz \, austria ; #X text 42 527 published under the GnuGPL v2.0; #X obj 88 91 aconnect; #X msg 88 47 devices; #X obj 88 68 t a b; #N canvas 0 0 469 393 input 0; #X obj 26 68 inlet; #N canvas 484 415 461 350 cook 0; #X obj 71 41 inlet; #X obj 71 292 outlet; #X obj 71 65 t l l l; #X msg 115 270 list \$2 \$1; #X msg 71 187 list \$4 @ \$2; #X obj 71 207 l2s; #X obj 71 236 pack s f; #X obj 122 141 * 256; #X obj 122 164 +; #X obj 122 120 unpack; #X msg 122 98 \$1 \$3; #X connect 0 0 2 0; #X connect 2 0 4 0; #X connect 2 1 10 0; #X connect 2 2 3 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 8 0 6 1; #X connect 9 0 7 0; #X connect 9 1 8 1; #X connect 10 0 9 0; #X restore 267 108 pd cook; #X msg 293 150 reset; #X msg 267 129 add \$1 \$2; #N canvas 0 0 450 300 index 0; #X obj 110 158 index; #X obj 110 208 spigot; #X msg 179 157 0; #X msg 151 157 1; #X obj 118 131 t b a b; #X obj 172 88 inlet; #X obj 110 234 outlet; #X obj 84 89 inlet; #X connect 0 0 1 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 3 0; #X connect 4 1 0 0; #X connect 4 2 2 0; #X connect 5 0 4 0; #X connect 7 0 0 0; #X restore 163 186 pd index; #N canvas 0 0 450 300 getIDs 0; #X obj 122 25 inlet; #X obj 122 253 outlet; #X obj 274 43 inlet; #X obj 122 216 pack; #X obj 122 88 moses 256; #X obj 180 110 t f f; #X obj 180 134 / 256; #X obj 220 134 % 256; #X obj 122 51 t f b; #X msg 152 109 0; #X obj 180 156 i; #X connect 0 0 8 0; #X connect 2 0 3 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 4 1 5 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 6 0 10 0; #X connect 7 0 3 1; #X connect 8 0 4 0; #X connect 8 1 9 0; #X connect 9 0 3 1; #X connect 10 0 3 0; #X restore 163 252 pd getIDs; #N canvas 0 0 395 408 what 0; #X obj 82 32 inlet; #X obj 42 321 outlet; #X obj 158 321 outlet; #X text 209 49 list <id> <port#>; #X text 139 34 could be: list <id#> <port#>; #X text 209 64 list <id> <port>; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 42 148 pd float|symbol; #X obj 82 61 t l l; #X msg 82 95 \$1; #X msg 112 95 \$2; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 158 148 pd float|symbol; #X obj 207 285 l2s; #X obj 207 242 pack s s; #X msg 207 263 list \$2 @ \$1; #N canvas 0 0 450 300 demux 0; #X obj 64 50 inlet; #X obj 64 256 outlet; #X obj 167 257 outlet; #X obj 260 45 inlet; #X obj 260 73 t f f; #X obj 260 111 == 0; #X obj 300 111 != 0; #X obj 64 224 spigot; #X obj 167 225 spigot; #X obj 64 98 t a a; #X obj 326 39 loadbang; #X connect 0 0 9 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 5 0 7 1; #X connect 6 0 8 1; #X connect 7 0 1 0; #X connect 8 0 2 0; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 4 0; #X restore 142 219 pd demux; #X obj 158 175 t f b; #X obj 258 175 t s b; #X msg 288 197 1; #X msg 206 191 0; #X connect 0 0 7 0; #X connect 6 0 1 0; #X connect 6 1 14 0; #X connect 7 0 8 0; #X connect 7 1 9 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 15 0; #X connect 10 1 16 0; #X connect 11 0 1 0; #X connect 12 0 13 0; #X connect 13 0 11 0; #X connect 14 0 1 0; #X connect 14 1 12 0; #X connect 15 0 2 0; #X connect 15 1 18 0; #X connect 16 0 12 1; #X connect 16 1 17 0; #X connect 17 0 14 1; #X connect 18 0 14 1; #X restore 26 108 pd what is it ?; #X obj 26 134 route float; #X obj 163 281 outlet; #X obj 195 38 inlet; #X obj 195 63 route reset; #X msg 195 110 reset; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 2 0 4 1; #X connect 3 0 4 1; #X connect 4 0 5 0; #X connect 5 0 8 0; #X connect 6 0 7 0; #X connect 6 1 5 1; #X connect 7 0 5 0; #X connect 7 1 4 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 1 1 0; #X connect 11 0 4 1; #X restore 88 188 pd input; #X msg 139 112 reset; #X obj 88 246 pack 0 0 0 0; #X obj 88 216 unpack; #X obj 176 216 unpack; #X msg 88 271 connect \$1 \$2 \$3 \$4; #X obj 281 33 inlet; #X obj 281 74 b; #X obj 281 53 route reset connect; #X obj 345 73 a2l; #X obj 345 93 t l l; #X msg 345 119 list \$1 \$2; #X msg 375 139 list \$3 \$4; #X obj 88 340 aconnect; #X obj 88 24 loadbang; #X obj 88 387 outlet; #X obj 139 387 outlet; #N canvas 0 0 469 393 output 0; #X obj 26 68 inlet; #N canvas 484 415 461 350 cook 0; #X obj 71 41 inlet; #X obj 71 292 outlet; #X obj 71 65 t l l l; #X msg 115 270 list \$2 \$1; #X msg 71 187 list \$4 @ \$2; #X obj 71 207 l2s; #X obj 71 236 pack s f; #X obj 122 141 * 256; #X obj 122 164 +; #X obj 122 120 unpack; #X msg 122 98 \$1 \$3; #X connect 0 0 2 0; #X connect 2 0 4 0; #X connect 2 1 10 0; #X connect 2 2 3 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 8 0 6 1; #X connect 9 0 7 0; #X connect 9 1 8 1; #X connect 10 0 9 0; #X restore 267 108 pd cook; #X msg 293 150 reset; #X msg 267 129 add \$1 \$2; #N canvas 0 0 450 300 index 0; #X obj 110 158 index; #X obj 110 208 spigot; #X msg 179 157 0; #X msg 151 157 1; #X obj 118 131 t b a b; #X obj 172 88 inlet; #X obj 110 234 outlet; #X obj 84 89 inlet; #X connect 0 0 1 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 3 0; #X connect 4 1 0 0; #X connect 4 2 2 0; #X connect 5 0 4 0; #X connect 7 0 0 0; #X restore 163 186 pd index; #N canvas 0 0 450 300 getIDs 0; #X obj 122 25 inlet; #X obj 122 253 outlet; #X obj 274 43 inlet; #X obj 122 216 pack; #X obj 122 88 moses 256; #X obj 180 110 t f f; #X obj 180 134 / 256; #X obj 220 134 % 256; #X obj 122 51 t f b; #X msg 152 109 0; #X obj 180 156 i; #X connect 0 0 8 0; #X connect 2 0 3 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 4 1 5 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 6 0 10 0; #X connect 7 0 3 1; #X connect 8 0 4 0; #X connect 8 1 9 0; #X connect 9 0 3 1; #X connect 10 0 3 0; #X restore 163 252 pd getIDs; #N canvas 0 0 395 408 what 0; #X obj 82 32 inlet; #X obj 42 321 outlet; #X obj 158 321 outlet; #X text 209 49 list <id> <port#>; #X text 139 34 could be: list <id#> <port#>; #X text 209 64 list <id> <port>; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 42 148 pd float|symbol; #X obj 82 61 t l l; #X msg 82 95 \$1; #X msg 112 95 \$2; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 158 148 pd float|symbol; #X obj 207 285 l2s; #X obj 207 242 pack s s; #X msg 207 263 list \$2 @ \$1; #N canvas 0 0 450 300 demux 0; #X obj 64 50 inlet; #X obj 64 256 outlet; #X obj 167 257 outlet; #X obj 260 45 inlet; #X obj 260 73 t f f; #X obj 260 111 == 0; #X obj 300 111 != 0; #X obj 64 224 spigot; #X obj 167 225 spigot; #X obj 64 98 t a a; #X obj 326 39 loadbang; #X connect 0 0 9 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 5 0 7 1; #X connect 6 0 8 1; #X connect 7 0 1 0; #X connect 8 0 2 0; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 4 0; #X restore 142 219 pd demux; #X obj 158 175 t f b; #X obj 258 175 t s b; #X msg 288 197 1; #X msg 206 191 0; #X connect 0 0 7 0; #X connect 6 0 1 0; #X connect 6 1 14 0; #X connect 7 0 8 0; #X connect 7 1 9 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 15 0; #X connect 10 1 16 0; #X connect 11 0 1 0; #X connect 12 0 13 0; #X connect 13 0 11 0; #X connect 14 0 1 0; #X connect 14 1 12 0; #X connect 15 0 2 0; #X connect 15 1 18 0; #X connect 16 0 12 1; #X connect 16 1 17 0; #X connect 17 0 14 1; #X connect 18 0 14 1; #X restore 26 108 pd what is it ?; #X obj 26 134 route float; #X obj 163 281 outlet; #X obj 195 38 inlet; #X obj 195 63 route reset; #X msg 195 110 reset; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 2 0 4 1; #X connect 3 0 4 1; #X connect 4 0 5 0; #X connect 5 0 8 0; #X connect 6 0 7 0; #X connect 6 1 5 1; #X connect 7 0 5 0; #X connect 7 1 4 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 1 1 0; #X connect 11 0 4 1; #X restore 176 188 pd output; #X obj 88 131 route src dst; #X connect 7 0 28 0; #X connect 8 0 9 0; #X connect 9 0 7 0; #X connect 9 1 11 0; #X connect 10 0 13 0; #X connect 11 0 10 1; #X connect 11 0 27 1; #X connect 12 0 15 0; #X connect 13 0 12 0; #X connect 13 1 12 1; #X connect 14 0 12 2; #X connect 14 1 12 3; #X connect 15 0 23 0; #X connect 16 0 18 0; #X connect 17 0 8 0; #X connect 18 0 17 0; #X connect 18 1 19 0; #X connect 18 2 23 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 20 1 22 0; #X connect 21 0 10 0; #X connect 22 0 27 0; #X connect 23 0 25 0; #X connect 23 1 26 0; #X connect 24 0 8 0; #X connect 27 0 14 0; #X connect 28 0 10 1; #X connect 28 1 27 1; --- NEW FILE: aconnects-help.pd --- #N canvas 143 59 794 664 10; #X text 45 13 [aconnects] is [aconnect] with symbolic identifiers; #X obj 694 594 zexy; #X text 617 594 depends on; #X text 54 553 copyright (C) IOhannes m zmoelnig 2005; #X text 152 574 forum::fuer::umlaeute; #X text 152 591 institute of electronic music and acoustics \, IEM ; #X text 154 607 university of music and dramatic arts \, graz \, austria ; #X text 62 627 published under the GnuGPL v2.0; #X msg 212 347 reset; #X obj 116 233 l2s; #X obj 193 232 l2s; #X msg 193 209 Midi Through; #X msg 116 292 connect \$1 \$2 \$3 \$4; #X msg 116 210 Pure Data; #X obj 116 260 pack s s s 0; #X obj 142 190 l2s; #X msg 142 167 Pure Data Midi-Out 1; #X obj 116 131 t b b b; #X msg 205 400 devices; #X obj 199 460 print error-code; #X obj 116 483 print aconnect; #X msg 116 97 bang; #X text 159 86 connect "Pure Data" \, port "Pure Data Midi-Out 1" with "Midi Through" \, port 0; #X text 256 348 re-read the symbolic identifiers; #X text 265 401 normal messages to [aconnect] work as expected; #X obj 116 432 aconnects; #X text 258 295 this is the "connect" message with symbolic identifiers ; #X obj 116 324 t a a; #X obj 156 324 print; #X text 315 237 i use [l2s] to make symbols with spaces; #X connect 8 0 25 0; #X connect 9 0 14 0; #X connect 10 0 14 2; #X connect 11 0 10 0; #X connect 12 0 27 0; #X connect 13 0 9 0; #X connect 14 0 12 0; #X connect 15 0 14 1; #X connect 16 0 15 0; #X connect 17 0 13 0; #X connect 17 1 16 0; #X connect 17 2 11 0; #X connect 18 0 25 0; #X connect 21 0 17 0; #X connect 25 0 20 0; #X connect 25 1 19 0; #X connect 27 0 25 0; #X connect 27 1 28 0; Index: aconnect.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/aconnect/aconnect.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** aconnect.c 25 Jul 2005 10:14:13 -0000 1.4 --- aconnect.c 27 Oct 2005 13:14:09 -0000 1.5 *************** *** 114,118 **** snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("output"), seq, cinfo, pinfo); } --- 114,118 ---- snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("dst"), seq, cinfo, pinfo); } *************** *** 120,124 **** snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("input"), seq, cinfo, pinfo); } --- 120,124 ---- snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("src"), seq, cinfo, pinfo); } *************** *** 233,240 **** return; } ! if(&s_==s || gensym("input")==s) do_search_port(x, seq, LIST_INPUT, print_input); ! if(&s_==s || gensym("output")==s) do_search_port(x, seq, LIST_OUTPUT, print_output); --- 233,240 ---- return; } ! if(&s_==s || gensym("src")==s) do_search_port(x, seq, LIST_INPUT, print_input); ! if(&s_==s || gensym("dst")==s) do_search_port(x, seq, LIST_OUTPUT, print_output); Index: aconnect-help.pd =================================================================== RCS file: /cvsroot/pure-data/externals/iem/aconnect/aconnect-help.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** aconnect-help.pd 25 Jul 2005 10:14:13 -0000 1.2 --- aconnect-help.pd 27 Oct 2005 13:14:09 -0000 1.3 *************** *** 7,11 **** the clients; #X msg 145 125 devices; - #X obj 145 320 route input output; #X obj 145 384 print READBALE; #X obj 205 354 print WRITEABLE; --- 7,10 ---- *************** *** 84,109 **** #X text 50 621 copyleft (c) 2005 IOhannes m zmoelnig; #X text 52 637 published under the GnuGPL v2.0; ! #X connect 0 0 5 0; ! #X connect 0 1 29 0; #X connect 4 0 0 0; ! #X connect 5 0 6 0; ! #X connect 5 0 9 0; ! #X connect 5 1 7 0; ! #X connect 5 2 22 0; ! #X connect 9 0 10 0; ! #X connect 9 1 11 0; ! #X connect 9 2 12 0; ! #X connect 9 3 13 0; ! #X connect 14 0 0 0; ! #X connect 17 0 18 0; ! #X connect 17 1 19 0; ! #X connect 17 2 20 0; ! #X connect 17 3 21 0; ! #X connect 22 0 17 0; ! #X connect 22 1 16 0; ! #X connect 23 0 0 0; ! #X connect 25 0 30 0; ! #X connect 26 0 25 0; ! #X connect 27 0 25 0; ! #X connect 30 0 27 0; ! #X connect 33 0 0 0; --- 83,109 ---- #X text 50 621 copyleft (c) 2005 IOhannes m zmoelnig; #X text 52 637 published under the GnuGPL v2.0; ! #X obj 145 320 route src dst; ! #X connect 0 0 38 0; ! #X connect 0 1 28 0; #X connect 4 0 0 0; ! #X connect 8 0 9 0; ! #X connect 8 1 10 0; ! #X connect 8 2 11 0; ! #X connect 8 3 12 0; ! #X connect 13 0 0 0; ! #X connect 16 0 17 0; ! #X connect 16 1 18 0; ! #X connect 16 2 19 0; ! #X connect 16 3 20 0; ! #X connect 21 0 16 0; ! #X connect 21 1 15 0; ! #X connect 22 0 0 0; ! #X connect 24 0 29 0; ! #X connect 25 0 24 0; ! #X connect 26 0 24 0; ! #X connect 29 0 26 0; ! #X connect 32 0 0 0; ! #X connect 38 0 5 0; ! #X connect 38 0 8 0; ! #X connect 38 1 6 0; ! #X connect 38 2 21 0;

1 0

externals/zexy/src index.c,1.8,1.9
by IOhannes m zmölnig 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3206 Modified Files: index.c Log Message: when we add an item at a certain index that exceeds the number of elements, we resize the array to be able to hold the new index. use of "verbose()" Index: index.c =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/index.c,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** index.c 30 Jun 2005 18:32:56 -0000 1.8 --- index.c 27 Oct 2005 11:58:10 -0000 1.9 *************** *** 127,135 **** int newentry=(int)f; int ok = 0; ! if (! (find_item(s, x->names, x->maxentries)+1) ) { ! if (x->auto_resize && x->entries==x->maxentries){ /* do some resizing */ ! int maxentries=x->maxentries*2; int i; t_symbol**buf=(t_symbol **)getbytes(sizeof(t_symbol *) * maxentries); --- 127,135 ---- int newentry=(int)f; int ok = 0; ! if (! (find_item(s, x->names, x->maxentries)+1) ) { ! if (x->auto_resize && (x->entries==x->maxentries || newentry>=x->maxentries)){ /* do some resizing */ ! int maxentries=(newentry>x->maxentries)?newentry:(x->maxentries*2); int i; t_symbol**buf=(t_symbol **)getbytes(sizeof(t_symbol *) * maxentries); *************** *** 149,163 **** newentry--; if(x->names[newentry]){ /* it is already taken! */ ! error("index :: couldn't add element '%s' at position %d (already taken)", s->s_name, newentry+1); outlet_float(x->x_obj.ob_outlet, -1.f); return; } ! } else newentry=find_free(x->names, x->maxentries); ! if (newentry + 1) { x->entries++; x->names[newentry]=s; - outlet_float(x->x_obj.ob_outlet, (t_float)newentry+1); return; --- 149,162 ---- newentry--; if(x->names[newentry]){ /* it is already taken! */ ! verbose(1, "index :: couldn't add element '%s' at position %d (already taken)", s->s_name, newentry+1); outlet_float(x->x_obj.ob_outlet, -1.f); return; } ! } else { newentry=find_free(x->names, x->maxentries); ! } if (newentry + 1) { x->entries++; x->names[newentry]=s; outlet_float(x->x_obj.ob_outlet, (t_float)newentry+1); return; *************** *** 165,170 **** } else error("index :: couldn't find any place for new entry"); } else error("index :: max number of elements (%d) reached !", x->maxentries); ! } else post("index :: element '%s' already exists", s->s_name); ! /* couldn't add the symbol to our index table */ outlet_float(x->x_obj.ob_outlet, -1.f); --- 164,168 ---- } else error("index :: couldn't find any place for new entry"); } else error("index :: max number of elements (%d) reached !", x->maxentries); ! } else verbose(1, "index :: element '%s' already exists", s->s_name); /* couldn't add the symbol to our index table */ outlet_float(x->x_obj.ob_outlet, -1.f); *************** *** 193,197 **** outlet_float(x->x_obj.ob_outlet, 0.0); } else { ! post("index :: couldn't find element"); outlet_float(x->x_obj.ob_outlet, -1.0); } --- 191,195 ---- outlet_float(x->x_obj.ob_outlet, 0.0); } else { ! verbose(1, "index :: couldn't find element"); outlet_float(x->x_obj.ob_outlet, -1.0); } *************** *** 223,227 **** t_atom ap[2]; int i=0; - for(i=0; i<x->maxentries; i++){ if(x->names[i]){ --- 221,224 ----

1 0

externals/zexy/src zexy.h,1.8,1.9
by IOhannes m zmölnig 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/externals/zexy/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2887 Modified Files: zexy.h Log Message: added a macro for verbose() to take effect when compiled against pd<0.39 Index: zexy.h =================================================================== RCS file: /cvsroot/pure-data/externals/zexy/src/zexy.h,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** zexy.h 13 Jul 2005 08:01:45 -0000 1.8 --- zexy.h 27 Oct 2005 11:56:51 -0000 1.9 *************** *** 85,88 **** --- 85,98 ---- #endif /* ZEXY_LIBRARY */ + #if (defined PD_MAJOR_VERSION && defined PD_MINOR_VERSION) && (PD_MAJOR_VERSION > 0 || PD_MINOR_VERSION > 38) + /* pd>=0.39 has a verbose() function; older versions don't + */ + #else + /* this might not work on compilers other than gcc + * is it ISO-C99 or just a gnu-cpp thing ? + */ + # define verbose(level, format, ...) post(format, ## __VA_ARGS__) + #endif + #endif /* INCLUDE_ZEXY_H__ */

1 0

externals/iem/comport/comport comport.c,1.2,1.3
by Winfried Ritsch 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/externals/iem/comport/comport In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28753 Modified Files: comport.c Log Message: optional WINDOWS2000 Patch und comments Index: comport.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/comport/comport/comport.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** comport.c 13 Apr 2005 15:52:43 -0000 1.2 --- comport.c 27 Oct 2005 11:17:04 -0000 1.3 *************** *** 326,330 **** --- 326,334 ---- 0, OPEN_EXISTING, + #ifdef WIN2000 + 0, + #elif FILE_FLAG_OVERLAPPED, + #endif 0); *************** *** 683,691 **** err = 0; ! // if (!SetCommMask(x->comhandle, EV_RXCHAR)) ! // post(" Error setting communications event mask for serial device"); ! // for ( ; ; ) { ! // if (WaitCommEvent(x->comhandle, &dwCommEvent,NULL)) { do { --- 687,697 ---- err = 0; ! /* ! if (!SetCommMask(x->comhandle, EV_RXCHAR)) ! post(" Error setting communications event mask for serial device"); ! for ( ; ; ) { ! if (WaitCommEvent(x->comhandle, &dwCommEvent,NULL)) { ! */ do { *************** *** 698,708 **** } } while (dwRead); ! // } ! // else{ ! // post("serial dev: Error in WaitCommEvent"); ! // break; ! // } ! //} } #else { --- 704,716 ---- } } while (dwRead); ! /* ! } ! else{ ! post("serial dev: Error in WaitCommEvent"); ! break; ! } ! } } + */ #else { *************** *** 788,792 **** clock_delay(x->x_clock, x->x_deltime); ! return x; } --- 796,800 ---- clock_delay(x->x_clock, x->x_deltime); ! return x; }

1 0

pd/src desire.c,1.1.2.35,1.1.2.36
by chunlee 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12991 Modified Files: Tag: devel_0_39 desire.c Log Message: Index: desire.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v retrieving revision 1.1.2.35 retrieving revision 1.1.2.36 diff -C2 -d -r1.1.2.35 -r1.1.2.36 *** desire.c 22 Oct 2005 14:23:35 -0000 1.1.2.35 --- desire.c 27 Oct 2005 00:18:22 -0000 1.1.2.36 *************** *** 60,64 **** // if !k then suppose all of the object might have changed. ! void gobj_changed (void *self_, const char *k) { t_gobj *self = (t_gobj *)self_; int dirty = k ? (1<<class_getfieldindex(self->g_pd,k)) : -1; --- 60,64 ---- // if !k then suppose all of the object might have changed. ! void gobj_changed (t_gobj *self_, const char *k) { t_gobj *self = (t_gobj *)self_; int dirty = k ? (1<<class_getfieldindex(self->g_pd,k)) : -1; *************** *** 70,74 **** // if only a float is sent, it's a bitset of at most 25 elements // else it may mean whatever else... ! void gobj_changed2 (void *self_, int argc, t_atom *argv) { t_gobj *self = (t_gobj *)self_; t_appendix *d = self->g_adix; --- 70,74 ---- // if only a float is sent, it's a bitset of at most 25 elements // else it may mean whatever else... ! void gobj_changed2 (t_gobj *self_, int argc, t_atom *argv) { t_gobj *self = (t_gobj *)self_; t_appendix *d = self->g_adix;

1 0

pd/src m_pd.h,1.4.4.11.2.10,1.4.4.11.2.11
by Mathieu Bouchard 27 Oct '05

27 Oct '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1678 Modified Files: Tag: devel_0_39 m_pd.h Log Message: oops (for making desire.c compile) Index: m_pd.h =================================================================== RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v retrieving revision 1.4.4.11.2.10 retrieving revision 1.4.4.11.2.11 diff -C2 -d -r1.4.4.11.2.10 -r1.4.4.11.2.11 *** m_pd.h 21 Oct 2005 13:17:01 -0000 1.4.4.11.2.10 --- m_pd.h 26 Oct 2005 23:27:22 -0000 1.4.4.11.2.11 *************** *** 359,364 **** EXTERN void gobj_subscribe (t_gobj *self, t_gobj *observer); EXTERN void gobj_unsubscribe (t_gobj *self, t_gobj *observer); ! EXTERN void gobj_changed (t_gobj *self, const char *k); ! EXTERN void gobj_changed2 (t_gobj *self, int argc, t_atom *argv); #endif --- 359,364 ---- EXTERN void gobj_subscribe (t_gobj *self, t_gobj *observer); EXTERN void gobj_unsubscribe (t_gobj *self, t_gobj *observer); ! EXTERN void gobj_changed (void /*t_gobj*/ *self, const char *k); ! EXTERN void gobj_changed2 (void /*t_gobj*/ *self, int argc, t_atom *argv); #endif

1 0

externals/iem/iemmatrix/src mtx_element.c, 1.3, 1.4 mtx_fill.c, 1.3, 1.4 mtx_inverse.c, 1.5, 1.6 mtx_matrix.c, 1.3, 1.4 mtx_mul~.c, 1.3, 1.4 mtx_resize.c, 1.2, 1.3
by IOhannes m zmölnig 24 Oct '05

24 Oct '05

Update of /cvsroot/pure-data/externals/iem/iemmatrix/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19022 Modified Files: mtx_element.c mtx_fill.c mtx_inverse.c mtx_matrix.c mtx_mul~.c mtx_resize.c Log Message: make errors findable with "last error" Index: mtx_matrix.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_matrix.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** mtx_matrix.c 11 May 2005 13:05:29 -0000 1.3 --- mtx_matrix.c 24 Oct 2005 17:06:37 -0000 1.4 *************** *** 443,447 **** if (binbuf_read_via_path(bbuf, filename->s_name, canvas_getdir(x->x_canvas)->s_name, 0)) ! error("matrix: failed to read %s", filename->s_name); ap=binbuf_getvec(bbuf); --- 443,447 ---- if (binbuf_read_via_path(bbuf, filename->s_name, canvas_getdir(x->x_canvas)->s_name, 0)) ! pd_error(x,"matrix: failed to read %s", filename->s_name); ap=binbuf_getvec(bbuf); *************** *** 466,470 **** /* open file */ if (!(f = fopen(filnam, "w"))) { ! error("matrix : failed to open %s", filnam); } else { char *text=(char *)getbytes(sizeof(char)*MAXPDSTRING); --- 466,470 ---- /* open file */ if (!(f = fopen(filnam, "w"))) { ! pd_error(x,"matrix : failed to open %s", filnam); } else { char *text=(char *)getbytes(sizeof(char)*MAXPDSTRING); *************** *** 479,483 **** textlen = strlen(text); if (fwrite(text, textlen*sizeof(char), 1, f) < 1) { ! error("matrix : failed to write %s", filnam); goto end; } --- 479,483 ---- textlen = strlen(text); if (fwrite(text, textlen*sizeof(char), 1, f) < 1) { ! pd_error(x,"matrix : failed to write %s", filnam); goto end; } *************** *** 489,497 **** textlen=strlen(text); if (fwrite(text, textlen*sizeof(char), 1, f) < 1) { ! error("matrix : failed to write %s", filnam); goto end; } } if (fwrite("\n", sizeof(char), 1, f) < 1) { ! error("matrix : failed to write %s", filnam); goto end; } } --- 489,497 ---- textlen=strlen(text); if (fwrite(text, textlen*sizeof(char), 1, f) < 1) { ! pd_error(x,"matrix : failed to write %s", filnam); goto end; } } if (fwrite("\n", sizeof(char), 1, f) < 1) { ! pd_error(x, "matrix : failed to write %s", filnam); goto end; } } Index: mtx_element.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_element.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** mtx_element.c 11 May 2005 13:05:29 -0000 1.3 --- mtx_element.c 24 Oct 2005 17:06:37 -0000 1.4 *************** *** 40,44 **** { if(x->current_col>x->col || x->current_row>x->row){ ! error("mtx_element: element position exceeds matrix dimensions"); return; } --- 40,44 ---- { if(x->current_col>x->col || x->current_row>x->row){ ! pd_error(x,"mtx_element: element position exceeds matrix dimensions"); return; } Index: mtx_inverse.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_inverse.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** mtx_inverse.c 11 May 2005 14:31:27 -0000 1.5 --- mtx_inverse.c 24 Oct 2005 17:06:37 -0000 1.6 *************** *** 78,82 **** } } - if (ok)post("mtx_inverse: couldn't really invert the matrix !!! %d error%c", ok, (ok-1)?'s':0); if(error!=0)*error=ok; --- 78,81 ---- *************** *** 135,139 **** freebytes(original, sizeof(t_matrixfloat)*row*col); ! if(error)outlet_bang(x->x_outlet); /* 3c output the atombuf; */ --- 134,141 ---- freebytes(original, sizeof(t_matrixfloat)*row*col); ! if(error){ ! outlet_bang(x->x_outlet); ! pd_error(x, "mtx_inverse: couldn't really invert the matrix !!! %d error%c", error, (error-1)?'s':0); ! } /* 3c output the atombuf; */ Index: mtx_resize.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_resize.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** mtx_resize.c 12 Apr 2005 09:01:36 -0000 1.2 --- mtx_resize.c 24 Oct 2005 17:06:37 -0000 1.3 *************** *** 21,25 **** int r, c; if (argc<1)return; ! if (argc>2)error("mtx_resize : only rows & cols are needed, skipping the rest"); if (argc==1)r=c=atom_getfloat(argv++); else{ --- 21,25 ---- int r, c; if (argc<1)return; ! if (argc>2)pd_error(x, "mtx_resize : only rows & cols are needed, skipping the rest"); if (argc==1)r=c=atom_getfloat(argv++); else{ Index: mtx_fill.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_fill.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** mtx_fill.c 14 Oct 2005 10:01:34 -0000 1.3 --- mtx_fill.c 24 Oct 2005 17:06:37 -0000 1.4 *************** *** 163,167 **** mTXFillIndexMatrix (mtx_fill_obj, s, argc-1, argv+1); else ! post("mtx_fill: creation argument must be 'matrix <startrow> <startcol>' for submatrix filling or 'matrix rows columns [...]' for indexed filling with scalar/matrices"); } --- 163,167 ---- mTXFillIndexMatrix (mtx_fill_obj, s, argc-1, argv+1); else ! pd_error(mtx_fill_obj, "mtx_fill: creation argument must be 'matrix <startrow> <startcol>' for submatrix filling or 'matrix rows columns [...]' for indexed filling with scalar/matrices"); } Index: mtx_mul~.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/src/mtx_mul~.c,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** mtx_mul~.c 19 Sep 2005 13:08:53 -0000 1.3 --- mtx_mul~.c 24 Oct 2005 17:06:37 -0000 1.4 *************** *** 827,835 **** if(s==gensym("matrix~")){ ! error("[matrix~] is deprecated! use [mtx_*~] instead!!"); x->x_compat=2; } else if (s==gensym("matrix_mul_line~")){ ! error("[matrix_mul_line~] is deprecated! use [mtx_*~] instead!!"); x->x_compat=1; } --- 827,835 ---- if(s==gensym("matrix~")){ ! pd_error(x,"[matrix~] is deprecated! use [mtx_*~] instead!!"); x->x_compat=2; } else if (s==gensym("matrix_mul_line~")){ ! pd_error(x,"[matrix_mul_line~] is deprecated! use [mtx_*~] instead!!"); x->x_compat=1; }

1 0

externals/ann/examples tutorial-ann_mlp.pd,1.1,1.2
by dmorelli 24 Oct '05

24 Oct '05

Update of /cvsroot/pure-data/externals/ann/examples In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9472 Modified Files: tutorial-ann_mlp.pd Log Message: fixed mouse/a key Index: tutorial-ann_mlp.pd =================================================================== RCS file: /cvsroot/pure-data/externals/ann/examples/tutorial-ann_mlp.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** tutorial-ann_mlp.pd 22 Oct 2005 11:31:18 -0000 1.1 --- tutorial-ann_mlp.pd 24 Oct 2005 10:46:21 -0000 1.2 *************** *** 1,8 **** ! #N canvas 297 73 593 517 12; #X obj 65 379 ann_mlp; #X text 39 59 input: mouse coord; #X text 37 76 output: 1 if mouse is in the upper left part of the screen ; ! #N canvas 106 171 568 438 step1-creation 0; #X text 141 13 let's create the ANN; #X obj 130 354 outlet; --- 1,8 ---- ! #N canvas 297 73 597 521 12; #X obj 65 379 ann_mlp; #X text 39 59 input: mouse coord; #X text 37 76 output: 1 if mouse is in the upper left part of the screen ; ! #N canvas 106 171 572 442 step1-creation 0; #X text 141 13 let's create the ANN; #X obj 130 354 outlet; *************** *** 14,23 **** #X connect 2 0 1 0; #X restore 128 158 pd step1-creation; ! #N canvas 46 38 644 604 step2-train 0; #X obj 97 530 outlet; #X msg 44 130 train; #X text 102 129 first switch to train mode; #X obj 139 367 pack s f f f; ! #N canvas 0 0 462 312 normalized-inputs 0; #X obj 105 64 r X; #X obj 173 67 r Y; --- 14,23 ---- #X connect 2 0 1 0; #X restore 128 158 pd step1-creation; ! #N canvas 46 38 652 612 step2-train 0; #X obj 97 530 outlet; #X msg 44 130 train; #X text 102 129 first switch to train mode; #X obj 139 367 pack s f f f; ! #N canvas 0 0 466 316 normalized-inputs 0; #X obj 105 64 r X; #X obj 173 67 r Y; *************** *** 37,41 **** #X connect 5 0 8 0; #X restore 127 271 pd normalized-inputs; ! #N canvas 0 0 667 316 desired-output 0; #X obj 383 63 key; #X obj 383 92 select 97; --- 37,41 ---- #X connect 5 0 8 0; #X restore 127 271 pd normalized-inputs; ! #N canvas 0 0 675 324 desired-output 0; #X obj 383 63 key; #X obj 383 92 select 97; *************** *** 45,50 **** #X msg 527 123 0; #X obj 183 195 outlet; ! #X text 40 21 i send 1 when "a" is pressed \, 0 when released; #X obj 180 108 r out; #X connect 0 0 1 0; #X connect 1 0 2 0; --- 45,52 ---- #X msg 527 123 0; #X obj 183 195 outlet; ! #X text 90 269 i send 1 when "a" is pressed \, 0 when released; #X obj 180 108 r out; + #X text 81 231 optionally \, you can use the "a" key instead of the + mouse button; #X connect 0 0 1 0; #X connect 1 0 2 0; *************** *** 114,118 **** #X obj 281 389 loadbang; #X floatatom 116 414 5 0 0 0 mse - mse; ! #N canvas 618 -3 682 470 step3-run 0; #X obj 64 377 outlet; #N canvas 0 0 466 316 normalized-inputs 0; --- 116,120 ---- #X obj 281 389 loadbang; #X floatatom 116 414 5 0 0 0 mse - mse; ! #N canvas 618 0 682 470 step3-run 0; #X obj 64 377 outlet; #N canvas 0 0 466 316 normalized-inputs 0; *************** *** 134,138 **** #X connect 5 0 8 0; #X restore 178 167 pd normalized-inputs; ! #X obj 97 92 tgl 15 0 empty empty run 0 -6 0 8 -258699 -1 -1 1 1; #X obj 145 267 pack s f f; #X msg 50 30 run; --- 136,140 ---- #X connect 5 0 8 0; #X restore 178 167 pd normalized-inputs; ! #X obj 97 92 tgl 15 0 empty empty run 0 -6 0 8 -258699 -1 -1 0 1; #X obj 145 267 pack s f f; #X msg 50 30 run;

1 0

externals/iem/iemmatrix/tests/mtx_bitright 08_function.pd, 1.1, 1.2 09_function.pd, 1.1, 1.2
by IOhannes m zmölnig 24 Oct '05

24 Oct '05

Update of /cvsroot/pure-data/externals/iem/iemmatrix/tests/mtx_bitright In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27694/mtx_bitright Modified Files: 08_function.pd 09_function.pd Log Message: use smaller values for shifting ("<<123" is likely to produce very big results!) Index: 09_function.pd =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/tests/mtx_bitright/09_function.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 09_function.pd 18 Oct 2005 09:16:07 -0000 1.1 --- 09_function.pd 24 Oct 2005 07:08:34 -0000 1.2 *************** *** 24,28 **** #X obj 252 228 unpack 0 0; #X msg 122 132 10 9 -1 3; ! #X msg 185 133 7 34; #X connect 0 0 13 0; #X connect 2 0 3 0; --- 24,28 ---- #X obj 252 228 unpack 0 0; #X msg 122 132 10 9 -1 3; ! #X msg 185 133 7 4.3; #X connect 0 0 13 0; #X connect 2 0 3 0; Index: 08_function.pd =================================================================== RCS file: /cvsroot/pure-data/externals/iem/iemmatrix/tests/mtx_bitright/08_function.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 08_function.pd 18 Oct 2005 09:16:07 -0000 1.1 --- 08_function.pd 24 Oct 2005 07:08:34 -0000 1.2 *************** *** 23,27 **** #X obj 122 221 mtx_bitright 0; #X msg 122 132 4 3 7 6; ! #X msg 185 133 123; #X connect 0 0 13 0; #X connect 2 0 3 0; --- 23,27 ---- #X obj 122 221 mtx_bitright 0; #X msg 122 132 4 3 7 6; ! #X msg 185 133 3.6; #X connect 0 0 13 0; #X connect 2 0 3 0;

1 0

← Newer
1
2
3
4
5
6
7
...
48
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

Pd-cvs October 2005