--- a/MethodFinder.st Wed Jun 26 03:25:24 2013 +0000
+++ b/MethodFinder.st Wed Jun 26 10:24:42 2013 +0200
@@ -213,21 +213,20 @@
!
constDiv
- | const subTest got |
"See if (data1 // C) is the answer"
self breakPoint:#cg.
^ false.
- const _ ((thisData at: 1) at: 1) // (answers at: 1). "May not be right!!"
- got _ (subTest _ MethodFinder new copy: self addArg: const)
- searchForOne isEmpty not.
- got ifFalse: [^ false].
-
- "replace data2 with const in expressions"
- subTest expressions do: [:exp |
- expressions add: (exp copyReplaceString: "copyReplaceAll:" 'data2' withString: "with:" const printString)].
- selector addAll: subTest selectors.
- ^ true
+"/ const _ ((thisData at: 1) at: 1) // (answers at: 1). "May not be right!!"
+"/ got _ (subTest _ MethodFinder new copy: self addArg: const)
+"/ searchForOne isEmpty not.
+"/ got ifFalse: [^ false].
+"/
+"/ "replace data2 with const in expressions"
+"/ subTest expressions do: [:exp |
+"/ expressions add: (exp copyReplaceString: "copyReplaceAll:" 'data2' withString: "with:" const printString)].
+"/ selector addAll: subTest selectors.
+"/ ^ true
!
constLessThan
@@ -1631,10 +1630,10 @@
!MethodFinder class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.33 2013-06-25 15:21:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.34 2013-06-26 08:24:42 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.33 2013-06-25 15:21:08 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/MethodFinder.st,v 1.34 2013-06-26 08:24:42 stefan Exp $'
! !