Squeak-dev October 2010

squeak-dev@lists.squeakfoundation.org

79 participants
264 discussions

Re: [squeak-dev] The Inbox: Tests-bp.99.mcz
by Bernhard Pieber 01 Nov '10

01 Nov '10

I just found out that doing MCWorkingCopy flushObsoletePackageInfos breaks the PackageDependencyTest. This fixes the test. It should only be loaded after the flushing, because without the flushing it breaks the test. :-/ The reason is that PackageInfos can overlap. There is an obsolete PackageInfo named 'PackageInfo' and a PackageInfo named 'PackageInfo-Base' Monticello knows about. The method PackageOrganizer>>packageOfClass:ifNone: does not deal with this potential overlapping. It just answers the obsolete one because it comes first in its list of packages. IMO the overlapping should be regarded as an error because it will probably lead to a lot of unintended side effects. Does anyone know a good reason for allowing overlapping PackageInfos? Cheers, Bernhard Am 31.10.2010 um 17:51 schrieb commits(a)source.squeak.org: > A new version of Tests was added to project The Inbox: > http://source.squeak.org/inbox/Tests-bp.99.mcz > > ==================== Summary ==================== > > Name: Tests-bp.99 > Author: bp > Time: 31 October 2010, 6:44:26.559 pm > UUID: d573b35d-7413-43c2-96f7-1c47d39d8f27 > Ancestors: Tests-ul.98 > > Fix dependencies on obsolete PackageInfos. > > =============== Diff against Tests-ul.98 =============== > > Item was changed: > ----- Method: PackageDependencyTest>>testMonticello (in category 'tests') ----- > testMonticello > self testPackage: 'Monticello' dependsExactlyOn: #( > Collections > Compiler > Compression > Exceptions > Files > Graphics > Kernel > Morphic > Network > + 'PackageInfo-Base' > - PackageInfo > System > Tests > 'ToolBuilder-Kernel' > 'ToolBuilder-Morphic' > Tools > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testMorphic (in category 'tests') ----- > testMorphic > self testPackage: 'Morphic' dependsExactlyOn: #( > Balloon > Collections > Compiler > EToys > Exceptions > Files > Graphics > Kernel > Monticello > MonticelloConfigurations > - 'Morphic-TrueType' "????" > MorphicExtras > Multilingual > Network > ST80 > Sound > System > 'ToolBuilder-Kernel' > 'ToolBuilder-Morphic' > Tools > TrueType > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testSUnitGUI (in category 'tests') ----- > testSUnitGUI > self testPackage: 'SUnitGUI' dependsExactlyOn: #( > Collections > Graphics > Kernel > + 'PackageInfo-Base' > - PackageInfo > SUnit > System > 'ToolBuilder-Kernel' > Tools > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testServices (in category 'tests') ----- > testServices > self testPackage: 'Services-Base' dependsExactlyOn: #( > Collections > Compiler > Exceptions > Graphics > Kernel > Morphic > + 'PackageInfo-Base' > - PackageInfo > PreferenceBrowser > System > 'ToolBuilder-Kernel' > Tools > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testSystem (in category 'tests') ----- > testSystem > self testPackage: 'System' dependsExactlyOn: #( > Collections > Balloon > Compiler > Compression > Exceptions > Files > Graphics > Kernel > Monticello > MonticelloConfigurations > Morphic > MorphicExtras > Multilingual > Network > + 'PackageInfo-Base' > - PackageInfo > Sound > 'ToolBuilder-Kernel' > Tools > TrueType > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testToolBuilderMVC (in category 'tests') ----- > testToolBuilderMVC > self testPackage: 'ToolBuilder-MVC' dependsExactlyOn: #( > Collections > Exceptions > Graphics > ST80 > - ToolBuilder > 'ToolBuilder-Kernel' > Tools > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testToolBuilderSUnit (in category 'tests') ----- > testToolBuilderSUnit > self testPackage: 'ToolBuilder-SUnit' dependsExactlyOn: #( > Collections > Kernel > - ToolBuilder > 'ToolBuilder-Kernel' > ).! > > Item was changed: > ----- Method: PackageDependencyTest>>testTools (in category 'tests') ----- > testTools > self testPackage: 'Tools' dependsExactlyOn: #( > Collections > Compiler > Compression > Exceptions > Files > Graphics > Kernel > Morphic > MorphicExtras > Multilingual > Network > + 'PackageInfo-Base' > - PackageInfo > ST80 > System > 'ToolBuilder-Kernel' > ).! > >

