The Trunk: Monticello-ul.602.mcz

Levente Uzonyi uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-ul.602.mcz

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

Name: Monticello-ul.602
Author: ul
Time: 21 October 2014, 4:58:16.892 pm
UUID: e46b988a-988b-4d6d-9d98-e241bdd6239f
Ancestors: Monticello-bf.601

Create the method with the right trailer in MethodAnnotation >> #createCompiledMethod. Depends on Kernel-ul.880.

=============== Diff against Monticello-bf.601 ===============

Item was changed:
  ----- Method: MethodAddition>>createCompiledMethod (in category 'as yet unclassified') -----
  createCompiledMethod
  | notification |
+ [methodAndNode := myClass
+ compile: text asString
+ notifying: requestor
+ trailer: (myClass defaultMethodTrailerIfLogSource: logSource)
+ ifFail: [^nil]]
- [methodAndNode := myClass compile: text asString notifying: requestor
- trailer: myClass defaultMethodTrailer ifFail: [^nil]]
  on: SyntaxErrorNotification do: [:exc |
  notification := exc.
  exc pass].
  notification ifNotNil: [notification newSource ifNotNil: [:newSource | text := newSource]].
  selector := methodAndNode selector.
  compiledMethod := methodAndNode method.
  self writeSourceToLog.
  priorMethodOrNil := myClass compiledMethodAt: selector ifAbsent: [nil].
  !