The Trunk: Tools-mt.981.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Tools-mt.981.mcz

commits-2
Marcel Taeumel uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-mt.981.mcz

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

Name: Tools-mt.981
Author: mt
Time: 23 June 2020, 6:50:33.003163 am
UUID: 210af2e1-3f13-6041-8ea1-6e0ff6673c20
Ancestors: Tools-tpr.980

Restore hook #defaultIntegerBaseInDebugger, which is frequently used in the VMMaker.

=============== Diff against Tools-tpr.980 ===============

Item was added:
+ ----- Method: Inspector>>defaultIntegerBase (in category 'user interface') -----
+ defaultIntegerBase
+ "Answer the default base in which to print integers.
+ Defer to the class of the instance."
+
+ ^ (self object class respondsTo: #defaultIntegerBaseInDebugger)
+ ifTrue: [self object class perform: #defaultIntegerBaseInDebugger]
+ ifFalse: [10]!

Item was changed:
  ----- Method: Inspector>>getContents (in category 'user interface') -----
  getContents
 
  | newContents |
  selectionUpdateTime := 0.
 
  self hasSelection ifFalse: [^ ''].
 
  selectionUpdateTime := [
  newContents := self selection in: [:object |
  self selectedField shouldPrintValueAsIs
  ifTrue: [object asStringOrText] "Show strings and texts without quoting and without ellipsis."
+ ifFalse: [
+ object isInteger
+ ifTrue: [object storeStringBase: self defaultIntegerBase]
+ ifFalse: [object printString]]].
- ifFalse: [object printString]].
  ] timeToRun.
 
  ^ newContents!