Skip to content

Commit

Permalink
adjustet tests to commit before
Browse files Browse the repository at this point in the history
  • Loading branch information
@Das-Killer
Das-Killer committed Jul 11, 2024
1 parent 0eb3dff commit b2b1df9
Show file tree
Hide file tree
Showing 4 changed files with 46 additions and 46 deletions.
8 changes: 4 additions & 4 deletions src/SqueakKara-Tests/SKKaraDecoratorTest.class.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -120,22 +120,22 @@ SKKaraDecoratorTest >> testKaraTrunkAhead [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:57'
#'squeak_changestamp' : 'EB 7/11/2024 15:27'
}
SKKaraDecoratorTest >> testKaraTurnLeft [


self decorator turn: 'left'.
self decorator turn: SKDirection rotateLeft.
self assert: decorator kara viewDirection = SKDirection above
]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:56'
#'squeak_changestamp' : 'EB 7/11/2024 15:29'
}
SKKaraDecoratorTest >> testKaraTurnRight [


self decorator turn: 'right'.
self decorator turn: SKDirection rotateRight.
self assert: decorator kara viewDirection = SKDirection below
]
38 changes: 19 additions & 19 deletions src/SqueakKara-Tests/SKKaraTest.class.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -74,15 +74,15 @@ SKKaraTest >> testAbsolutePositionAfterMoveWithDefaultDirection [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:30'
}
SKKaraTest >> testKaraStartTurnLeftRight [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: SKDirection right.
kara turn: SKDirection left.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection right


Expand All @@ -104,75 +104,75 @@ SKKaraTest >> testKaraStartViewDirection [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnLeft [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'left'.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection above


]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnLeftTwice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'left'.
kara turn: 'left'.
kara turn: SKDirection rotateLeft.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection left

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRight [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection below

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRightThrice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: 'right'.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection above

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRightTwice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection left

]
Expand Down Expand Up @@ -249,7 +249,7 @@ SKKaraTest >> testTrunkAhead [

{
#category : #testing,
#'squeak_changestamp' : 'jt 6/11/2024 13:56'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testTrunkAheadAfterTurn [

Expand All @@ -258,6 +258,6 @@ SKKaraTest >> testTrunkAheadAfterTurn [
kara := SKKara newInGrid: self grid.
trunk := SKTrunk newInGrid: self grid at: 1 @ 2.
self assert: false = kara trunkAhead.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
self assert: true = kara trunkAhead
]
8 changes: 4 additions & 4 deletions src/SqueakKara/SKKaraDecoratorTest.class.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -120,22 +120,22 @@ SKKaraDecoratorTest >> testKaraTrunkAhead [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:57'
#'squeak_changestamp' : 'EB 7/11/2024 15:27'
}
SKKaraDecoratorTest >> testKaraTurnLeft [


self decorator turn: 'left'.
self decorator turn: SKDirection rotateLeft.
self assert: decorator kara viewDirection = SKDirection above
]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:56'
#'squeak_changestamp' : 'EB 7/11/2024 15:29'
}
SKKaraDecoratorTest >> testKaraTurnRight [


self decorator turn: 'right'.
self decorator turn: SKDirection rotateRight.
self assert: decorator kara viewDirection = SKDirection below
]
38 changes: 19 additions & 19 deletions src/SqueakKara/SKKaraTest.class.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -74,15 +74,15 @@ SKKaraTest >> testAbsolutePositionAfterMoveWithDefaultDirection [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:30'
}
SKKaraTest >> testKaraStartTurnLeftRight [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: SKDirection right.
kara turn: SKDirection left.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection right


Expand All @@ -104,75 +104,75 @@ SKKaraTest >> testKaraStartViewDirection [

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnLeft [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'left'.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection above


]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnLeftTwice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'left'.
kara turn: 'left'.
kara turn: SKDirection rotateLeft.
kara turn: SKDirection rotateLeft.
self assert: kara viewDirection = SKDirection left

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRight [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection below

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRightThrice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: 'right'.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection above

]

{
#category : #testing,
#'squeak_changestamp' : 'JJG 6/18/2024 18:40'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testKaraTurnRightTwice [

| kara |

kara := SKKara newInGrid: self grid.
kara turn: 'right'.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
kara turn: SKDirection rotateRight.
self assert: kara viewDirection = SKDirection left

]
Expand Down Expand Up @@ -249,7 +249,7 @@ SKKaraTest >> testTrunkAhead [

{
#category : #testing,
#'squeak_changestamp' : 'jt 6/11/2024 13:56'
#'squeak_changestamp' : 'EB 7/11/2024 15:28'
}
SKKaraTest >> testTrunkAheadAfterTurn [

Expand All @@ -258,6 +258,6 @@ SKKaraTest >> testTrunkAheadAfterTurn [
kara := SKKara newInGrid: self grid.
trunk := SKTrunk newInGrid: self grid at: 1 @ 2.
self assert: false = kara trunkAhead.
kara turn: 'right'.
kara turn: SKDirection rotateRight.
self assert: true = kara trunkAhead
]

0 comments on commit b2b1df9

Please sign in to comment.