[Pkg] The Trunk: Sound-nice.24.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Oct 1 21:39:27 UTC 2010
Nicolas Cellier uploaded a new version of Sound to project The Trunk:
http://source.squeak.org/trunk/Sound-nice.24.mcz
==================== Summary ====================
Name: Sound-nice.24
Author: nice
Time: 1 October 2010, 11:39:06.786 pm
UUID: 120ac11e-6f0a-4161-976c-a1e0f2e82025
Ancestors: Sound-nice.23
1) use #postCopy paradigm
2) _ -> :=
=============== Diff against Sound-nice.23 ===============
Item was removed:
- ----- Method: AbstractSound>>copy (in category 'copying') -----
- copy
- "A sound should copy all of the state needed to play itself, allowing two copies of a sound to play at the same time. These semantics require a recursive copy but only down to the level of immutable data. For example, a SampledSound need not copy its sample buffer. Subclasses overriding this method should include a resend to super."
-
- ^ self clone copyEnvelopes
- !
Item was added:
+ ----- Method: AbstractSound>>postCopy (in category 'copying') -----
+ postCopy
+ "A sound should copy all of the state needed to play itself, allowing two copies of a sound to play at the same time. These semantics require a recursive copy but only down to the level of immutable data. For example, a SampledSound need not copy its sample buffer. Subclasses overriding this method should include a resend to super."
+
+ super postCopy.
+ self copyEnvelopes
+ !
Item was removed:
- ----- Method: MixedSound>>copy (in category 'copying') -----
- copy
- "Copy my component sounds."
-
- ^ super copy copySounds
- !
Item was added:
+ ----- Method: MixedSound>>postCopy (in category 'copying') -----
+ postCopy
+ "Copy my component sounds."
+
+ super postCopy.
+ self copySounds
+ !
Item was removed:
- ----- Method: PluckedSound>>copy (in category 'copying') -----
- copy
-
- ^ super copy copyRing
- !
Item was added:
+ ----- Method: PluckedSound>>postCopy (in category 'copying') -----
+ postCopy
+
+ super postCopy.
+ self copyRing
+ !
Item was removed:
- ----- Method: RepeatingSound>>copy (in category 'copying') -----
- copy
- "Copy my component sound."
-
- ^ super copy copySound
- !
Item was added:
+ ----- Method: RepeatingSound>>postCopy (in category 'copying') -----
+ postCopy
+ "Copy my component sound."
+
+ super postCopy.
+ self copySound
+ !
Item was removed:
- ----- Method: ReverbSound>>copy (in category 'copying') -----
- copy
- "Copy my component sound."
-
- ^ super copy copySound
- !
Item was added:
+ ----- Method: ReverbSound>>postCopy (in category 'copying') -----
+ postCopy
+ "Copy my component sound."
+
+ super postCopy.
+ self copySound
+ !
Item was removed:
- ----- Method: ScorePlayer>>copy (in category 'copying') -----
- copy
- "Copy my component sounds."
-
- ^ super copy copySounds
- !
Item was added:
+ ----- Method: ScorePlayer>>postCopy (in category 'copying') -----
+ postCopy
+ "Copy my component sounds."
+
+ super postCopy.
+ self copySounds
+ !
Item was removed:
- ----- Method: SequentialSound>>copy (in category 'copying') -----
- copy
- "Copy my component sounds."
-
- ^ super copy copySounds
- !
Item was added:
+ ----- Method: SequentialSound>>postCopy (in category 'copying') -----
+ postCopy
+ "Copy my component sounds."
+
+ super postCopy.
+ self copySounds
+ !
Item was changed:
----- Method: SimpleMIDIPort class>>inputPortNumFromUser (in category 'utilities') -----
inputPortNumFromUser
"Prompt the user for a MIDI input port. Answer a port number, or nil if the user does not select a port or if MIDI is not supported on this platform."
"SimpleMIDIPort inputPortNumFromUser"
| portCount dir portList |
+ portCount := self primPortCount.
- portCount _ self primPortCount.
portCount = 0 ifTrue: [^ nil].
portList := OrderedCollection new.
0 to: portCount - 1 do:[:i |
dir := self primPortDirectionalityOf: i.
(dir = 1) | (dir = 3) ifTrue:[portList add: i]].
^UIManager default
chooseFrom: (portList collect:[:i| self portDescription: i])
values: portList
title: 'MIDI port for input:' translated
!
More information about the Packages
mailing list