--- a/ReadEvalPrintLoop.st Tue Nov 08 23:55:10 2016 +0100
+++ b/ReadEvalPrintLoop.st Tue Nov 08 23:58:24 2016 +0100
@@ -333,14 +333,19 @@
(ok and:[tmpFile modificationTime ~= modifiedTime]) ifTrue:[
isNewClass ifTrue:[
Compiler evaluate:tmpFile contentsOfEntireFile.
+ errStream showCR:'Class (re)defined.'
] ifFalse:[
editFullClass ifTrue:[
tmpFile fileIn.
+ errStream showCR:'Class (re)compiled.'
] ifFalse:[
cls compile:tmpFile contentsOfEntireFile classified:'*as yet uncategorized'.
+ errStream showCR:'Method (re)compiled.'
].
].
- ].
+ ] ifFalse:[
+ errStream showCR:'No change.'
+ ].
] ensure:[
tmpFile notNil ifTrue:[
tmpFile remove