Squeak 4.6: Kernel-topa.935.mcz

Chris Muller uploaded a new version of Kernel to project Squeak 4.6:
http://source.squeak.org/squeak46/Kernel-topa.935.mcz

==================== Summary ====================

Name: Kernel-topa.935
Author: topa
Time: 6 July 2015, 4:50:44.188 pm
UUID: d30beb7f-4706-4876-9aa1-fd8d45ba4733
Ancestors: Kernel-eem.934

Reinstall CompiledMethod>>#hasBreakpoint

=============== Diff against Kernel-eem.932 ===============

Item was changed:
  ----- Method: ClassDescription>>logMethodSource:forMethodWithNode:inCategory:withStamp:notifying: (in category 'private') -----
  logMethodSource: aText forMethodWithNode: aCompiledMethodWithNode inCategory: category withStamp: changeStamp notifying: requestor
  | priorMethodOrNil newText |
  priorMethodOrNil := self compiledMethodAt: aCompiledMethodWithNode selector ifAbsent: [].
+ (priorMethodOrNil notNil and: [priorMethodOrNil hasBreakpoint]) ifTrue:
+ [priorMethodOrNil := priorMethodOrNil getAndForgetUnbreakpointedOriginal].
+ newText := (requestor notNil and: [Preferences confirmFirstUseOfStyle])
+ ifTrue: [aText askIfAddStyle: priorMethodOrNil req: requestor]
+ ifFalse: [aText].
+ aCompiledMethodWithNode method
+ putSource: newText
- newText := (requestor notNil
- and: [Preferences confirmFirstUseOfStyle])
- ifTrue: [aText askIfAddStyle: priorMethodOrNil req: requestor]
- ifFalse: [aText].
- aCompiledMethodWithNode method putSource: newText
  fromParseNode: aCompiledMethodWithNode node
+ class: self
+ category: category
+ withStamp: changeStamp
+ inFile: 2
+ priorMethod: priorMethodOrNil!
- class: self category: category withStamp: changeStamp
- inFile: 2 priorMethod: priorMethodOrNil.!

Item was added:
+ ----- Method: CompiledMethod>>hasBreakpoint (in category 'testing') -----
+ hasBreakpoint
+ ^false!