3 3

Daily Commit Log
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2010-October/003866.ht… Name: KernelTests-nice.167 Ancestors: KernelTests-nice.166 Assert that #degreeCos and #degreeSin are exact for any multiple of 90. This is a nice property to have that radianCos and radianSin cannot afford due to approximate floating point representation of pi. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003867.ht… Name: Kernel-nice.510 Ancestors: Kernel-ul.509 Provide an implementation of #degreeCos and #degreeSin such that results are exact for any multiple of 90. Care is also taken to evaluate the sine between -90° and 90°, this will avoid #degreesToRadians and i386 FPU sine fonction to accumulate round off errors due to approximate representation of pi. We can thus evaluate 240 degreeCos with at most 1 ulp error. It's not perfect, but better than previous implementation. For cosine, we know that: cosd(x)=cosd(abs(x)) cosd(x)=sind(90-x) thus the trick is to evaluate: cosd(x)=sind(90-abs(x)) after appropriate modulo in [-180,180[ This way, we are sure to evaluate the sine between -90° and 90° The #degreesToRadians and #sin are used rather than #degreeSin to avoid cycles. For sine, it would be necessary to evaluate either sind(x) if abs(x) <=90 or sind(180-x) if abs(x) >= 90 A possible implementation would be: | x | x := 90 + self \\ 360 - 90. x >= 180 ifTrue: [x := 180 - x]. ^x degreesToRadians sin We prefer evaluating cosd(90-x) thus providing a branch free implementation. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003868.ht… Name: Collections-ul.398 Ancestors: Collections-ar.397 - restore the behavior of the old finalization scheme ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-October/003869.ht… Name: Collections-ul.399 Ancestors: Collections-ul.398 - added a postscript to apply the changes =============================================

1 0

The Trunk: Collections-ul.399.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

Levente Uzonyi uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-ul.399.mcz ==================== Summary ==================== Name: Collections-ul.399 Author: ul Time: 31 October 2010, 11:36:48.538 pm UUID: d9152061-bf6c-eb4a-8a87-4a9bef73ea7e Ancestors: Collections-ul.398 - added a postscript to apply the changes =============== Diff against Collections-ul.398 =============== Item was changed: + (PackageInfo named: 'Collections') postscript: 'WeakRegistry allInstancesDo: [ :each | each installFinalizer ]'! - (PackageInfo named: 'Collections') postscript: 'WeakFinalizationRegistry migrateOldRegistries'!

1 0

The Trunk: Collections-ul.398.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

