X Tutup
Skip to content

Commit 823f3f4

Browse files
author
Johan Brichau
committed
Fix slime tests in Pharo 12
1 parent dce1ac7 commit 823f3f4

File tree

8 files changed

+42
-42
lines changed

8 files changed

+42
-42
lines changed

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testBlockFormatting.st‎

Lines changed: 10 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -4,27 +4,27 @@ testBlockFormatting
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'invalid1
99
[:a ]'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'invalid2
1313
[:a | ]'
14-
classified: #(accessing).
15-
class
14+
in: class.
15+
self
1616
compile: 'invalid3
1717
[ :b]'
18-
classified: #(accessing).
18+
in: class.
1919

20-
class
20+
self
2121
compile: 'invalid4
2222
[ :a| ]'
23-
classified: #(accessing).
24-
class
23+
in: class.
24+
self
2525
compile: 'invalid5
2626
[ :a |a ]'
27-
classified: #(accessing).
27+
in: class.
2828
self
2929
runRule: GRBlockFormattingRule
3030
selectors: #(invalid1 invalid2 invalid3 invalid4 invalid5)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testParensFormatting.st‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -4,14 +4,14 @@ testParensFormatting
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'invalid1
99
( 1 + 2)'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'invalid2
1313
(1 + 2 )'
14-
classified: #(accessing).
14+
in: class.
1515
self
1616
runRule: GRParensFormattingRule
1717
selectors: #(invalid1 invalid2)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testReturnFormatting.st‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -4,14 +4,14 @@ testReturnFormatting
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'invalid1
99
^1'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'invalid2
1313
^ 2'
14-
classified: #(accessing).
14+
in: class.
1515
self
1616
runRule: GRReturnFormattingRule
1717
selectors: #(invalid1 invalid2)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testTempsFormatting.st‎

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -4,18 +4,18 @@ testTempsFormatting
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'invalid1
99
| a|'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'invalid2
1313
|a |'
14-
classified: #(accessing).
15-
class
14+
in: class.
15+
self
1616
compile: 'invalid3
1717
| a b |'
18-
classified: #(accessing).
18+
in: class.
1919
self
2020
runRule: GRTempsFormattingRule
2121
selectors: #(invalid1 invalid2 invalid3)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testUsesCanPerformOrUnderstand.st‎

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -4,18 +4,18 @@ testUsesCanPerformOrUnderstand
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'invalid1
99
Object class canUnderstand: #new'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'invalid2
1313
Object class canPerform: #new'
14-
classified: #(accessing).
15-
class
14+
in: class.
15+
self
1616
compile: 'valid
1717
Object respondsTo: #new'
18-
classified: #(accessing).
18+
in: class.
1919
self
2020
runRule: GRUsesCanPerformOrUnderstandRule
2121
selectors: #(invalid1 invalid2)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testUsesClassForHash.st‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -4,14 +4,14 @@ testUsesClassForHash
44
class := self
55
defineClass: #GRSlimeMockObject
66
superclass: #GRObject.
7-
class
7+
self
88
compile: 'foo
99
^ super hash bitXor: self class hash'
10-
classified: #(accessing).
11-
class
10+
in: class.
11+
self
1212
compile: 'hash
1313
^ super hash bitXor: self class hash'
14-
classified: #(accessing).
14+
in: class.
1515
self
1616
runRule: GRUsesClassForHashRule
1717
selectors: #(hash)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testUsesCurlyBraceArrays.st‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -6,14 +6,14 @@ testUsesCurlyBraceArrays
66
class := self
77
defineClass: #GRSlimeMockObject
88
superclass: #GRObject.
9-
class
9+
self
1010
compile: 'invalid
1111
^ { self foo. self bar }'
12-
classified: #(accessing).
13-
class
12+
in: class.
13+
self
1414
compile: 'valid
1515
^ Array new'
16-
classified: #(accessing).
16+
in: class.
1717
self
1818
runRule: GRUsesCurlyBraceArraysRule
1919
selectors: #(invalid)

‎repository/Grease-Tests-Slime.package/GRSlimeTest.class/instance/testUsesLiteralByteArrays.st‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -6,14 +6,14 @@ testUsesLiteralByteArrays
66
class := self
77
defineClass: #GRSlimeMockObject
88
superclass: #GRObject.
9-
class
9+
self
1010
compile: 'invalid
1111
^ #[ 1 2 3 ]'
12-
classified: #(accessing).
13-
class
12+
in: class.
13+
self
1414
compile: 'valid
1515
^ ByteArray with: 1 with: 2 with: 3'
16-
classified: #(accessing).
16+
in: class.
1717
self
1818
runRule: GRUsesLiteralByteArraysRule
1919
selectors: #(invalid)

0 commit comments

Comments
 (0)
X Tutup