Pd-cvs November 2005

pd-cvs@lists.iem.at

17 participants
497 discussions

pd/src desire.tk,1.1.2.104,1.1.2.105
by Mathieu Bouchard 05 Nov '05

05 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18044 Modified Files: Tag: devel_0_39 desire.tk Log Message: uh, whatever Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.104 retrieving revision 1.1.2.105 diff -C2 -d -r1.1.2.104 -r1.1.2.105 *** desire.tk 4 Nov 2005 02:15:30 -0000 1.1.2.104 --- desire.tk 5 Nov 2005 13:47:11 -0000 1.1.2.105 *************** *** 103,106 **** --- 103,188 ---- #-----------------------------------------------------------------------------------# + # adapted from matju's MetaRuby (UndoQueue.rb) + + class_new history + + def history init {} { + set @undo {} + set @redo {} + } + + # overload this if you want to control how many levels + # of undo may be kept. + # keep in mind that undo information is kept hierarchically. + def history add {message} { + @undo << message + @redo.clear + } + + # runs the restore procedure for the last item in the root undo_queue. + def history undo {} { + begin { + set backup $@undo + set @undo $@redo + set @redo {} + perform backup.pop + } ensure { + set @redo $@undo + set @undo $backup + } + } + + def history redo {} { + set backup $@redo + set @redo {} + perform backup.pop + set @redo $backup + } + + # this traverses a tree and runs all the restore operations. + #!@#$ could I use #flatten! now ? + def history perform {mess} { + $self atomically { + if Array===mess { + mess.reverse_each{|x| perform x } + } { + mess.call + } + } + } + + def history atomically {&proc} { + set ubackup @undo; set @undo {} + set rbackup @redo; set @redo {} + begin { + proc.call + } ensure { + lappend backup_undo $@undo_queue + set @undo_queue $ubackup + set @redo_queue $rbackup + } + } + + class_new UndoFeature + # attr_accessor :undo_queue + # def initialize {args} { @undo = UndoQueue.new; super } + # this version of #modify atomicizes undo information; + # which means that all operations occurring during the #modify block + # will be undone by a single call to #undo. + # def modify(&proc); @undo_queue.atomically { super(&proc) }; end + # def undo; @undo_queue.undo; end + # def redo; @undo_queue.redo; end + #end + + #class UndoableArray < AutoArray + # include UndoFeature + ## def initialize(n=0,v=nil); super; end + # def put(i,v) @undo_queue.add Message.new(self,:put,i,get(i)); super end + # def put_seq(i,n,v) @undo_queue.add Message.new(self,:put_seq,i,v.length,get_seq(i,n)); super end + #end + + set history [history_new] + + #-----------------------------------------------------------------------------------# # this is the beginning of the more application-dependent part. *************** *** 299,304 **** set cmd [gets $sock] if {[eof $sock]} { - #tk_messageBox -message "my sock puppet disappeared (ah, the great mysteries of the washingmachine). Well, that's all, folks!" -type ok - #exit 42 tk_messageBox -message "server gone boom" -type ok set sock {} --- 381,384 ---- *************** *** 514,518 **** set font(pady) 3 set font(padx) 5 - set mouse(b1down) 0 #-----------------------------------------------------------------------------------# set look(iowidth) 7 --- 594,597 ---- *************** *** 536,541 **** default {list 1}}] - set dehighlight {} - #-----------------------------------------------------------------------------------# set pd_apilist "{ALSA 1}" --- 615,618 ---- *************** *** 579,583 **** def* view motionedit {args} {} def view selected? {} {return $@selected?} ! def view selected?= {x} {set @selected? $x} def* view select {state} { --- 656,660 ---- def* view motionedit {args} {} def view selected? {} {return $@selected?} ! def view selected?= {x} {set @selected? $x; $self changed} def* view select {state} { *************** *** 793,796 **** --- 870,874 ---- set @children {} set @obj_in_edit {} + set @dehighlight {} global manager post %s "canvas init: subscribing to $manager" *************** *** 936,968 **** # correct edit menu, enabling or disabling undo/redo # LATER also cut/copy/paste ! proc menu_fixeditmenu {name} { ! return ! global pd_undoaction pd_redoaction pd_undocanvas ! set e $name.m.edit ! if {$name == $pd_undocanvas && $pd_undoaction != "no"} { ! $e entryconfigure "Undo*" -state normal -label "Undo $pd_undoaction" } else { ! $e entryconfigure "Undo*" -state disabled -label "Undo" } ! if {$name == $pd_undocanvas && $pd_redoaction != "no"} { ! $e entryconfigure "Redo*" -state normal -label "Redo $pd_redoaction" } else { ! $e entryconfigure "Redo*" -state disabled } } #-----------------------------------------------------------------------------------# - - # message from Pd to update the currently available undo/redo action - proc pdtk_undomenu {name undoaction redoaction} { - return - global pd_undoaction pd_redoaction pd_undocanvas - set pd_undocanvas $name - set pd_undoaction $undoaction - set pd_redoaction $redoaction - if {$name != "nobody"} {menu_fixeditmenu $name} - } - - #-----------------------------------------------------------------------------------# def* canvas ctrlkey {key shift} { global accels focus --- 1014,1032 ---- # correct edit menu, enabling or disabling undo/redo # LATER also cut/copy/paste ! def canvas fix_edit_menu {} { ! set e .x$self.m.edit ! if {$name==$@undocanvas && $@undoaction!="no"} { ! $e entryconfigure "Undo*" -state normal -label "Undo $@undoaction" } else { ! $e entryconfigure "Undo*" -state disabled -label "Can't Undo" } ! if {$name==$@undocanvas && $@redoaction!="no"} { ! $e entryconfigure "Redo*" -state normal -label "Redo $@redoaction" } else { ! $e entryconfigure "Redo*" -state disabled -label "Can't Redo" } } #-----------------------------------------------------------------------------------# def* canvas ctrlkey {key shift} { global accels focus *************** *** 1203,1207 **** set t $c.${self}text set @text [$t get 1.0 1.end] ! $c delete ${self}text ${self}BASE ${self}BASE2 ${self}BASE3 after 1 "destroy $t" set l {} --- 1267,1271 ---- set t $c.${self}text set @text [$t get 1.0 1.end] ! $self erase after 1 "destroy $t" set l {} *************** *** 1212,1221 **** def objectbox complete2 {} { - global fonttext_setto - # why? - set @selected? 0 - $self erase - $self update_size - $self draw for {set x 0} {$x<$@ninlets} {incr x} { if {[info exists _($self:i:$x)]} { --- 1276,1279 ---- *************** *** 1228,1233 **** } } - mset cx cy [$self xy] - text_new $self [expr $cx+2] [expr $cy+2] $obj_name $font(size) #000000 } --- 1286,1289 ---- *************** *** 1236,1243 **** } - def objectbox clickedit {args} { - puts "$self is being clicked in edit mode" - } - def objectbox unclick {args} { puts "$self is being unclicked in run mode" --- 1292,1295 ---- *************** *** 1247,1250 **** --- 1299,1303 ---- puts "$self is being unclicked in [lindex $args 0] edit mode" $self edit + #objectbox_edit } *************** *** 1290,1298 **** set dead [lwithout $@children $children]; post %s "DEAD: $dead" foreach x $born {$x subscribe $self; $x changed; $x canvas= $self} ! foreach x $dead {$x unsubscribe $self} set @children $children $self changed } def* canvas add {obj} { set i [lsearch $@children $obj] --- 1343,1353 ---- set dead [lwithout $@children $children]; post %s "DEAD: $dead" foreach x $born {$x subscribe $self; $x changed; $x canvas= $self} ! foreach x $dead {$x unsubscribe $self; $x erase} set @children $children $self changed } + def canvas children_index {child} {lindex $@children $child} + def* canvas add {obj} { set i [lsearch $@children $obj] *************** *** 1324,1331 **** def view move {dx dy} { ! mset x y [$self xy] set @x1 [expr $@x1+$dx] set @y1 [expr $@y1+$dy] ! mset u v [$self xy] .x$(a)canvas.c move $self [expr $u-$x] [expr $v-$y] } --- 1379,1386 ---- def view move {dx dy} { ! mset {x y} [$self xy] set @x1 [expr $@x1+$dx] set @y1 [expr $@y1+$dy] ! mset {u v} [$self xy] .x$(a)canvas.c move $self [expr $u-$x] [expr $v-$y] } *************** *** 1336,1340 **** mset {cx cy} [$self xy] set c .x$(a)canvas.c ! set ports 0; catch {set ports $@ninlets} if {$ports==0} return set port [expr int(($x-$cx)*$ports/$@xs)] --- 1391,1395 ---- mset {cx cy} [$self xy] set c .x$(a)canvas.c ! set ports 0; catch {switch $type {i {set ports $@ninlets} o {set ports $@noutlets}}} if {$ports==0} return set port [expr int(($x-$cx)*$ports/$@xs)] *************** *** 1350,1355 **** def canvas motion {x y mods state} { ! global mouse font ! global tooltip dehighlight look set c .x$self.c set x [$c canvasx $x] --- 1405,1410 ---- def canvas motion {x y mods state} { ! global font ! global tooltip look set c .x$self.c set x [$c canvasx $x] *************** *** 1360,1365 **** } } ! eval $dehighlight ! set dehighlight {} # backup values set ox $@current_x; set @current_x $x --- 1415,1420 ---- } } ! eval $@dehighlight ! set @dehighlight {} # backup values set ox $@current_x; set @current_x $x *************** *** 1377,1381 **** switch $@action { move { ! foreach obj $@selection {$obj move $self [expr $x-$ox] [expr $y-$oy]} return } --- 1432,1436 ---- switch $@action { move { ! foreach obj $@selection {$obj move [expr $x-$ox] [expr $y-$oy]} return } *************** *** 1396,1405 **** object { if {$@editmode} {set event motionedit} {set event motion} ! $id $event $self $x $y $mods if {$@editmode && [llength [$id bbox]]} { mset {x1 y1 x2 y2} [$id bbox] if {abs($y1+3-$y)<=3} { set port [$id hilite_io i $x $y] ! set dehighlight "$c delete ${id}i${port}b; set wire_to {}" set wire_to [list $id $port] return --- 1451,1460 ---- object { if {$@editmode} {set event motionedit} {set event motion} ! $id $event $x $y $mods if {$@editmode && [llength [$id bbox]]} { mset {x1 y1 x2 y2} [$id bbox] if {abs($y1+3-$y)<=3} { set port [$id hilite_io i $x $y] ! set @dehighlight "$c delete ${id}i${port}b; set wire_to {}" set wire_to [list $id $port] return *************** *** 1407,1411 **** if {abs($y2-3-$y)<=3} { set port [$id hilite_io o $x $y] ! set dehighlight "$c delete ${id}o${port}b" return } --- 1462,1466 ---- if {abs($y2-3-$y)<=3} { set port [$id hilite_io o $x $y] ! set @dehighlight "$c delete ${id}o${port}b" return } *************** *** 1492,1553 **** #-----------------------------------------------------------------------------------# ! # this proc is too long, should be cut in several parts --matju ! # agree, but could i do this a bit later? --chun ! ! def* canvas click_on_object {x y b f id} { ! global look ! set c .x$self.c ! set run [expr $@editmode || ($f&2)] ! if {[string length $@focus]} {set gid $@focus} ! if {$f&8} { ! set @rclick_object $id ! } else { ! if {$run} {set event click} {set event clickedit} ! $id $event $self $x $y $b $f ! } ! if {!($f&8) && $@editmode && [llength [$id bbox]]} { ! #$self start_wire ! mset {x1 y1 x2 y2} [$id bbox] ! if {abs($y2-3-$y)<=3} { ! set outs 0 ! catch {set outs $_($id:noutlets)} ! if {$outs} { ! set out [expr int(($x-$x1)*$outs/($x2-$x1))] ! mset {ox1 oy1 ox2 oy2} [$c bbox ${id}o${out}] ! $c create line $x $y $x $y -dash {4 4 4 4} -tags lnew ! set @wire_from [list $id $out] ! return ! } ! } ! set already [expr [lsearch $@selection $id]>=0] ! #if selection only contains one object and has already been selected, ! #allow it to turn into edit mode. ! if {[llength $@selection]==1 && $already} {set @select_by "click"} ! if {($f&1) && !$already} { ! pd $self select-object x$id ! } elseif {!$already} { ! # may need to call canvas_select_object here to work out ! # the shift+click selection ! if {[llength $@selection] == 1} { ! #puts "____complete [lindex $@selection 0] first!____" ! set @old_obj [lindex $@selection 0] ! if {$@select_by == "click"} {$old_obj unedit} ! set @obj_in_edit {} ! } ! if {[llength $@selection] > 0} { ! foreach obj $@selection { ! $c itemconfigure ${obj}BASE -outline $look(objectframe3) ! } ! #set @selection {} ! } ! set @selection {} ! set @selection [linsert $@selection 0 $id] ! foreach obj $@selection { ! $c itemconfigure ${obj}BASE -outline $look(objectframe4) ! } ! set @select_by "click" ! } ! set @action move ! } } --- 1547,1551 ---- #-----------------------------------------------------------------------------------# ! def* objectbox clickedit {x y b f id} { } *************** *** 1563,1598 **** } def* canvas clickedit {x y b f} { ! if {[llength $@obj_in_edit]} { ! #puts "and some object is in edit -> $@obj_in_edit in $self" ! #[lindex $@selection 0] unedit ! $@obj_in_edit unedit ! set @obj_in_edit {} } - # if {[llength $@selection] > 0} { - # foreach obj $@selection {$c itemconfigure ${obj}BASE -outline $look(objectframe3)} - # set @selection {} - # } - # if {[llength $@selection_wire] > 0} { - # foreach wire $@selection_wire {$c itemconfigure $wire -fill $look(wirefg)} - # set @selection_wire {} - # } - focus .x$self.c - set @action rect - .x$self.c create line $x $y $x $y $x $y $x $y $x $y -tags {selrect1 selrect} -fill black -dash {3 3 3 3} -dashoffset 3 } def* canvas click {x y b f} { ! global mouse look focus set c .x$self.c set x [$c canvasx $x] set y [$c canvasy $y] set @select_area [list $x $y $x $y] ! set mouse(b1down) 1 mset {type id} [$self identify_target $x $y $b $f "click"] switch $type { ! # object {$self click_on_object $x $y $b $f $id} ! # wire {$self click_on_wire $x $y $b $f $id} ! default {if {$@editmode} {$self clickedit $x $y $b $f}} } } --- 1561,1634 ---- } + def canvas select_all {} { + foreach o $@children {$o selected?= 0} + set @selection $@children + } + + def canvas deselect_all {} { + foreach o $@selection {$o selected?= 0} + set @selection {} + } + def* canvas clickedit {x y b f} { ! set c .x[$self canvas].c ! mset {type id} [$self identify_target $x $y $b $f "click"] ! if {$f&8} {post "right click!"; return} ! if {![llength $id]} { ! $self deselect_all ! set @action rect ! $c create line $x $y $x $y $x $y $x $y $x $y \ ! -tags {selrect1 selrect} -fill black -dash {3 3 3 3} -dashoffset 3 ! return ! } ! if {[llength $@obj_in_edit]} {$@obj_in_edit unedit; set @obj_in_edit {}} ! set in_selection [expr [lsearch $@selection $id]>=0] ! if {[llength $@selection]==1 && $in_selection} {set @select_by click; $x edit; return} ! if {[llength $@selection]} { ! foreach o $@selection {$o selected?= 0} ! set @selection {} ! } ! mset {x1 y1 x2 y2} [$id bbox] ! set outs 0; catch {set outs $id noutlets} ! if {abs($y2-3-$y)<=3 && $outs} { ! set out [expr int(($x-$x1)*$outs/($x2-$x1))] ! $c create line $x $y $x $y -dash {4 4 4 4} -tags lnew ! set @clickon [list outlet $self $out] ! set @action wire ! return ! } ! switch $type { ! object {$id clickedit $x $y $b $f $id} ! wire {$id clickedit $x $y $b $f $id} ! default {error BORK} ! } ! if {($f&1) && !$already} {post "add to selection?"; return} ! if {!$in_selection} { ! if {[llength $@selection] == 1} { ! set @old_obj [lindex $@selection 0] ! if {$@select_by == "click"} {$old_obj unedit} ! set @obj_in_edit {} ! } ! set @selection {} ! set @selection [linsert $@selection 0 $id] ! set @select_by click ! set @action move } } def* canvas click {x y b f} { ! global look focus set c .x$self.c + focus $c set x [$c canvasx $x] set y [$c canvasy $y] set @select_area [list $x $y $x $y] ! if {$@editmode && !($f&2)} {$self clickedit $x $y $b $f} mset {type id} [$self identify_target $x $y $b $f "click"] + if {![llength $id]} return switch $type { ! object {$id click $x $y $b $f} ! wire {$id click $x $y $b $f} ! default {error BORK} } }

