--- a/CompiledCode.st Sat Nov 03 00:52:20 2012 +0100
+++ b/CompiledCode.st Sat Nov 03 17:32:04 2012 +0100
@@ -428,14 +428,14 @@
literalsDetect:aBlock ifNone:exceptionBlock
"execute a one arg block for each of our literals.
- return the first literal for which aBlock returns true,
+ Return the first literal for which aBlock returns true,
or the value from exceptionBlock, if either no literals or
none satisfied the block"
self literalsDo:[:eachLiteral |
- (aBlock value:eachLiteral) ifTrue:[
- ^ eachLiteral
- ]
+ (aBlock value:eachLiteral) ifTrue:[
+ ^ eachLiteral
+ ]
].
^ exceptionBlock value.
@@ -1859,11 +1859,11 @@
!CompiledCode class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.118 2012-10-26 10:25:36 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.119 2012-11-03 16:32:04 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.118 2012-10-26 10:25:36 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.119 2012-11-03 16:32:04 cg Exp $'
!
version_SVN