diff --git a/repository/Grease-Tests-Core.package/GRPlatformTest.class/instance/testSourceCodeStringOf.st b/repository/Grease-Tests-Core.package/GRPlatformTest.class/instance/testSourceCodeStringOf.st index 64a5c334..13d1e453 100644 --- a/repository/Grease-Tests-Core.package/GRPlatformTest.class/instance/testSourceCodeStringOf.st +++ b/repository/Grease-Tests-Core.package/GRPlatformTest.class/instance/testSourceCodeStringOf.st @@ -5,7 +5,8 @@ testSourceCodeStringOf sourceCodeString := GRPlatform current sourceCodeStringOf: GRPlatform >> #sourceCodeStringOf:. self assert: sourceCodeString - equals: 'sourceCodeStringOf: aCompiledMethod + equals: (GRPlatform current convertToSmalltalkNewlines: +'sourceCodeStringOf: aCompiledMethod "Return a String with the source code for a compiled method." - self subclassResponsibility' \ No newline at end of file + self subclassResponsibility') \ No newline at end of file diff --git a/repository/Grease-Tests-Pharo-Core.package/GRPharoPlatformTest.class/instance/testIsPharo.st b/repository/Grease-Tests-Pharo-Core.package/GRPharoPlatformTest.class/instance/testIsPharo.st index da5e9af5..1677c4d6 100644 --- a/repository/Grease-Tests-Pharo-Core.package/GRPharoPlatformTest.class/instance/testIsPharo.st +++ b/repository/Grease-Tests-Pharo-Core.package/GRPharoPlatformTest.class/instance/testIsPharo.st @@ -1,4 +1,4 @@ -*Grease-Tests-Pharo-Core +tests testIsPharo self assert: GRPlatform current isPharo. self deny: GRPlatform current isGemStone.