1 0

pd/src x_connective.c,1.3.4.1.2.5,1.3.4.1.2.6
by Mathieu Bouchard 05 Nov '05

05 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11444 Modified Files: Tag: devel_0_39 x_connective.c Log Message: fixed the [t s] crash Index: x_connective.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/x_connective.c,v retrieving revision 1.3.4.1.2.5 retrieving revision 1.3.4.1.2.6 diff -C2 -d -r1.3.4.1.2.5 -r1.3.4.1.2.6 *** x_connective.c 28 Oct 2005 12:18:42 -0000 1.3.4.1.2.5 --- x_connective.c 5 Nov 2005 13:13:43 -0000 1.3.4.1.2.6 *************** *** 1019,1023 **** outlet_bang(u->u_outlet); else if (u->u_type == TR_SYMBOL) ! outlet_symbol(u->u_outlet, (argc ? atom_getsymbol(argv) : 0)); else if (u->u_type == TR_POINTER) { --- 1019,1023 ---- outlet_bang(u->u_outlet); else if (u->u_type == TR_SYMBOL) ! outlet_symbol(u->u_outlet, (argc ? atom_getsymbol(argv) : &s_float)); else if (u->u_type == TR_POINTER) {

1 0

pd/src desire.tk,1.1.2.103,1.1.2.104 TODO,1.1.2.3,1.1.2.4
by chunlee 04 Nov '05

04 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26434 Modified Files: Tag: devel_0_39 desire.tk TODO Log Message: Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.103 retrieving revision 1.1.2.104 diff -C2 -d -r1.1.2.103 -r1.1.2.104 *** desire.tk 4 Nov 2005 01:07:38 -0000 1.1.2.103 --- desire.tk 4 Nov 2005 02:15:30 -0000 1.1.2.104 *************** *** 570,574 **** def view item_delete {} {.x$(a)canvas.c delete $self} ! def* view delete {} {$self erase; $self _delete} def* view erase {} {$self item_delete} def* view click {args} {} --- 570,574 ---- def view item_delete {} {.x$(a)canvas.c delete $self} ! def* view delete {} {$self erase; $self _delete; io_erase $self} def* view erase {} {$self item_delete} def* view click {args} {} *************** *** 1246,1252 **** def objectbox unclickedit {args} { puts "$self is being unclicked in [lindex $args 0] edit mode" - #$self edit [lindex $args 0] $self edit - #objectbox_edit } --- 1246,1250 ---- Index: TODO =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/TODO,v retrieving revision 1.1.2.3 retrieving revision 1.1.2.4 diff -C2 -d -r1.1.2.3 -r1.1.2.4 *** TODO 2 Nov 2005 14:48:36 -0000 1.1.2.3 --- TODO 4 Nov 2005 02:15:30 -0000 1.1.2.4 *************** *** 6,10 **** [h] fix the new canvas default so that its in edit mode when created -done ! [h] get the object box to render correctly after editing/recreating [h] make moving object work again and shorten the necessary procs as i said i would before [h] object selection --- 6,13 ---- [h] fix the new canvas default so that its in edit mode when created -done ! [h] get the object box to render correctly after editing/recreating -done ! [h] objectbox atuo resize ! the minimum one required for the chars ! the minimum one required for the inlets/outlets [h] make moving object work again and shorten the necessary procs as i said i would before [h] object selection

1 0

pd/src desire.tk,1.1.2.102,1.1.2.103
by chunlee 04 Nov '05

04 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14156 Modified Files: Tag: devel_0_39 desire.tk Log Message: Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.102 retrieving revision 1.1.2.103 diff -C2 -d -r1.1.2.102 -r1.1.2.103 *** desire.tk 4 Nov 2005 00:34:02 -0000 1.1.2.102 --- desire.tk 4 Nov 2005 01:07:38 -0000 1.1.2.103 *************** *** 1246,1250 **** def objectbox unclickedit {args} { puts "$self is being unclicked in [lindex $args 0] edit mode" ! $self edit [lindex $args 0] #objectbox_edit } --- 1246,1251 ---- def objectbox unclickedit {args} { puts "$self is being unclicked in [lindex $args 0] edit mode" ! #$self edit [lindex $args 0] ! $self edit #objectbox_edit } *************** *** 1723,1727 **** set id $@focus if {$@editmode} {set event unclickedit} {set event unclick} ! $id $event $self $cx $cy } foreach {type id} [$self identify_target $cx $cy -1 -1 "blah "] {} --- 1724,1728 ---- set id $@focus if {$@editmode} {set event unclickedit} {set event unclick} ! $id $event $cx $cy } foreach {type id} [$self identify_target $cx $cy -1 -1 "blah "] {} *************** *** 1729,1733 **** object { if {$@editmode} {set event unclickedit} {set event unclick} ! $id $event $self $cx $cy } } --- 1730,1734 ---- object { if {$@editmode} {set event unclickedit} {set event unclick} ! $id $event $cx $cy } }

1 0

pd/src desire.tk,1.1.2.101,1.1.2.102
by Mathieu Bouchard 04 Nov '05

04 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7332 Modified Files: Tag: devel_0_39 desire.tk Log Message: fixed hilite_io Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.101 retrieving revision 1.1.2.102 diff -C2 -d -r1.1.2.101 -r1.1.2.102 *** desire.tk 4 Nov 2005 00:18:41 -0000 1.1.2.101 --- desire.tk 4 Nov 2005 00:34:02 -0000 1.1.2.102 *************** *** 1336,1340 **** global look mset {cx cy} [$self xy] ! set c .x$canvas.c set ports 0; catch {set ports $@ninlets} if {$ports==0} return --- 1336,1340 ---- global look mset {cx cy} [$self xy] ! set c .x$(a)canvas.c set ports 0; catch {set ports $@ninlets} if {$ports==0} return *************** *** 1346,1350 **** $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} ! $canvas show_tooltip $x $y $tip return $port } --- 1346,1350 ---- $c create rectangle [l+ [$c coords $p] {-4 -4 +4 +4}] -outline $outline -width 1 -tags ${p}b switch $type {i {set tip "inlet $port"} o {set tip "outlet $port"}} ! $@canvas show_tooltip $x $y $tip return $port } *************** *** 1401,1405 **** mset {x1 y1 x2 y2} [$id bbox] if {abs($y1+3-$y)<=3} { ! set port [$id hilite_io $self i $x $y] set dehighlight "$c delete ${id}i${port}b; set wire_to {}" set wire_to [list $id $port] --- 1401,1405 ---- mset {x1 y1 x2 y2} [$id bbox] if {abs($y1+3-$y)<=3} { ! set port [$id hilite_io i $x $y] set dehighlight "$c delete ${id}i${port}b; set wire_to {}" set wire_to [list $id $port] *************** *** 1407,1411 **** } if {abs($y2-3-$y)<=3} { ! set port [$id hilite_io $self o $x $y] set dehighlight "$c delete ${id}o${port}b" return --- 1407,1411 ---- } if {abs($y2-3-$y)<=3} { ! set port [$id hilite_io o $x $y] set dehighlight "$c delete ${id}o${port}b" return *************** *** 1533,1537 **** #puts "____complete [lindex $@selection 0] first!____" set @old_obj [lindex $@selection 0] ! if {$@select_by == "click"} {$old_obj unedit $self} set @obj_in_edit {} } --- 1533,1537 ---- #puts "____complete [lindex $@selection 0] first!____" set @old_obj [lindex $@selection 0] ! if {$@select_by == "click"} {$old_obj unedit} set @obj_in_edit {} } *************** *** 1567,1572 **** if {[llength $@obj_in_edit]} { #puts "and some object is in edit -> $@obj_in_edit in $self" ! #[lindex $@selection 0] unedit $self ! $@obj_in_edit unedit $self set @obj_in_edit {} } --- 1567,1572 ---- if {[llength $@obj_in_edit]} { #puts "and some object is in edit -> $@obj_in_edit in $self" ! #[lindex $@selection 0] unedit ! $@obj_in_edit unedit set @obj_in_edit {} } *************** *** 1714,1718 **** if {![llength $@obj_in_edit]} { set @obj_in_edit [lindex $@selection 1] ! [lindex $@selection 0] edit $self } } --- 1714,1718 ---- if {![llength $@obj_in_edit]} { set @obj_in_edit [lindex $@selection 1] ! [lindex $@selection 0] edit } }

1 0

pd/src desire.tk,1.1.2.100,1.1.2.101
by Mathieu Bouchard 04 Nov '05

04 Nov '05

Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3503 Modified Files: Tag: devel_0_39 desire.tk Log Message: fixed 3 calls to bbox Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.100 retrieving revision 1.1.2.101 diff -C2 -d -r1.1.2.100 -r1.1.2.101 *** desire.tk 2 Nov 2005 15:18:06 -0000 1.1.2.100 --- desire.tk 4 Nov 2005 00:18:41 -0000 1.1.2.101 *************** *** 1208,1212 **** foreach char [split $@text ""] {lappend l [scan $char %c]} pd .x$@canvas text_setto !$self $l ! eval "focus $c" } --- 1208,1212 ---- foreach char [split $@text ""] {lappend l [scan $char %c]} pd .x$@canvas text_setto !$self $l ! focus $c } *************** *** 1398,1403 **** if {$@editmode} {set event motionedit} {set event motion} $id $event $self $x $y $mods ! if {$@editmode && [llength [$id bbox $self]]} { ! mset {x1 y1 x2 y2} [$id bbox $self] if {abs($y1+3-$y)<=3} { set port [$id hilite_io $self i $x $y] --- 1398,1403 ---- if {$@editmode} {set event motionedit} {set event motion} $id $event $self $x $y $mods ! if {$@editmode && [llength [$id bbox]]} { ! mset {x1 y1 x2 y2} [$id bbox] if {abs($y1+3-$y)<=3} { set port [$id hilite_io $self i $x $y] *************** *** 1509,1513 **** if {!($f&8) && $@editmode && [llength [$id bbox]]} { #$self start_wire ! mset {x1 y1 x2 y2} [$id bbox $self] if {abs($y2-3-$y)<=3} { set outs 0 --- 1509,1513 ---- if {!($f&8) && $@editmode && [llength [$id bbox]]} { #$self start_wire ! mset {x1 y1 x2 y2} [$id bbox] if {abs($y2-3-$y)<=3} { set outs 0

1 0

externals/grh/PDContainer CHANGELOG,1.1,1.2
by Georg Holzmann 03 Nov '05

03 Nov '05

Update of /cvsroot/pure-data/externals/grh/PDContainer In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15120 Modified Files: CHANGELOG Log Message: additional methods: [getall(, [keys(, [values( Index: CHANGELOG =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/CHANGELOG,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** CHANGELOG 21 Oct 2005 11:56:32 -0000 1.1 --- CHANGELOG 3 Nov 2005 20:40:39 -0000 1.2 *************** *** 1,3 **** --- 1,7 ---- + new: + - [getall( message to dump out all data sequentially + - [keys( + [values( to dump out all keys, values of map, multimap + version 0.2 - possible to store pointers now as keys, values, ... (for pd graphical datastructures)

1 0

externals/grh/PDContainer/include GlobalStuff.h, 1.1, 1.2 ContainerBase.h, 1.1, 1.2
by Georg Holzmann 03 Nov '05

03 Nov '05

Update of /cvsroot/pure-data/externals/grh/PDContainer/include In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15120/include Modified Files: GlobalStuff.h ContainerBase.h Log Message: additional methods: [getall(, [keys(, [values( Index: ContainerBase.h =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/include/ContainerBase.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** ContainerBase.h 21 Oct 2005 11:56:32 -0000 1.1 --- ContainerBase.h 3 Nov 2005 20:40:39 -0000 1.2 *************** *** 95,98 **** --- 95,104 ---- { data_.erase(h_namespace_); } + /* returns a reference to the whole Container + * of the current namespace + */ + virtual ContainerType &getAll() + { return data_[h_namespace_]; } + /* clears all the data of the current container * ( in all namespaces !!!!! ) Index: GlobalStuff.h =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/include/GlobalStuff.h,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** GlobalStuff.h 21 Oct 2005 11:56:32 -0000 1.1 --- GlobalStuff.h 3 Nov 2005 20:40:39 -0000 1.2 *************** *** 33,37 **** // current version ! #define PDC_VERSION "0.2" --- 33,37 ---- // current version ! #define PDC_VERSION "0.2.1" *************** *** 79,95 **** { length = size_; - - // !!!! FIXME !!!! - // hack to avoid lockating too much memory - // (somewhere I read an uninitialized value ... - // ... but where !?) - if(length>999) - { - post("Element, constr1: invalid construction !!! should be fixed !!!"); - length=0; - atom=NULL; - return; - } - atom = (t_atom*)copybytes(atom_, length*sizeof(t_atom)); } --- 79,82 ---- *************** *** 102,118 **** { length = src.length; - - // !!!! FIXME !!!! - // hack to avoid lockating too much memory - // (somewhere I read an uninitialized value ... - // ... but where !?) - if(length>999) - { - post("Element, constr2: invalid construction !!! should be fixed !!!"); - length=0; - atom=NULL; - return; - } - atom = (t_atom*)copybytes(src.atom, length*sizeof(t_atom)); } --- 89,92 ---- *************** *** 139,155 **** { length = size_; - - // !!!! FIXME !!!! - // hack to avoid lockating too much memory - // (somewhere I read an uninitialized value ... - // ... but where !?) - if(length>999) - { - post("Element, setAtoms: invalid construction !!! should be fixed !!!"); - length=0; - atom=NULL; - return; - } - atom = (t_atom*)copybytes(atom_, length*sizeof(t_atom)); } --- 113,116 ---- *************** *** 176,192 **** { length = src.length; - - // !!!! FIXME !!!! - // hack to avoid lockating too much memory - // (somewhere I read an uninitialized value ... - // ... but where !?) - if(length>999) - { - post("Element, assignment: invalid construction !!! should be fixed !!!"); - length=0; - atom=NULL; - return (*this); - } - atom = (t_atom*)copybytes(src.atom, length*sizeof(t_atom)); } --- 137,140 ----

1 0

externals/grh/PDContainer/src h_deque.cpp, 1.1, 1.2 h_list.cpp, 1.1, 1.2 h_vector.cpp, 1.1, 1.2 h_set.cpp, 1.1, 1.2 h_multiset.cpp, 1.1, 1.2 h_map.cpp, 1.1, 1.2 h_multimap.cpp, 1.1, 1.2
by Georg Holzmann 03 Nov '05

03 Nov '05

Update of /cvsroot/pure-data/externals/grh/PDContainer/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15120/src Modified Files: h_deque.cpp h_list.cpp h_vector.cpp h_set.cpp h_multiset.cpp h_map.cpp h_multimap.cpp Log Message: additional methods: [getall(, [keys(, [values( Index: h_multiset.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_multiset.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_multiset.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_multiset.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 83,86 **** --- 83,110 ---- } + static void h_multiset_getall(t_h_multiset *x) + { + multiset<Element>::iterator iter = x->hmultiset->getAll().begin(); + + while(iter != x->hmultiset->getAll().end()) + { + Element output = *iter; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_multiset_print(t_h_multiset *x) { *************** *** 201,204 **** --- 225,230 ---- class_addmethod(h_multiset_class, (t_method)h_multiset_get_namespace, gensym("getnamespace"), A_DEFFLOAT, 0); + class_addmethod(h_multiset_class, (t_method)h_multiset_getall, + gensym("getall"), A_DEFFLOAT, 0); class_addmethod(h_multiset_class, (t_method)h_multiset_print, gensym("print"), A_DEFFLOAT, 0); Index: h_multimap.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_multimap.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_multimap.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_multimap.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 180,183 **** --- 180,231 ---- } + static void h_multimap_keys(t_h_multimap *x) + { + multimap<Element,Element>::iterator iter = x->hmultimap->getAll().begin(); + + while(iter != x->hmultimap->getAll().end()) + { + Element output = (*iter).first; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + + static void h_multimap_values(t_h_multimap *x) + { + multimap<Element,Element>::iterator iter = x->hmultimap->getAll().begin(); + + while(iter != x->hmultimap->getAll().end()) + { + Element output = (*iter).second; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_multimap_print(t_h_multimap *x) { *************** *** 311,314 **** --- 359,366 ---- class_addmethod(h_multimap_class, (t_method)h_multimap_get_namespace, gensym("getnamespace"), A_DEFFLOAT, 0); + class_addmethod(h_multimap_class, (t_method)h_multimap_keys, + gensym("keys"), A_DEFFLOAT, 0); + class_addmethod(h_multimap_class, (t_method)h_multimap_values, + gensym("values"), A_DEFFLOAT, 0); class_addmethod(h_multimap_class, (t_method)h_multimap_print, gensym("print"), A_DEFFLOAT, 0); Index: h_deque.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_deque.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_deque.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_deque.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 344,347 **** --- 344,371 ---- } + static void h_deque_getall(t_h_deque *x) + { + deque<Element>::iterator iter = x->hdeque->getAll().begin(); + + while(iter != x->hdeque->getAll().end()) + { + Element output = *iter; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_deque_print(t_h_deque *x) { *************** *** 555,558 **** --- 579,584 ---- class_addmethod(h_deque_class, (t_method)h_deque_get_namespace, gensym("getnamespace"), A_DEFFLOAT, 0); + class_addmethod(h_deque_class, (t_method)h_deque_getall, + gensym("getall"), A_DEFFLOAT, 0); class_addmethod(h_deque_class, (t_method)h_deque_print, gensym("print"), A_DEFFLOAT, 0); Index: h_vector.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_vector.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_vector.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_vector.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 262,265 **** --- 262,289 ---- } + static void h_vector_getall(t_h_vector *x) + { + vector<Element>::iterator iter = x->hvector->getAll().begin(); + + while(iter != x->hvector->getAll().end()) + { + Element output = *iter; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_vector_print(t_h_vector *x) { *************** *** 466,469 **** --- 490,495 ---- gensym("getnamespace"), A_DEFFLOAT, 0); class_addmethod(h_vector_class, (t_method)h_vector_print, + gensym("getall"), A_DEFFLOAT, 0); + class_addmethod(h_vector_class, (t_method)h_vector_print, gensym("print"), A_DEFFLOAT, 0); class_addmethod(h_vector_class, (t_method)h_vector_clear, Index: h_list.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_list.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_list.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_list.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 280,283 **** --- 280,307 ---- } + static void h_list_getall(t_h_list *x) + { + list<Element>::iterator iter = x->hlist->getAll().begin(); + + while(iter != x->hlist->getAll().end()) + { + Element output = *iter; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_list_print(t_h_list *x) { *************** *** 427,430 **** --- 451,456 ---- class_addmethod(h_list_class, (t_method)h_list_clear_all, gensym("clearall"), A_DEFFLOAT, 0); + class_addmethod(h_list_class, (t_method)h_list_getall, + gensym("getall"), A_DEFFLOAT, 0); class_addmethod(h_list_class, (t_method)h_list_print, gensym("print"), A_DEFFLOAT, 0); Index: h_map.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_map.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_map.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_map.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 183,186 **** --- 183,234 ---- } + static void h_map_keys(t_h_map *x) + { + map<Element,Element>::iterator iter = x->hmap->getAll().begin(); + + while(iter != x->hmap->getAll().end()) + { + Element output = (*iter).first; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + + static void h_map_values(t_h_map *x) + { + map<Element,Element>::iterator iter = x->hmap->getAll().begin(); + + while(iter != x->hmap->getAll().end()) + { + Element output = (*iter).second; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_map_print(t_h_map *x) { *************** *** 315,318 **** --- 363,370 ---- class_addmethod(h_map_class, (t_method)h_map_get_namespace, gensym("getnamespace"), A_DEFFLOAT, 0); + class_addmethod(h_map_class, (t_method)h_map_keys, + gensym("keys"), A_DEFFLOAT, 0); + class_addmethod(h_map_class, (t_method)h_map_values, + gensym("values"), A_DEFFLOAT, 0); class_addmethod(h_map_class, (t_method)h_map_print, gensym("print"), A_DEFFLOAT, 0); Index: h_set.cpp =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/src/h_set.cpp,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** h_set.cpp 21 Oct 2005 11:56:32 -0000 1.1 --- h_set.cpp 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 83,86 **** --- 83,110 ---- } + static void h_set_getall(t_h_set *x) + { + set<Element>::iterator iter = x->hset->getAll().begin(); + + while(iter != x->hset->getAll().end()) + { + Element output = *iter; + + if(output.getLength() == 1) // symbol or float + { + if (output.getAtom()[0].a_type == A_FLOAT) + outlet_float(x->out0, output.getAtom()[0].a_w.w_float); + if (output.getAtom()[0].a_type == A_SYMBOL) + outlet_symbol(x->out0, output.getAtom()[0].a_w.w_symbol); + if (output.getAtom()[0].a_type == A_POINTER) + outlet_pointer(x->out0, output.getAtom()[0].a_w.w_gpointer); + } + if(output.getLength() > 1) // list + outlet_list(x->out0,&s_list,output.getLength(),output.getAtom()); + + iter++; + } + } + static void h_set_print(t_h_set *x) { *************** *** 201,204 **** --- 225,230 ---- class_addmethod(h_set_class, (t_method)h_set_get_namespace, gensym("getnamespace"), A_DEFFLOAT, 0); + class_addmethod(h_set_class, (t_method)h_set_getall, + gensym("getall"), A_DEFFLOAT, 0); class_addmethod(h_set_class, (t_method)h_set_print, gensym("print"), A_DEFFLOAT, 0);

1 0

externals/grh/PDContainer/help help-h_deque.pd, 1.1, 1.2 help-h_list.pd, 1.1, 1.2 help-h_map.pd, 1.1, 1.2 help-h_multimap.pd, 1.1, 1.2 help-h_multiset.pd, 1.1, 1.2 help-h_set.pd, 1.1, 1.2 help-h_vector.pd, 1.1, 1.2
by Georg Holzmann 03 Nov '05

03 Nov '05

Update of /cvsroot/pure-data/externals/grh/PDContainer/help In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15120/help Modified Files: help-h_deque.pd help-h_list.pd help-h_map.pd help-h_multimap.pd help-h_multiset.pd help-h_set.pd help-h_vector.pd Log Message: additional methods: [getall(, [keys(, [values( Index: help-h_deque.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_deque.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_deque.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_deque.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 160,170 **** #X text 36 98 init arg: namespace; #X msg 480 293 print; ! #X msg 480 337 clear; ! #X msg 480 637 help; ! #X obj 559 688 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 480 234 getnamespace; ! #X msg 480 375 clearall; ! #X obj 480 736 print BBB; #X obj 68 380 print AAA; #X text 591 259 <- change namespace; --- 160,170 ---- #X text 36 98 init arg: namespace; #X msg 480 293 print; ! #X msg 480 379 clear; ! #X msg 480 664 help; ! #X obj 559 715 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 480 234 getnamespace; ! #X msg 480 417 clearall; ! #X obj 480 763 print BBB; #X obj 68 380 print AAA; #X text 591 259 <- change namespace; *************** *** 172,180 **** #X text 527 294 <- print all the data of the; #X text 546 309 current namespace; ! #X text 528 337 <- clear all the data of the; ! #X text 549 352 current namespace; ! #X text 548 377 <- clear all the data in all; ! #X text 569 392 same containers (maybe; ! #X text 571 407 you shouldn't use this); #X text 580 236 <- get current namespace; #X text 512 193 general operations:; --- 172,180 ---- #X text 527 294 <- print all the data of the; #X text 546 309 current namespace; ! #X text 528 379 <- clear all the data of the; ! #X text 549 394 current namespace; ! #X text 548 419 <- clear all the data in all; ! #X text 569 434 same containers (maybe; ! #X text 571 449 you shouldn't use this); #X text 580 236 <- get current namespace; #X text 512 193 general operations:; *************** *** 253,262 **** it \, pop outputs and removes it.; #X restore 516 89 pd Container_Explanation; ! #X msg 480 574 resize \$1; ! #X msg 480 608 getsize; ! #X floatatom 488 546 5 0 0 0 - - -; ! #X floatatom 519 707 5 0 0 0 - - -; ! #X text 545 607 <- get the size (at 2nd; ! #X text 567 621 outlet); #X msg 68 290 get \$1; #X floatatom 74 269 5 0 0 0 - - -; --- 253,262 ---- it \, pop outputs and removes it.; #X restore 516 89 pd Container_Explanation; ! #X msg 480 601 resize \$1; ! #X msg 480 635 getsize; ! #X floatatom 488 573 5 0 0 0 - - -; ! #X floatatom 519 734 5 0 0 0 - - -; ! #X text 545 634 <- get the size (at 2nd; ! #X text 567 648 outlet); #X msg 68 290 get \$1; #X floatatom 74 269 5 0 0 0 - - -; *************** *** 291,297 **** #X obj 70 776 h_deque havi; #X obj 69 619 h_deque havi; ! #X obj 480 664 h_deque havi; ! #X text 560 708 <- size of deque; ! #X text 556 575 <- resizes the deque; #X text 187 702 Thats not very fast with a deque!; #X msg 69 489 pushfront \$1; --- 291,297 ---- #X obj 70 776 h_deque havi; #X obj 69 619 h_deque havi; ! #X obj 480 691 h_deque havi; ! #X text 560 735 <- size of deque; ! #X text 556 602 <- resizes the deque; #X text 187 702 Thats not very fast with a deque!; #X msg 69 489 pushfront \$1; *************** *** 408,418 **** #X connect 11 0 0 0; #X connect 12 0 0 0; ! #X restore 480 456 pd read_save_possibilities; ! #X text 520 480 different possiblities to read; ! #X text 520 494 and write from and to files; ! #X text 519 509 (XML and textfiles); #X text 216 844 htttp://grh.mur.at/software/pdcontainer.html; #X text 180 827 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2005; #X connect 8 0 68 0; #X connect 9 0 68 0; --- 408,421 ---- #X connect 11 0 0 0; #X connect 12 0 0 0; ! #X restore 480 491 pd read_save_possibilities; ! #X text 520 515 different possiblities to read; ! #X text 520 529 and write from and to files; ! #X text 519 544 (XML and textfiles); #X text 216 844 htttp://grh.mur.at/software/pdcontainer.html; #X text 180 827 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2005; + #X msg 480 334 getall; + #X text 535 335 <- dumps out all data sequentially; + #X text 556 349 at the first outlet; #X connect 8 0 68 0; #X connect 9 0 68 0; *************** *** 455,456 **** --- 458,460 ---- #X connect 77 0 67 0; #X connect 86 0 68 0; + #X connect 92 0 14 0; Index: help-h_map.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_map.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_map.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_map.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 1,5 **** ! #N canvas 0 0 818 882 10; ! #X msg 82 407 add ge; ! #X obj 175 494 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 33 24 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 --- 1,5 ---- ! #N canvas 551 0 818 885 10; ! #X msg 82 392 add ge; ! #X obj 175 479 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 33 24 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 *************** *** 10,45 **** #X text 292 53 ::: h_map :::; #X text 40 98 init arg: namespace; ! #X msg 474 379 print; ! #X msg 474 423 clear; ! #X msg 474 643 help; ! #X obj 567 704 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X msg 474 320 getnamespace; ! #X msg 474 461 clearall; ! #X obj 474 681 h_map druschka; ! #X obj 474 757 print BBB; ! #X obj 82 495 print AAA; ! #X text 585 345 <- change namespace; ! #X msg 474 344 namespace grix; ! #X text 521 380 <- print all the data of the; ! #X text 540 395 current namespace; ! #X text 522 423 <- clear all the data of the; ! #X text 543 438 current namespace; ! #X text 542 463 <- clear all the data in all; ! #X text 563 478 same containers (maybe; ! #X text 565 493 you shouldn't use this); ! #X text 574 322 <- get current namespace; ! #X text 473 268 general operations:; ! #X msg 82 381 add bla bal tuff; ! #X msg 82 431 add 4 f 3; ! #X msg 82 356 add \$1; ! #X floatatom 82 318 5 0 0 0 - - -; ! #X symbolatom 129 320 10 0 0 0 - - -; ! #X obj 82 472 h_map druschka; ! #X msg 244 433 list damm 4345 it; ! #X floatatom 244 339 5 0 0 0 - - -; ! #X symbolatom 244 357 10 0 0 0 - - -; ! #X msg 244 409 hacka 45; ! #X msg 244 386 3 4 krschi; #X text 37 130 Maps represent a mapping from one type (the key type) to another type (the value type). You can associate a value with a --- 10,45 ---- #X text 292 53 ::: h_map :::; #X text 40 98 init arg: namespace; ! #X msg 474 364 print; ! #X msg 474 478 clear; ! #X msg 474 698 help; ! #X obj 567 750 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X msg 474 305 getnamespace; ! #X msg 474 516 clearall; ! #X obj 474 727 h_map druschka; ! #X obj 474 803 print BBB; ! #X obj 82 480 print AAA; ! #X text 585 330 <- change namespace; ! #X msg 474 329 namespace grix; ! #X text 521 365 <- print all the data of the; ! #X text 540 380 current namespace; ! #X text 522 478 <- clear all the data of the; ! #X text 543 493 current namespace; ! #X text 542 518 <- clear all the data in all; ! #X text 563 533 same containers (maybe; ! #X text 565 548 you shouldn't use this); ! #X text 574 307 <- get current namespace; ! #X text 473 253 general operations:; ! #X msg 82 366 add bla bal tuff; ! #X msg 82 416 add 4 f 3; ! #X msg 82 341 add \$1; ! #X floatatom 82 303 5 0 0 0 - - -; ! #X symbolatom 129 305 10 0 0 0 - - -; ! #X obj 82 457 h_map druschka; ! #X msg 244 418 list damm 4345 it; ! #X floatatom 244 324 5 0 0 0 - - -; ! #X symbolatom 244 342 10 0 0 0 - - -; ! #X msg 244 394 hacka 45; ! #X msg 244 371 3 4 krschi; #X text 37 130 Maps represent a mapping from one type (the key type) to another type (the value type). You can associate a value with a *************** *** 48,76 **** Container \, meaning that no two elements have the same key. (see Multimap for more elements with the same key); ! #X text 110 293 key:; ! #X text 254 308 value:; ! #X text 127 269 add data to the map:; ! #X obj 172 748 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X obj 79 749 print AAA; ! #X floatatom 79 572 5 0 0 0 - - -; ! #X symbolatom 126 574 10 0 0 0 - - -; ! #X obj 79 726 h_map druschka; ! #X text 136 541 get \, remove data:; ! #X msg 79 610 get \$1; ! #X msg 79 635 get bla bal tuff; ! #X msg 79 661 get ge; ! #X msg 79 685 get 4 f 3; ! #X floatatom 222 576 5 0 0 0 - - -; ! #X symbolatom 269 578 10 0 0 0 - - -; ! #X msg 222 614 remove \$1; ! #X msg 222 639 remove bla bal tuff; ! #X msg 222 665 remove ge; ! #X msg 222 689 remove 4 f 3; ! #X text 195 748 <- bang if the key isn't found; ! #X msg 474 609 getsize; ! #X text 539 608 <- get the size (at 2nd; ! #X text 561 622 outlet); ! #X obj 520 730 print size; #X obj 504 26 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; --- 48,76 ---- Container \, meaning that no two elements have the same key. (see Multimap for more elements with the same key); ! #X text 110 278 key:; ! #X text 254 293 value:; ! #X text 127 254 add data to the map:; ! #X obj 172 733 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X obj 79 734 print AAA; ! #X floatatom 79 557 5 0 0 0 - - -; ! #X symbolatom 126 559 10 0 0 0 - - -; ! #X obj 79 711 h_map druschka; ! #X text 136 526 get \, remove data:; ! #X msg 79 595 get \$1; ! #X msg 79 620 get bla bal tuff; ! #X msg 79 646 get ge; ! #X msg 79 670 get 4 f 3; ! #X floatatom 222 561 5 0 0 0 - - -; ! #X symbolatom 269 563 10 0 0 0 - - -; ! #X msg 222 599 remove \$1; ! #X msg 222 624 remove bla bal tuff; ! #X msg 222 650 remove ge; ! #X msg 222 674 remove 4 f 3; ! #X text 195 733 <- bang if the key isn't found; ! #X msg 474 664 getsize; ! #X text 539 663 <- get the size (at 2nd; ! #X text 561 677 outlet); ! #X obj 520 776 print size; #X obj 504 26 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; *************** *** 384,394 **** #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 474 522 pd read_save_possibilities; ! #X text 512 543 different possiblities to read; ! #X text 512 557 and write from and to files; ! #X text 511 571 (XML and textfiles); ! #X text 248 827 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 208 811 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; #X connect 0 0 32 0; #X connect 7 0 13 0; --- 384,400 ---- #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 474 577 pd read_save_possibilities; ! #X text 512 598 different possiblities to read; ! #X text 512 612 and write from and to files; ! #X text 511 626 (XML and textfiles); ! #X text 242 857 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 202 841 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; + #X text 535 415 at the first outlet; + #X msg 474 401 keys; + #X text 514 401 <- dumps out all keys sequentially; + #X text 549 451 at the first outlet; + #X msg 474 437 values; + #X text 528 437 <- dumps out all values sequentially; #X connect 0 0 32 0; #X connect 7 0 13 0; *************** *** 429,430 **** --- 435,438 ---- #X connect 59 0 13 0; #X connect 68 0 13 0; + #X connect 75 0 13 0; + #X connect 78 0 13 0; Index: help-h_vector.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_vector.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_vector.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_vector.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 9,19 **** #X text 40 98 init arg: namespace; #X msg 480 313 print; ! #X msg 480 357 clear; ! #X msg 480 671 help; ! #X obj 566 721 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 480 254 getnamespace; ! #X msg 480 395 clearall; ! #X obj 480 770 print BBB; #X obj 71 443 print AAA; #X text 591 279 <- change namespace; --- 9,19 ---- #X text 40 98 init arg: namespace; #X msg 480 313 print; ! #X msg 480 395 clear; ! #X msg 480 676 help; ! #X obj 566 726 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 480 254 getnamespace; ! #X msg 480 433 clearall; ! #X obj 480 775 print BBB; #X obj 71 443 print AAA; #X text 591 279 <- change namespace; *************** *** 21,29 **** #X text 527 314 <- print all the data of the; #X text 546 329 current namespace; ! #X text 528 357 <- clear all the data of the; ! #X text 549 372 current namespace; ! #X text 548 397 <- clear all the data in all; ! #X text 569 412 same containers (maybe; ! #X text 571 427 you shouldn't use this); #X text 580 256 <- get current namespace; #X text 512 213 general operations:; --- 21,29 ---- #X text 527 314 <- print all the data of the; #X text 546 329 current namespace; ! #X text 528 395 <- clear all the data of the; ! #X text 549 410 current namespace; ! #X text 548 435 <- clear all the data in all; ! #X text 569 450 same containers (maybe; ! #X text 571 465 you shouldn't use this); #X text 580 256 <- get current namespace; #X text 512 213 general operations:; *************** *** 39,51 **** at the end. The number of elements in a vector may vary dynamically. ; ! #X msg 480 608 resize \$1; ! #X msg 480 642 getsize; ! #X floatatom 488 580 5 0 0 0 - - -; ! #X text 556 609 <- resizes the vector; ! #X obj 480 698 h_vector klax; ! #X floatatom 523 741 5 0 0 0 - - -; ! #X text 545 641 <- get the size (at 2nd; ! #X text 567 655 outlet); ! #X text 567 740 <- size of vector; #X obj 71 383 h_vector klax; #X floatatom 114 422 5 0 0 0 - - -; --- 39,51 ---- at the end. The number of elements in a vector may vary dynamically. ; ! #X msg 480 613 resize \$1; ! #X msg 480 647 getsize; ! #X floatatom 488 585 5 0 0 0 - - -; ! #X text 556 614 <- resizes the vector; ! #X obj 480 703 h_vector klax; ! #X floatatom 523 746 5 0 0 0 - - -; ! #X text 545 646 <- get the size (at 2nd; ! #X text 567 660 outlet); ! #X text 567 745 <- size of vector; #X obj 71 383 h_vector klax; #X floatatom 114 422 5 0 0 0 - - -; *************** *** 404,411 **** #X connect 11 0 0 0; #X connect 12 0 0 0; ! #X restore 480 476 pd read_save_possibilities; ! #X text 520 500 different possiblities to read; ! #X text 520 514 and write from and to files; ! #X text 519 529 (XML and textfiles); #X connect 5 0 36 0; #X connect 6 0 36 0; --- 404,414 ---- #X connect 11 0 0 0; #X connect 12 0 0 0; ! #X restore 480 501 pd read_save_possibilities; ! #X text 520 525 different possiblities to read; ! #X text 520 539 and write from and to files; ! #X text 519 554 (XML and textfiles); ! #X msg 480 352 getall; ! #X text 532 352 <- dumps out all data sequentially; ! #X text 553 366 at the first outlet; #X connect 5 0 36 0; #X connect 6 0 36 0; *************** *** 443,444 **** --- 446,448 ---- #X connect 74 0 60 0; #X connect 82 0 36 0; + #X connect 86 0 36 0; Index: help-h_set.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_set.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_set.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_set.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 8,24 **** #X text 37 100 init arg: namespace; #X msg 477 380 print; ! #X msg 477 424 clear; ! #X msg 477 644 help; #X msg 477 321 getnamespace; ! #X msg 477 462 clearall; #X text 588 346 <- change namespace; #X msg 477 345 namespace grix; #X text 524 381 <- print all the data of the; #X text 543 396 current namespace; ! #X text 525 424 <- clear all the data of the; ! #X text 546 439 current namespace; ! #X text 545 464 <- clear all the data in all; ! #X text 566 479 same containers (maybe; ! #X text 568 494 you shouldn't use this); #X text 577 323 <- get current namespace; #X text 476 269 general operations:; --- 8,24 ---- #X text 37 100 init arg: namespace; #X msg 477 380 print; ! #X msg 477 454 clear; ! #X msg 477 674 help; #X msg 477 321 getnamespace; ! #X msg 477 492 clearall; #X text 588 346 <- change namespace; #X msg 477 345 namespace grix; #X text 524 381 <- print all the data of the; #X text 543 396 current namespace; ! #X text 525 454 <- clear all the data of the; ! #X text 546 469 current namespace; ! #X text 545 494 <- clear all the data in all; ! #X text 566 509 same containers (maybe; ! #X text 568 524 you shouldn't use this); #X text 577 323 <- get current namespace; #X text 476 269 general operations:; *************** *** 42,46 **** #X msg 227 695 remove 4 f 3; #X floatatom 84 757 5 0 0 0 - - -; ! #X floatatom 477 698 5 0 0 0 - - -; #X text 291 51 ::: h_set :::; #X text 37 129 Sets allow you to add and delete elements. Afterwards --- 42,46 ---- #X msg 227 695 remove 4 f 3; #X floatatom 84 757 5 0 0 0 - - -; ! #X floatatom 477 728 5 0 0 0 - - -; #X text 291 51 ::: h_set :::; #X text 37 129 Sets allow you to add and delete elements. Afterwards *************** *** 54,62 **** #X obj 84 732 h_set krx; #X text 131 757 <- 1 if the data is set (otherwise 0); ! #X obj 477 675 h_set krx; ! #X obj 535 698 print size; ! #X msg 477 609 getsize; ! #X text 542 608 <- get the size (at 2nd; ! #X text 564 622 outlet); #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; --- 54,62 ---- #X obj 84 732 h_set krx; #X text 131 757 <- 1 if the data is set (otherwise 0); ! #X obj 477 705 h_set krx; ! #X obj 535 728 print size; ! #X msg 477 639 getsize; ! #X text 542 638 <- get the size (at 2nd; ! #X text 564 652 outlet); #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; *************** *** 370,380 **** #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 477 525 pd read_save_possibilities; ! #X text 515 546 different possiblities to read; ! #X text 515 560 and write from and to files; ! #X text 514 574 (XML and textfiles); #X text 283 824 htttp://grh.mur.at/software/pdcontainer.html; #X text 243 808 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; #X connect 0 0 44 0; #X connect 5 0 48 0; --- 370,383 ---- #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 477 555 pd read_save_possibilities; ! #X text 515 576 different possiblities to read; ! #X text 515 590 and write from and to files; ! #X text 514 604 (XML and textfiles); #X text 283 824 htttp://grh.mur.at/software/pdcontainer.html; #X text 243 808 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; + #X msg 477 418 getall; + #X text 529 418 <- dumps out all data sequentially; + #X text 550 432 at the first outlet; #X connect 0 0 44 0; #X connect 5 0 48 0; *************** *** 407,408 **** --- 410,412 ---- #X connect 50 0 7 0; #X connect 58 0 48 0; + #X connect 64 0 48 0; Index: help-h_multimap.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_multimap.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_multimap.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_multimap.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 1,4 **** ! #N canvas 556 0 813 872 10; ! #X msg 82 407 add ge; #X obj 33 24 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 ; --- 1,4 ---- ! #N canvas 556 0 813 845 10; ! #X msg 82 375 add ge; #X obj 33 24 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 ; *************** *** 7,54 **** #X text 295 36 help file of; #X text 40 98 init arg: namespace; ! #X msg 479 373 print; ! #X msg 479 417 clear; ! #X msg 479 655 help; ! #X msg 479 314 getnamespace; ! #X msg 479 455 clearall; ! #X obj 479 708 print BBB; ! #X obj 82 495 print AAA; ! #X text 590 339 <- change namespace; ! #X msg 479 338 namespace grix; ! #X text 526 374 <- print all the data of the; ! #X text 545 389 current namespace; ! #X text 527 417 <- clear all the data of the; ! #X text 548 432 current namespace; ! #X text 547 457 <- clear all the data in all; ! #X text 568 472 same containers (maybe; ! #X text 570 487 you shouldn't use this); ! #X text 579 316 <- get current namespace; ! #X text 478 262 general operations:; ! #X msg 82 381 add bla bal tuff; ! #X msg 82 431 add 4 f 3; ! #X msg 82 356 add \$1; ! #X floatatom 82 318 5 0 0 0 - - -; ! #X symbolatom 129 320 10 0 0 0 - - -; ! #X msg 232 429 list damm 4345 it; ! #X floatatom 232 335 5 0 0 0 - - -; ! #X symbolatom 232 353 10 0 0 0 - - -; ! #X msg 232 405 hacka 45; ! #X msg 232 382 3 4 krschi; ! #X text 110 293 key:; ! #X text 242 304 value:; ! #X obj 79 749 print AAA; ! #X floatatom 79 572 5 0 0 0 - - -; ! #X symbolatom 126 574 10 0 0 0 - - -; ! #X text 136 541 get \, remove data:; ! #X msg 79 610 get \$1; ! #X msg 79 635 get bla bal tuff; ! #X msg 79 661 get ge; ! #X msg 79 685 get 4 f 3; ! #X floatatom 222 576 5 0 0 0 - - -; ! #X symbolatom 269 578 10 0 0 0 - - -; ! #X msg 222 614 remove \$1; ! #X msg 222 639 remove bla bal tuff; ! #X msg 222 665 remove ge; ! #X msg 222 689 remove 4 f 3; #X text 40 131 Multimaps are just like maps except that a key can be associated with several values. Multimap is a Sorted Associative Container --- 7,54 ---- #X text 295 36 help file of; #X text 40 98 init arg: namespace; ! #X msg 479 341 print; ! #X msg 479 455 clear; ! #X msg 479 693 help; ! #X msg 479 282 getnamespace; ! #X msg 479 493 clearall; ! #X obj 479 747 print BBB; ! #X obj 82 463 print AAA; ! #X text 590 307 <- change namespace; ! #X msg 479 306 namespace grix; ! #X text 526 342 <- print all the data of the; ! #X text 545 357 current namespace; ! #X text 527 455 <- clear all the data of the; ! #X text 548 470 current namespace; ! #X text 547 495 <- clear all the data in all; ! #X text 568 510 same containers (maybe; ! #X text 570 525 you shouldn't use this); ! #X text 579 284 <- get current namespace; ! #X text 478 230 general operations:; ! #X msg 82 349 add bla bal tuff; ! #X msg 82 399 add 4 f 3; ! #X msg 82 324 add \$1; ! #X floatatom 82 286 5 0 0 0 - - -; ! #X symbolatom 129 288 10 0 0 0 - - -; ! #X msg 232 397 list damm 4345 it; ! #X floatatom 232 303 5 0 0 0 - - -; ! #X symbolatom 232 321 10 0 0 0 - - -; ! #X msg 232 373 hacka 45; ! #X msg 232 350 3 4 krschi; ! #X text 110 261 key:; ! #X text 242 272 value:; ! #X obj 79 717 print AAA; ! #X floatatom 79 540 5 0 0 0 - - -; ! #X symbolatom 126 542 10 0 0 0 - - -; ! #X text 136 509 get \, remove data:; ! #X msg 79 578 get \$1; ! #X msg 79 603 get bla bal tuff; ! #X msg 79 629 get ge; ! #X msg 79 653 get 4 f 3; ! #X floatatom 222 544 5 0 0 0 - - -; ! #X symbolatom 269 546 10 0 0 0 - - -; ! #X msg 222 582 remove \$1; ! #X msg 222 607 remove bla bal tuff; ! #X msg 222 633 remove ge; ! #X msg 222 657 remove 4 f 3; #X text 40 131 Multimaps are just like maps except that a key can be associated with several values. Multimap is a Sorted Associative Container *************** *** 57,70 **** ; #X text 275 53 ::: h_multimap :::; ! #X obj 82 472 h_multimap dampta; ! #X obj 79 726 h_multimap dampta; ! #X obj 479 686 h_multimap dampta; ! #X floatatom 136 782 5 0 0 0 - - -; ! #X text 111 263 add data to the multimap:; ! #X text 180 783 <- nr of values at the specific key; ! #X msg 479 600 getsize; ! #X text 566 613 outlet); ! #X text 544 599 <- get the size (at 3rd; ! #X obj 593 709 print size; #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; --- 57,70 ---- ; #X text 275 53 ::: h_multimap :::; ! #X obj 82 440 h_multimap dampta; ! #X obj 79 694 h_multimap dampta; ! #X obj 479 724 h_multimap dampta; ! #X floatatom 136 750 5 0 0 0 - - -; ! #X text 111 231 add data to the multimap:; ! #X text 180 751 <- nr of values at the specific key; ! #X msg 479 638 getsize; ! #X text 566 651 outlet); ! #X text 544 637 <- get the size (at 3rd; ! #X obj 593 747 print size; #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; *************** *** 378,388 **** #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 479 515 pd read_save_possibilities; ! #X text 517 536 different possiblities to read; ! #X text 517 550 and write from and to files; ! #X text 516 564 (XML and textfiles); ! #X text 260 835 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 220 819 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; #X connect 0 0 51 0; #X connect 5 0 53 0; --- 378,394 ---- #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 479 553 pd read_save_possibilities; ! #X text 517 574 different possiblities to read; ! #X text 517 588 and write from and to files; ! #X text 516 602 (XML and textfiles); ! #X text 241 815 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 201 799 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; + #X text 540 392 at the first outlet; + #X msg 479 378 keys; + #X text 519 378 <- dumps out all keys sequentially; + #X text 554 428 at the first outlet; + #X msg 479 414 values; + #X text 533 414 <- dumps out all values sequentially; #X connect 0 0 51 0; #X connect 5 0 53 0; *************** *** 421,422 **** --- 427,430 ---- #X connect 57 0 53 0; #X connect 66 0 53 0; + #X connect 73 0 53 0; + #X connect 76 0 53 0; Index: help-h_list.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_list.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_list.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_list.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 1,3 **** ! #N canvas 535 40 834 864 10; #X obj 36 29 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 ; --- 1,3 ---- ! #N canvas 535 40 834 856 10; #X obj 36 29 cnv 15 404 54 empty empty empty 22 25 0 18 -1 -66577 0 ; *************** *** 7,37 **** #X text 39 103 init arg: namespace; #X msg 483 298 print; ! #X msg 483 342 clear; ! #X msg 483 653 help; ! #X obj 604 712 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 483 239 getnamespace; ! #X msg 483 380 clearall; ! #X obj 483 769 print BBB; #X text 594 264 <- change namespace; #X msg 483 263 namespace grix; #X text 530 299 <- print all the data of the; #X text 549 314 current namespace; ! #X text 531 342 <- clear all the data of the; ! #X text 552 357 current namespace; ! #X text 551 382 <- clear all the data in all; ! #X text 572 397 same containers (maybe; ! #X text 574 412 you shouldn't use this); #X text 583 241 <- get current namespace; #X text 514 198 general operations:; ! #X msg 483 561 getsize; ! #X floatatom 523 749 5 0 0 0 - - -; ! #X text 570 574 outlet); #X text 290 58 ::: h_list :::; #X text 40 133 Fast insertion and removal anywhere \, all the other elements move up. But a list provides only sequential access (not via index !). A list is a doubly linked list.; ! #X obj 483 691 h_list simonatbase; ! #X text 604 730 <- size of the list; #X obj 192 721 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; --- 7,37 ---- #X text 39 103 init arg: namespace; #X msg 483 298 print; ! #X msg 483 372 clear; ! #X msg 483 643 help; ! #X obj 604 702 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X msg 483 239 getnamespace; ! #X msg 483 410 clearall; ! #X obj 483 759 print BBB; #X text 594 264 <- change namespace; #X msg 483 263 namespace grix; #X text 530 299 <- print all the data of the; #X text 549 314 current namespace; ! #X text 531 372 <- clear all the data of the; ! #X text 552 387 current namespace; ! #X text 551 412 <- clear all the data in all; ! #X text 572 427 same containers (maybe; ! #X text 574 442 you shouldn't use this); #X text 583 241 <- get current namespace; #X text 514 198 general operations:; ! #X msg 483 568 getsize; ! #X floatatom 523 739 5 0 0 0 - - -; ! #X text 570 581 outlet); #X text 290 58 ::: h_list :::; #X text 40 133 Fast insertion and removal anywhere \, all the other elements move up. But a list provides only sequential access (not via index !). A list is a doubly linked list.; ! #X obj 483 681 h_list simonatbase; ! #X text 604 720 <- size of the list; #X obj 192 721 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; *************** *** 177,188 **** #X restore 134 578 pd special_operations; #X text 217 720 <- bang if not found; ! #X floatatom 563 730 5 0 0 0 - - -; ! #X text 565 750 <- current iterator position; #X floatatom 151 721 5 0 0 0 - - -; #X floatatom 111 721 5 0 0 0 - - -; ! #X msg 483 604 getiter; ! #X text 548 560 <- get the size (at 3nd; ! #X text 574 620 (2nd outlet); ! #X text 553 605 <- get current iterator pos; #X obj 500 28 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; --- 177,188 ---- #X restore 134 578 pd special_operations; #X text 217 720 <- bang if not found; ! #X floatatom 563 720 5 0 0 0 - - -; ! #X text 565 740 <- current iterator position; #X floatatom 151 721 5 0 0 0 - - -; #X floatatom 111 721 5 0 0 0 - - -; ! #X msg 483 600 getiter; ! #X text 548 567 <- get the size (at 3nd; ! #X text 574 616 (2nd outlet); ! #X text 553 601 <- get current iterator pos; #X obj 500 28 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; *************** *** 496,506 **** #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 483 459 pd read_save_possibilities; ! #X text 523 483 different possiblities to read; ! #X text 523 497 and write from and to files; ! #X text 522 512 (XML and textfiles); ! #X text 234 821 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 194 805 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; #X connect 4 0 27 0; #X connect 5 0 27 0; --- 496,509 ---- #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 483 477 pd read_save_possibilities; ! #X text 523 501 different possiblities to read; ! #X text 523 515 and write from and to files; ! #X text 522 530 (XML and textfiles); ! #X text 229 822 htttp://grh.mur.at/software/pdcontainer.html; ! #X text 189 806 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; + #X msg 483 335 getall; + #X text 535 335 <- dumps out all data sequentially; + #X text 556 349 at the first outlet; #X connect 4 0 27 0; #X connect 5 0 27 0; *************** *** 521,522 **** --- 524,526 ---- #X connect 49 0 27 0; #X connect 58 0 27 0; + #X connect 64 0 27 0; Index: help-h_multiset.pd =================================================================== RCS file: /cvsroot/pure-data/externals/grh/PDContainer/help/help-h_multiset.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** help-h_multiset.pd 21 Oct 2005 11:56:32 -0000 1.1 --- help-h_multiset.pd 3 Nov 2005 20:40:40 -0000 1.2 *************** *** 8,24 **** #X text 37 100 init arg: namespace; #X msg 470 377 print; ! #X msg 470 421 clear; ! #X msg 470 642 help; #X msg 470 318 getnamespace; ! #X msg 470 459 clearall; #X text 581 343 <- change namespace; #X msg 470 342 namespace grix; #X text 517 378 <- print all the data of the; #X text 536 393 current namespace; ! #X text 518 421 <- clear all the data of the; ! #X text 539 436 current namespace; ! #X text 538 461 <- clear all the data in all; ! #X text 559 476 same containers (maybe; ! #X text 561 491 you shouldn't use this); #X text 570 320 <- get current namespace; #X text 469 266 general operations:; --- 8,24 ---- #X text 37 100 init arg: namespace; #X msg 470 377 print; ! #X msg 470 456 clear; ! #X msg 470 677 help; #X msg 470 318 getnamespace; ! #X msg 470 494 clearall; #X text 581 343 <- change namespace; #X msg 470 342 namespace grix; #X text 517 378 <- print all the data of the; #X text 536 393 current namespace; ! #X text 518 456 <- clear all the data of the; ! #X text 539 471 current namespace; ! #X text 538 496 <- clear all the data in all; ! #X text 559 511 same containers (maybe; ! #X text 561 526 you shouldn't use this); #X text 570 320 <- get current namespace; #X text 469 266 general operations:; *************** *** 42,51 **** #X msg 227 695 remove 4 f 3; #X floatatom 84 757 5 0 0 0 - - -; ! #X floatatom 470 696 5 0 0 0 - - -; #X floatatom 154 477 5 0 0 0 - - -; #X text 275 52 ::: h_multiset :::; #X obj 154 453 h_multiset \$0-pscht; #X obj 84 731 h_multiset \$0-pscht; ! #X obj 470 673 h_multiset \$0-pscht; #X text 131 757 <- the number how often the data is set; #X text 37 137 Multisets are just like sets \, except that you can --- 42,51 ---- #X msg 227 695 remove 4 f 3; #X floatatom 84 757 5 0 0 0 - - -; ! #X floatatom 470 731 5 0 0 0 - - -; #X floatatom 154 477 5 0 0 0 - - -; #X text 275 52 ::: h_multiset :::; #X obj 154 453 h_multiset \$0-pscht; #X obj 84 731 h_multiset \$0-pscht; ! #X obj 470 708 h_multiset \$0-pscht; #X text 131 757 <- the number how often the data is set; #X text 37 137 Multisets are just like sets \, except that you can *************** *** 54,61 **** or more elements may be identical. (see also Set); #X text 140 268 add data to the multiset:; ! #X msg 470 605 getsize; ! #X text 535 604 <- get the size (at 2nd; ! #X text 557 618 outlet); ! #X obj 598 695 print size; #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; --- 54,61 ---- or more elements may be identical. (see also Set); #X text 140 268 add data to the multiset:; ! #X msg 470 640 getsize; ! #X text 535 639 <- get the size (at 2nd; ! #X text 557 653 outlet); ! #X obj 598 730 print size; #X obj 500 24 cnv 15 204 120 empty empty empty 20 12 0 14 -66577 -66577 0; *************** *** 369,379 **** #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 470 524 pd read_save_possibilities; ! #X text 508 545 different possiblities to read; ! #X text 508 559 and write from and to files; ! #X text 507 573 (XML and textfiles); #X text 244 827 htttp://grh.mur.at/software/pdcontainer.html; #X text 204 811 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; #X connect 0 0 43 0; #X connect 5 0 45 0; --- 369,382 ---- #X connect 7 0 0 0; #X connect 8 0 0 0; ! #X restore 470 559 pd read_save_possibilities; ! #X text 508 580 different possiblities to read; ! #X text 508 594 and write from and to files; ! #X text 507 608 (XML and textfiles); #X text 244 827 htttp://grh.mur.at/software/pdcontainer.html; #X text 204 811 =%)!(%= PDContainer \, by Georg Holzmann <grh(a)mur.at> \, 2004; + #X msg 470 416 getall; + #X text 522 416 <- dumps out all data sequentially; + #X text 543 430 at the first outlet; #X connect 0 0 43 0; #X connect 5 0 45 0; *************** *** 406,407 **** --- 409,411 ---- #X connect 49 0 45 0; #X connect 58 0 45 0; + #X connect 64 0 45 0;

1 0

← Newer
1
...
43
44
45
46
47
48
49
50
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 November 2005