Levente Uzonyi uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-ul.398.mcz ==================== Summary ==================== Name: Collections-ul.398 Author: ul Time: 31 October 2010, 10:06:44.386 pm UUID: a696b0b6-1bd2-dc45-9606-33aebcfdc74c Ancestors: Collections-ar.397 - restore the behavior of the old finalization scheme =============== Diff against Collections-ar.397 =============== Item was changed: Collection subclass: #WeakRegistry + instanceVariableNames: 'list valueDictionary sema executors' - instanceVariableNames: 'list valueDictionary sema' classVariableNames: 'Default' poolDictionaries: '' category: 'Collections-Weak'! !WeakRegistry commentStamp: 'ul 9/26/2010 02:51' prior: 0! I am a registry for objects needing finalization. When an object is added the object as well as its executor is stored. When the object is garbage collected, the executor can take the appropriate action for any resources associated with the object. This kind of WeakRegistry is using a new VM feature, which allows a more robust finalization support. In contrast to the old implementation, it doesn't spend linear time checking which elements became garbage. See also: Object executor Object actAsExecutor Object finalize! Item was changed: ----- Method: WeakRegistry>>finalizeValues (in category 'finalization') ----- finalizeValues "Finalize any values, which happen to stocked in our list, due to some weak references become garbage" | finalizer | - WeakFinalizationList hasNewFinalization ifFalse: [ + self protected: [ + valueDictionary finalizeValues. + finalizer := executors. + executors := nil ]. + finalizer ifNotNil: [ + finalizer do: [ :each | each finalizeValues ] ]. - self protected: [ valueDictionary finalizeValues ]. ^ self ]. + finalizer := self protected: [ list swapWithNil ]. - self protected: [ finalizer := list swapWithNil ]. "We don't need to protect a following loop from concurrent access, because at the moment we're finalizing values, only we can access this list of finalizers, because valueDictionary already see them as an unused slots, because they're associated with key == nil" [ finalizer notNil ] whileTrue: [ | next | next := finalizer next. finalizer finalizeValues. + finalizer := next ]. - finalizer := next - ]. ! Item was changed: ----- Method: WeakRegistry>>installFinalizer (in category 'initialize-release') ----- installFinalizer + valueDictionary finalizer: [ :executor | + WeakFinalizationList hasNewFinalization + ifTrue: [ executor finalizeValues ] + ifFalse: [ + (executors ifNil: [ executors := OrderedCollection new ]) add: executor ] ]! - valueDictionary finalizer: #finalizeValues!

1 0

The Trunk: Kernel-nice.510.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

Nicolas Cellier uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-nice.510.mcz ==================== Summary ==================== Name: Kernel-nice.510 Author: nice Time: 31 October 2010, 10:25:03.794 pm UUID: 80b9fa44-3abc-4414-adae-10f3f03b0420 Ancestors: Kernel-ul.509 Provide an implementation of #degreeCos and #degreeSin such that results are exact for any multiple of 90. Care is also taken to evaluate the sine between -90° and 90°, this will avoid #degreesToRadians and i386 FPU sine fonction to accumulate round off errors due to approximate representation of pi. We can thus evaluate 240 degreeCos with at most 1 ulp error. It's not perfect, but better than previous implementation. For cosine, we know that: cosd(x)=cosd(abs(x)) cosd(x)=sind(90-x) thus the trick is to evaluate: cosd(x)=sind(90-abs(x)) after appropriate modulo in [-180,180[ This way, we are sure to evaluate the sine between -90° and 90° The #degreesToRadians and #sin are used rather than #degreeSin to avoid cycles. For sine, it would be necessary to evaluate either sind(x) if abs(x) <=90 or sind(180-x) if abs(x) >= 90 A possible implementation would be: | x | x := 90 + self \\ 360 - 90. x >= 180 ifTrue: [x := 180 - x]. ^x degreesToRadians sin We prefer evaluating cosd(90-x) thus providing a branch free implementation. =============== Diff against Kernel-ul.509 =============== Item was changed: ----- Method: Float>>degreeCos (in category 'mathematical functions') ----- degreeCos + "Take care of exceptional values" + + self isFinite ifTrue: [^super degreeCos]. + ^self radiansToDegrees cos! - "Answer the cosine of the receiver taken as an angle in degrees." - - ^ self degreesToRadians cos! Item was changed: ----- Method: Float>>degreeSin (in category 'mathematical functions') ----- degreeSin + "Take care of exceptional values" + + self isFinite ifTrue: [^super degreeSin]. + ^self radiansToDegrees sin! - "Answer the sine of the receiver taken as an angle in degrees." - - ^ self degreesToRadians sin! Item was changed: ----- Method: Number>>degreeCos (in category 'mathematical functions') ----- degreeCos "Answer the cosine of the receiver taken as an angle in degrees." + ^ (90 - (180 + self \\ 360 - 180) abs) degreesToRadians sin! - ^ (90 + self) degreeSin! Item was changed: ----- Method: Number>>degreeSin (in category 'mathematical functions') ----- degreeSin "Answer the sine of the receiver taken as an angle in degrees." + ^(90 - self) degreeCos! - ^ self asFloat degreesToRadians sin!

