Squeak-dev February 2013

squeak-dev@lists.squeakfoundation.org

61 participants
225 discussions

[ANN] Minecraft Bindings
by Bert Freudenberg 13 Mar '13

13 Mar '13

I'm happy to announce my Smalltalk bindings for "Minecraft: Pi Edition": Find out more at http://croquetweak.blogspot.com/2013/02/smalltalk-bindings-for-minecraft-pi… - Bert -

9 44

Running process after image save/stop/restart
by Louis LaBrunda 05 Mar '13

05 Mar '13

If a process is running when an image is saved, is the process stopped at any point in particular? If the saved image is started, is there any way the process can tell? I'm running a process that keeps running for a look time. It loops with a delay and in the loop gets the date and time. If the date and time were obtained just before the save, they would be old at the time of the image restart and need to be refreshed. Lou ----------------------------------------------------------- Louis LaBrunda Keystone Software Corp. SkypeMe callto://PhotonDemon mailto:Lou@Keystone-Software.com http://www.Keystone-Software.com

4 14

How to call irsend
by Louis LaBrunda 05 Mar '13

05 Mar '13

Hi Guys, I would like to call irsend (a program that is part of lirc package) from Squeak on the Raspberry Pi. Can anyone please post some sample code. Lou ----------------------------------------------------------- Louis LaBrunda Keystone Software Corp. SkypeMe callto://PhotonDemon mailto:Lou@Keystone-Software.com http://www.Keystone-Software.com

4 31

reading an writing of wav audio files
by Herbert König 04 Mar '13

04 Mar '13

Hi, has anyone extended Squeaks methods for reading and writing wav files so they can handle 24 bit integer and 32 bit float audio samples? I'm aware of AbstractSound's capabilities re wav files. Thanks, Herbert

3 4

Reusable browsers was Re: About HyperCard
by David Corking 03 Mar '13

03 Mar '13

Frank Shearar wrote: > What does "reusable" mean here? If you mean that navigating to > something doesn't spawn a whole new window, then we _sometimes_ have > reusable browsers. For instance, in a Browser, selecting a class name > and pressing <alt>-<shift>-b will, within the same Browser, jump to > the new class. Yes - I mean "don't spawn a new window". I wasn't aware of that hotkey. Other nice features of the message list in Moshi are forward and back buttons, a browseable history, and a 'reusable' toggle button, to make it spawn a new message list without learning a hot key. (It is the forward and back buttons I recognise from Newspeak and Amber.) Thanks Herbert and Frank for explaining how to uncover the features for class and message implementor. Herbert wrote: > to get this behaviour the Preference "trace messages" needs to be > enabled. checking... Right now this only works for implementors, I set the preference and still get a new message list for each implementor I select (trunk 4.5 #12400) when I click the implementors button - but the list _is_ reused on cmd-m. A win for the keyboard. Thanks again. Have fun! David

9 19

problem with Omnibrowser and Refactoring engine
by Raymond Asselin 02 Mar '13

02 Mar '13

I just loaded OmniBrowser with Refactoring engine from the menu Help-> Extending the system Everything seems o.k. for the loading and installing But when I tried to change the name of the Class (in the Class template of Omnibrowser) I had an error style "Undefined object >> mustBeBooleanIn: This error does not appear if we don't load Omnibrowser and Refactoring engine. On OSX 10.7.5, keyboard: français-canada Cog vm of 2013-01-13 ==== SqueakDebug.log ==== NonBooleanReceiver: proceed for truth. 25 January 2013 1:47:25.557 pm VM: Mac OS - Smalltalk Image: Squeak4.4 [latest update: #12327] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /Users/ray1/Documents/PROGRAMMATION/Squeak4.4-12327 Trusted Dir /foobar/tooBar/forSqueak/bogus/ Untrusted Dir /Users/ray1/Library/Preferences/Croquet/Internet/Untrusted UndefinedObject(Object)>>mustBeBooleanIn: Receiver: nil Arguments and temporary variables: context: OBDefinitionPanel>>createCompletionController proceedValue: nil Receiver's instance variables: nil UndefinedObject(Object)>>mustBeBoolean Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil OBDefinitionPanel>>createCompletionController Receiver: an OBDefinitionPanel Arguments and temporary variables: Receiver's instance variables: browser: an OBSystemBrowser definition: an OBClassDefinition selection: (1 to: 0) OBDefinitionPanel(OBTextPanel)>>initializeCompletionController Receiver: an OBDefinitionPanel Arguments and temporary variables: controller: nil Receiver's instance variables: browser: an OBSystemBrowser definition: an OBClassDefinition selection: (1 to: 0) OBDefinitionPanel>>completionController Receiver: an OBDefinitionPanel Arguments and temporary variables: controller: nil Receiver's instance variables: browser: an OBSystemBrowser definition: an OBClassDefinition selection: (1 to: 0) ECToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ECToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(1373) evt: [keystroke 'C'] completionAllowed: true editor: an OBTextMorphEditorWithShout stringHolder: an OBDefinitionPanel Receiver's instance variables: superclass: StandardToolSet methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified') subclasses: nil name: #ECToolSet classPool: nil sharedPools: nil environment: Smalltalk globals "a SystemDictionary with lots of globals" category: #'Ocompletion-ECSqueak' ToolSet class>>codeCompletionAround:textMorph:keyStroke: Receiver: ToolSet Arguments and temporary variables: aBlock: [closure] in OBTextMorphWithShout(TextMorph)>>keyStroke: aTextMorph: an OBTextMorphWithShout(1373) evt: [keystroke 'C'] Receiver's instance variables: superclass: AppRegistry methodDict: a MethodDictionary() format: 2 instanceVariables: nil organization: ('as yet unclassified') subclasses: nil name: #ToolSet classPool: nil sharedPools: nil environment: Smalltalk globals "a SystemDictionary with lots of globals" category: #'System-Applications' registeredClasses: an OrderedCollection(StandardToolSet ECToolSet) default: ECToolSet OBTextMorphWithShout(TextMorph)>>keyStroke: Receiver: an OBTextMorphWithShout(1373) Arguments and temporary variables: evt: [keystroke 'C'] Receiver's instance variables: bounds: 0@0 corner: 569@82 owner: a TransformMorph(2856) submorphs: #() fullBounds: 0@0 corner: 569@82 color: Color black extension: a MorphExtension (1654) [other: (blinkStart -> 898669)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Object subclass: #NameOfSubclass instanceVariableNames: ''''...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(2236) acceptOnCR: false OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: Receiver: an OBTextMorphWithShout(1373) Arguments and temporary variables: evt: [keystroke 'C'] view: an OBPluggableTextMorphWithShout(2236) Receiver's instance variables: bounds: 0@0 corner: 569@82 owner: a TransformMorph(2856) submorphs: #() fullBounds: 0@0 corner: 569@82 color: Color black extension: a MorphExtension (1654) [other: (blinkStart -> 898669)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Object subclass: #NameOfSubclass instanceVariableNames: ''''...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(2236) acceptOnCR: false OBTextMorphWithShout(TextMorph)>>handleKeystroke: Receiver: an OBTextMorphWithShout(1373) Arguments and temporary variables: anEvent: [keystroke 'C'] pasteUp: nil Receiver's instance variables: bounds: 0@0 corner: 569@82 owner: a TransformMorph(2856) submorphs: #() fullBounds: 0@0 corner: 569@82 color: Color black extension: a MorphExtension (1654) [other: (blinkStart -> 898669)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Object subclass: #NameOfSubclass instanceVariableNames: ''''...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(2236) acceptOnCR: false KeyboardEvent>>sentTo: Receiver: [keystroke 'C'] Arguments and temporary variables: anObject: an OBTextMorphWithShout(1373) Receiver's instance variables: timeStamp: 898169 source: a HandMorph(3216) type: #keystroke buttons: 8 position: 17@13 handler: nil wasHandled: true keyValue: 67 OBTextMorphWithShout(Morph)>>handleEvent: Receiver: an OBTextMorphWithShout(1373) Arguments and temporary variables: anEvent: [keystroke 'C'] Receiver's instance variables: bounds: 0@0 corner: 569@82 owner: a TransformMorph(2856) submorphs: #() fullBounds: 0@0 corner: 569@82 color: Color black extension: a MorphExtension (1654) [other: (blinkStart -> 898669)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Object subclass: #NameOfSubclass instanceVariableNames: ''''...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(2236) acceptOnCR: false OBTextMorphWithShout(Morph)>>handleFocusEvent: Receiver: an OBTextMorphWithShout(1373) Arguments and temporary variables: anEvent: [keystroke 'C'] Receiver's instance variables: bounds: 0@0 corner: 569@82 owner: a TransformMorph(2856) submorphs: #() fullBounds: 0@0 corner: 569@82 color: Color black extension: a MorphExtension (1654) [other: (blinkStart -> 898669)] borderWidth: 0 borderColor: Color black textStyle: a TextStyle Bitmap DejaVu Sans 9 text: a Text for 'Object subclass: #NameOfSubclass instanceVariableNames: ''''...etc... wrapFlag: true paragraph: a MultiNewParagraph editor: an OBTextMorphEditorWithShout container: nil predecessor: nil successor: nil backgroundColor: nil margins: nil editHistory: nil editView: an OBPluggableTextMorphWithShout(2236) acceptOnCR: false [] in HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: <<error during printing> Receiver's instance variables: bounds: 747@431 corner: 763@447 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 747@431 corner: 763@447 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: an OBTextMorphWithShout(1373) eventListeners: nil mouseListeners: nil keyboardListeners: a WeakArray(a DockingBarMorph(3368)) mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [747@431 747@431 mouseMove SHIFT 898004] targetOffset: 17@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 898004 747 431 0 1 0 1) genieGestureProcessor: nil keyboardInterpreter: a MacUnicodeInputInterpreter BlockClosure>>on:do: Receiver: [closure] in HandMorph>>sendFocusEvent:to:clear: Arguments and temporary variables: exception: Error handlerAction: [closure] in PasteUpMorph>>becomeActiveDuring: handlerActive: false Receiver's instance variables: outerContext: HandMorph>>sendFocusEvent:to:clear: startpc: 63 numArgs: 0 PasteUpMorph>>becomeActiveDuring: Receiver: a PasteUpMorph(1622) [world] Arguments and temporary variables: aBlock: [closure] in HandMorph>>sendFocusEvent:to:clear: priorWorld: a PasteUpMorph(1622) [world] priorHand: a HandMorph(3216) priorEvent: nil Receiver's instance variables: bounds: 0@0 corner: 1600@952 owner: nil submorphs: {a SystemWindow(418) . a DockingBarMorph(3368) . a PluggableSystemWi...etc... fullBounds: 0@0 corner: 1600@952 color: an InfiniteForm extension: a MorphExtension (2543) [eventHandler = an EventHandler] [other: (...etc... borderWidth: 0 borderColor: (Color r: 0.515 g: 0.181 b: 0.263) presenter: an EtoysPresenter (2627) model: a MorphicModel(3376) cursor: 1 padding: 3 backgroundMorph: nil turtleTrailsForm: nil turtlePen: nil lastTurtlePositions: nil isPartsBin: nil indicateCursor: nil wantsMouseOverHalos: nil worldState: a WorldState griddingOn: nil HandMorph>>sendFocusEvent:to:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [keystroke 'C'] focusHolder: an OBTextMorphWithShout(1373) aBlock: [closure] in HandMorph>>sendKeyboardEvent: w: a PasteUpMorph(1622) [world] result: #(nil) Receiver's instance variables: bounds: 747@431 corner: 763@447 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 747@431 corner: 763@447 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: an OBTextMorphWithShout(1373) eventListeners: nil mouseListeners: nil keyboardListeners: a WeakArray(a DockingBarMorph(3368)) mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [747@431 747@431 mouseMove SHIFT 898004] targetOffset: 17@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 898004 747 431 0 1 0 1) genieGestureProcessor: nil keyboardInterpreter: a MacUnicodeInputInterpreter HandMorph>>sendEvent:focus:clear: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [keystroke 'C'] focusHolder: an OBTextMorphWithShout(1373) aBlock: [closure] in HandMorph>>sendKeyboardEvent: result: nil Receiver's instance variables: bounds: 747@431 corner: 763@447 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 747@431 corner: 763@447 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: an OBTextMorphWithShout(1373) eventListeners: nil mouseListeners: nil keyboardListeners: a WeakArray(a DockingBarMorph(3368)) mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [747@431 747@431 mouseMove SHIFT 898004] targetOffset: 17@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 898004 747 431 0 1 0 1) genieGestureProcessor: nil keyboardInterpreter: a MacUnicodeInputInterpreter HandMorph>>sendKeyboardEvent: Receiver: a HandMorph(3216) Arguments and temporary variables: anEvent: [keystroke 'C'] Receiver's instance variables: bounds: 747@431 corner: 763@447 owner: a PasteUpMorph(1622) [world] submorphs: #() fullBounds: 747@431 corner: 763@447 color: Color blue extension: a MorphExtension (539) [eventHandler = an EventHandler] mouseFocus: nil keyboardFocus: an OBTextMorphWithShout(1373) eventListeners: nil mouseListeners: nil keyboardListeners: a WeakArray(a DockingBarMorph(3368)) mouseClickState: nil mouseOverHandler: a MouseOverHandler lastMouseEvent: [747@431 747@431 mouseMove SHIFT 898004] targetOffset: 17@13 damageRecorder: a DamageRecorder cacheCanvas: nil cachedCanvasHasHoles: true temporaryCursor: nil temporaryCursorOffset: nil hardwareCursor: nil hasChanged: true savedPatch: nil userInitials: '' lastEventBuffer: #(1 898004 747 431 0 1 0 1) genieGestureProcessor: nil keyboardInterpreter: a MacUnicodeInputInterpreter --- The full stack --- UndefinedObject(Object)>>mustBeBooleanIn: UndefinedObject(Object)>>mustBeBoolean OBDefinitionPanel>>createCompletionController OBDefinitionPanel(OBTextPanel)>>initializeCompletionController OBDefinitionPanel>>completionController ECToolSet class>>codeCompletionAround:textMorph:keyStroke: ToolSet class>>codeCompletionAround:textMorph:keyStroke: OBTextMorphWithShout(TextMorph)>>keyStroke: OBTextMorphWithShout(TextMorphForEditView)>>keyStroke: OBTextMorphWithShout(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: OBTextMorphWithShout(Morph)>>handleEvent: OBTextMorphWithShout(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess [] in BlockClosure>>newProcess

6 12

Metacello and Squeak4.4
by Dale Henrichs 01 Mar '13

01 Mar '13

I have a small 3 class package (Metacello-Base[1]) that I would hope could be included in the Squeak4.4 release. Of the 3 classes, the Metacello class is a stub class for the Metacello Scripting Api[2], that will bootstrap Metacello _if_ you use the scripting api. I am promoting the scripting api as the cross platform way to use Metacello. Instead of seeing install scripts fly by that look like this: Gofer new package: 'ConfigurationOfSeaside30'; squeaksource: 'MetacelloRepository'; load. ((Smalltalk at: #ConfigurationOfSeaside30) version: #stable) load. (with the caveat that Installer should be used for Squeak)...the install scripts will look like this: Metacello new configuration: 'Seaside30'; version: #stable; squeaksource: 'MetacelloRepository'; load. The same script will "do the right thing" on all three supported platforms (Squeak, Pharo, GemStone), presuming that the class Metacello is present in the base images:) I've recently released a preview version[4] and am actively collecting feedback. I would think that I can finalize the visible portion of the scripting api by September... I've been ensuring that the metacello preview release is functional on Squeak all along and I am currently running CI builds against Squeak4.3 using travis ci[5]. Moving forward I would add Squeak4.4 to the list of platforms for CI and publish updates to the Metacello-Base pacakge as needed. The class comments for each of the classes provides basic documentation for using Metacello so I think that Metacello-Base is a clean and small presence for Metacello and will enable the use of "cross-platform install scripts for Metacello." Thanks, Dale [1] http://seaside.gemstone.com/ss/metacello/Metacello-Base-dkh.96.mcz [2] https://github.com/dalehenrich/metacello-work/blob/master/docs/MetacelloUse… [4] http://forum.world.st/Metacello-Preview-release-1-0-beta-32-2-tt4642064.html [5] http://travis-ci.org/#!/dalehenrich/metacello-work/builds/2012331

9 36

Logocraft (was Re: [squeak-dev] 3D points?)
by Casey Ransberger 01 Mar '13

01 Mar '13

Vector3D is totally it. I knew I'd seen it x@y@z somewhere, which was in OpenQWAQ now that I think about it. Is there a canonical MC repository for this code, or should I grab an Cobalt image and start filing stuff out? Eeep! I'm a step closer to Logo in Minecraft :D I did the simplest thing that would work, which is something like... turtle penDown; turn: #west; go: 5; turn: #up; go: 1; turn: #east; go: 5 This is actually good enough to make procedurally generating relatively complex builds (e.g., a CPU) much less painful that even a map editor, but it doesn't feel like Logo at all. I haven't used Logo since childhood, but IIRC one would turn by degrees and these would be mapped onto pixel space. I *think* this is why I'm wanting a 3D Point, so I can map 3D points onto voxel space without reinventing the third dimension from scratch. This was a fun problem to think about: I tried to get #left and #right as valid params to the turn method, but wait! What does #left mean when the turtle is currently traveling up? Which has me now thinking in terms of roll/yaw/pitch. It's weird to think about. I'm having a blast though. Thanks for doing the bindings, Bert! On Wed, Feb 27, 2013 at 1:51 AM, Bert Freudenberg <bert(a)freudenbergs.de>wrote: > On 27.02.2013, at 10:45, Bert Freudenberg <bert(a)freudenbergs.de> wrote: > > On 27.02.2013, at 05:54, Casey Ransberger <casey.obrien.r(a)gmail.com> > wrote: > > Is there a stand alone package that provides Point>>@ in Squeak? E.g., x@y > @z. > > > Balloon3D-Math from > > http://www.squeaksource.com/*Balloon3D*/ > > - Bert - > > > Ah, but Ron is right, using the one from Croquet would be better. > > - Bert - > > > > -- Casey Ransberger

5 5

Logocraft (was Re: [squeak-dev] 3D points?)
by David Faught 28 Feb '13

28 Feb '13

Karl Ramberg wrote: > Turtlegraphics made for 3d > http://map.squeak.org/accountbyid/114bcd19-24bd-46df-8025-dc63f037d6bd/file… There is also a video that shows MockTurtle in action, along with some other things, at http://youtu.be/l1gZBrsgAw0 MockTurtle was complicated by the fact that the scripting ran inside the replicated island of Croquet but allowed editing from outside. A simple single user 3D environment would be much easier to deal with. On Thu, Feb 28, 2013 at 2:04 AM, Casey Ransberger wrote: >>* Vector3D is totally it. I knew I'd seen it x at y <http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/squeak-dev>@z somewhere, which was in*>>* OpenQWAQ now that I think about it.*>>**>>* Is there a canonical MC repository for this code, or should I grab an*>>* Cobalt image and start filing stuff out?* I would think that OpenQwaq would provide a cleaner more solid base than Cobalt, although I haven't tried to develop anything with either one. Cheers, Dave

2 1

Daily Commit Log
by commits＠source.squeak.org 28 Feb '13

28 Feb '13

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2013-February/005737.h… Name: ReleaseBuilder-fbs.93 Ancestors: ReleaseBuilder-fbs.92 Load into the release image those packages that have been stripped from Trunk, but still deemed necessary for a release artifact. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2013-February/005738.h… Name: Morphic-fbs.642 Ancestors: Morphic-nice.641 Remove typo method. #handleRightStroke: is clearly the correct name. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2013-February/005739.h… Name: ToolBuilder-Morphic-fbs.88 Ancestors: ToolBuilder-Morphic-cwp.87 Allow finding classes by specifying patterns - 'MC*Test' finds all Monticello test cases, for instance. This commit favours implementation clarity over efficiency. Part of http://bugs.squeak.org/view.php?id=7745. =============================================

1 0

Jump to page: