Skip to content

Commit

Permalink
fix tests for pharo9, 10, 11
Browse files Browse the repository at this point in the history
  • Loading branch information
akevalion committed Dec 12, 2023
1 parent a37d35b commit 366d239
Show file tree
Hide file tree
Showing 106 changed files with 1,213 additions and 1,320 deletions.
4 changes: 2 additions & 2 deletions src/Roassal-Examples/Class.extension.st
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Extension { #name : 'Class' }
Extension { #name : #Class }

{ #category : '*Roassal-Examples' }
{ #category : #'*Roassal-Examples' }
Class >> numberOfLinesOfCode [
"A convenient and homogeneous method to return the number of lines of code"
^ self linesOfCode
Expand Down
6 changes: 3 additions & 3 deletions src/Roassal-Examples/CompiledMethod.extension.st
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Extension { #name : 'CompiledMethod' }
Extension { #name : #CompiledMethod }

{ #category : '*Roassal-Examples' }
{ #category : #'*Roassal-Examples' }
CompiledMethod >> dependentMethods [
"Return the list of methods defined in my class for which I may invoke"
"(self >> #dependentMethods) dependentMethods"
Expand All @@ -9,7 +9,7 @@ CompiledMethod >> dependentMethods [
thenCollect: [ :k | self methodClass >> k ]
]

{ #category : '*Roassal-Examples' }
{ #category : #'*Roassal-Examples' }
CompiledMethod >> numberOfLinesOfCode [
^ self linesOfCode
]
12 changes: 5 additions & 7 deletions src/Roassal-Examples/RSAbstractExamples.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -5,19 +5,17 @@ The goal is to make the examples part of the tests.
If you wish to add examples to Roassal, then you need to subclass me.
"
Class {
#name : 'RSAbstractExamples',
#superclass : 'RSObject',
#category : 'Roassal-Examples-Core',
#package : 'Roassal-Examples',
#tag : 'Core'
#name : #RSAbstractExamples,
#superclass : #RSObject,
#category : 'Roassal-Examples-Core'
}

{ #category : 'accessing' }
{ #category : #accessing }
RSAbstractExamples >> label [
^ self className
]

{ #category : 'accessing' }
{ #category : #accessing }
RSAbstractExamples >> order [
^ 100
]
Loading

0 comments on commit 366d239

Please sign in to comment.