1 0

Finalization tests failing
by Igor Stasenko 31 Oct '10

31 Oct '10

Hello, under VM with new finalization, some tests are failing. Please, check http://code.google.com/p/pharo/issues/detail?id=3183 for details. it looks like i need to do a different changeset for Squeak -- Best regards, Igor Stasenko AKA sig.

2 5

The Trunk: KernelTests-nice.167.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

Nicolas Cellier uploaded a new version of KernelTests to project The Trunk: http://source.squeak.org/trunk/KernelTests-nice.167.mcz ==================== Summary ==================== Name: KernelTests-nice.167 Author: nice Time: 31 October 2010, 9:55:18.943 pm UUID: 669b4442-43de-4da0-83d3-649e77bca967 Ancestors: KernelTests-nice.166 Assert that #degreeCos and #degreeSin are exact for any multiple of 90. This is a nice property to have that radianCos and radianSin cannot afford due to approximate floating point representation of pi. =============== Diff against KernelTests-nice.166 =============== Item was added: + ----- Method: FloatTest>>testDegreeCos (in category 'test - mathematical functions') ----- + testDegreeCos + self shouldnt: [ 45.0 degreeCos] raise: Error. + "Following tests use approximate equality, because cosine are generally evaluated using inexact Floating point arithmetic" + self assert: (45.0 degreeCos squared - 0.5) abs <= Float epsilon. + self assert: (60.0 degreeCos - 0.5) abs <= Float epsilon. + self assert: (120.0 degreeCos + 0.5) abs <= Float epsilon. + -360.0 to: 360.0 do: [:i | + self assert: (i degreeCos closeTo: i degreesToRadians cos)]. + + "Following tests use strict equality which is a requested property of degreeCos" + -10.0 to: 10.0 do: [:k | + self assert: (k*360 + 90) degreeCos = 0. + self assert: (k*360 - 90) degreeCos = 0. + self assert: (k*360 + 180) degreeCos + 1 = 0. + self assert: (k*360) degreeCos - 1 = 0.].! Item was added: + ----- Method: FloatTest>>testDegreeCosForExceptionalValues (in category 'test - mathematical functions') ----- + testDegreeCosForExceptionalValues + self assert: Float nan degreeCos isNaN. + self assert: Float infinity degreeCos isNaN. + self assert: Float infinity negated degreeCos isNaN.! Item was added: + ----- Method: FloatTest>>testDegreeSin (in category 'test - mathematical functions') ----- + testDegreeSin + self shouldnt: [ 45.0 degreeSin] raise: Error. + "Following tests use approximate equality, because sine are generally evaluated using inexact Floating point arithmetic" + self assert: (45.0 degreeSin squared - 0.5) abs <= Float epsilon. + self assert: (30.0 degreeSin - 0.5) abs <= Float epsilon. + self assert: (-30.0 degreeSin + 0.5) abs <= Float epsilon. + -360.0 to: 360.0 do: [:i | + self assert: (i degreeSin closeTo: i degreesToRadians sin)]. + + "Following tests use strict equality which is a requested property of degreeSin" + -10.0 to: 10.0 do: [:k | + self assert: (k*360 + 90) degreeSin - 1 = 0. + self assert: (k*360 - 90) degreeSin + 1= 0. + self assert: (k*360 + 180) degreeSin = 0. + self assert: (k*360) degreeSin = 0.].! Item was added: + ----- Method: FloatTest>>testDegreeSinForExceptionalValues (in category 'test - mathematical functions') ----- + testDegreeSinForExceptionalValues + self assert: Float nan degreeSin isNaN. + self assert: Float infinity degreeSin isNaN. + self assert: Float infinity negated degreeSin isNaN.! Item was changed: + ----- Method: FractionTest>>testDegreeCos (in category 'tests - mathematical functions') ----- - ----- Method: FractionTest>>testDegreeCos (in category 'tests - sinuses') ----- testDegreeCos "self run: #testDegreeCos" self shouldnt: [ (4/3) degreeCos] raise: Error. + -361/3 to: 359/3 do: [:i | + self assert: (i degreeCos closeTo: i degreesToRadians cos)].! - self assert: (1/3) degreeCos printString = '0.999983076857744'! Item was changed: + ----- Method: FractionTest>>testDegreeSin (in category 'tests - mathematical functions') ----- - ----- Method: FractionTest>>testDegreeSin (in category 'tests - sinuses') ----- testDegreeSin "self run: #testDegreeSin" self shouldnt: [ (4/3) degreeSin] raise: Error. + -361/3 to: 359/3 do: [:i | + self assert: (i degreeSin closeTo: i degreesToRadians sin)].! - self assert: (1/3) degreeSin printString = '0.005817731354993834'.! Item was changed: + ----- Method: IntegerTest>>testDegreeCos (in category 'tests - mathematical functions') ----- - ----- Method: IntegerTest>>testDegreeCos (in category 'tests - basic') ----- testDegreeCos "self run: #testDegreeCos" self shouldnt: [ 45 degreeCos] raise: Error. + "Following tests use approximate equality, because cosine are generally evaluated using inexact Floating point arithmetic" + self assert: (45 degreeCos squared - (1/2)) abs <= Float epsilon. + self assert: (60 degreeCos - (1/2)) abs <= Float epsilon. + self assert: (120 degreeCos + (1/2)) abs <= Float epsilon. + -360 to: 360 do: [:i | + self assert: (i degreeCos closeTo: i degreesToRadians cos)]. + + "Following tests use strict equality which is a requested property of degreeCos" + -10 to: 10 do: [:k | + self assert: (k*360 + 90) degreeCos = 0. + self assert: (k*360 - 90) degreeCos = 0. + self assert: (k*360 + 180) degreeCos + 1 = 0. + self assert: (k*360) degreeCos - 1 = 0.].! - self assert: 45 degreeCos printString = (2 sqrt / 2) asFloat printString ! Item was added: + ----- Method: IntegerTest>>testDegreeSin (in category 'tests - mathematical functions') ----- + testDegreeSin + "self run: #testDegreeSin" + + self shouldnt: [ 45 degreeSin] raise: Error. + + "Following tests use approximate equality, because sine are generally evaluated using inexact Floating point arithmetic" + self assert: (45 degreeSin squared - (1/2)) abs <= Float epsilon. + self assert: (30 degreeSin - (1/2)) abs <= Float epsilon. + self assert: (-30 degreeSin + (1/2)) abs <= Float epsilon. + -360 to: 360 do: [:i | + self assert: (i degreeSin closeTo: i degreesToRadians sin)]. + + "Following tests use strict equality which is a requested property of degreeSin" + -10 to: 10 do: [:k | + self assert: (k*360 + 90) degreeSin - 1 = 0. + self assert: (k*360 - 90) degreeSin + 1= 0. + self assert: (k*360 + 180) degreeSin = 0. + self assert: (k*360) degreeSin = 0].!

1 0

The Inbox: Tests-bp.100.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

A new version of Tests was added to project The Inbox: http://source.squeak.org/inbox/Tests-bp.100.mcz ==================== Summary ==================== Name: Tests-bp.100 Author: bp Time: 31 October 2010, 7:07:14.269 pm UUID: f95fe472-fe1e-4e96-ae3e-9c5c917c39f1 Ancestors: Tests-bp.99 Add preamble to flush obsolete PackageInfos. =============== Diff against Tests-bp.99 =============== Item was added: + (PackageInfo named: 'Tests') preamble: 'MCWorkingCopy flushObsoletePackageInfos'!

1 0

The Inbox: Tests-bp.99.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

A new version of Tests was added to project The Inbox: http://source.squeak.org/inbox/Tests-bp.99.mcz ==================== Summary ==================== Name: Tests-bp.99 Author: bp Time: 31 October 2010, 6:44:26.559 pm UUID: d573b35d-7413-43c2-96f7-1c47d39d8f27 Ancestors: Tests-ul.98 Fix dependencies on obsolete PackageInfos. =============== Diff against Tests-ul.98 =============== Item was changed: ----- Method: PackageDependencyTest>>testMonticello (in category 'tests') ----- testMonticello self testPackage: 'Monticello' dependsExactlyOn: #( Collections Compiler Compression Exceptions Files Graphics Kernel Morphic Network + 'PackageInfo-Base' - PackageInfo System Tests 'ToolBuilder-Kernel' 'ToolBuilder-Morphic' Tools ).! Item was changed: ----- Method: PackageDependencyTest>>testMorphic (in category 'tests') ----- testMorphic self testPackage: 'Morphic' dependsExactlyOn: #( Balloon Collections Compiler EToys Exceptions Files Graphics Kernel Monticello MonticelloConfigurations - 'Morphic-TrueType' "????" MorphicExtras Multilingual Network ST80 Sound System 'ToolBuilder-Kernel' 'ToolBuilder-Morphic' Tools TrueType ).! Item was changed: ----- Method: PackageDependencyTest>>testSUnitGUI (in category 'tests') ----- testSUnitGUI self testPackage: 'SUnitGUI' dependsExactlyOn: #( Collections Graphics Kernel + 'PackageInfo-Base' - PackageInfo SUnit System 'ToolBuilder-Kernel' Tools ).! Item was changed: ----- Method: PackageDependencyTest>>testServices (in category 'tests') ----- testServices self testPackage: 'Services-Base' dependsExactlyOn: #( Collections Compiler Exceptions Graphics Kernel Morphic + 'PackageInfo-Base' - PackageInfo PreferenceBrowser System 'ToolBuilder-Kernel' Tools ).! Item was changed: ----- Method: PackageDependencyTest>>testSystem (in category 'tests') ----- testSystem self testPackage: 'System' dependsExactlyOn: #( Collections Balloon Compiler Compression Exceptions Files Graphics Kernel Monticello MonticelloConfigurations Morphic MorphicExtras Multilingual Network + 'PackageInfo-Base' - PackageInfo Sound 'ToolBuilder-Kernel' Tools TrueType ).! Item was changed: ----- Method: PackageDependencyTest>>testToolBuilderMVC (in category 'tests') ----- testToolBuilderMVC self testPackage: 'ToolBuilder-MVC' dependsExactlyOn: #( Collections Exceptions Graphics ST80 - ToolBuilder 'ToolBuilder-Kernel' Tools ).! Item was changed: ----- Method: PackageDependencyTest>>testToolBuilderSUnit (in category 'tests') ----- testToolBuilderSUnit self testPackage: 'ToolBuilder-SUnit' dependsExactlyOn: #( Collections Kernel - ToolBuilder 'ToolBuilder-Kernel' ).! Item was changed: ----- Method: PackageDependencyTest>>testTools (in category 'tests') ----- testTools self testPackage: 'Tools' dependsExactlyOn: #( Collections Compiler Compression Exceptions Files Graphics Kernel Morphic MorphicExtras Multilingual Network + 'PackageInfo-Base' - PackageInfo ST80 System 'ToolBuilder-Kernel' ).!

1 0

The Inbox: PackageInfo-Base-bp.45.mcz
by commits＠source.squeak.org 31 Oct '10

31 Oct '10

A new version of PackageInfo-Base was added to project The Inbox: http://source.squeak.org/inbox/PackageInfo-Base-bp.45.mcz ==================== Summary ==================== Name: PackageInfo-Base-bp.45 Author: bp Time: 31 October 2010, 6:16:27.312 pm UUID: ea9306f3-af1f-463e-bfd6-4651491f4e5b Ancestors: PackageInfo-Base-eem.44 fixed category for PackageInfo>>name =============== Diff against PackageInfo-Base-eem.44 =============== Item was changed: + ----- Method: PackageInfo>>name (in category 'naming') ----- - ----- Method: PackageInfo>>name (in category 'preamble/postscript') ----- name + ^self packageName! - - ^ self packageName!

1 0

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

Jump to page: