[squeak-dev] The Inbox: Morphic-mt.1664.mcz

Tobias Pape Das.Linux at gmx.de
Fri Jun 5 10:59:18 UTC 2020


yes!
-t
> On 05.06.2020, at 12:01, Marcel Taeumel <marcel.taeumel at hpi.de> wrote:
> 
> Like this?
> 
> 
> 
> Best,
> Marcel
>> Am 05.06.2020 11:59:19 schrieb Tobias Pape <das.linux at gmx.de>:
>> 
>> 
>> > On 05.06.2020, at 11:51, Marcel Taeumel wrote:
>> > 
>> > Here is an example:
>> > 
>> 
>> 
>> Nice!
>> 
>> Here's my thought: binary should be 4 or 8, octal 3 and hex 2 digits :)
>> 
>> best regards
>> -Tobias
>> 
>> > 
>> > 
>> > Best,
>> > Marcel
>> >> Am 05.06.2020 11:50:15 schrieb commits at source.squeak.org :
>> >> 
>> >> A new version of Morphic was added to project The Inbox:
>> >> http://source.squeak.org/inbox/Morphic-mt.1664.mcz
>> >> 
>> >> ==================== Summary ====================
>> >> 
>> >> Name: Morphic-mt.1664
>> >> Author: mt
>> >> Time: 5 June 2020, 11:49:58.884634 am
>> >> UUID: 8a563509-bb80-b34a-a723-9bcc1a586f10
>> >> Ancestors: Morphic-mt.1663
>> >> 
>> >> Proposal of different format to print integers in the object explorer. Print them in groups of, e.g., 4 digits, separated by a space character.
>> >> 
>> >> I am sure that the actual implementation can be improved. :-)
>> >> 
>> >> =============== Diff against Morphic-mt.1663 ===============
>> >> 
>> >> Item was changed:
>> >> ----- Method: Integer>>explorerContents (in category '*Morphic-Explorer') -----
>> >> explorerContents
>> >> 
>> >> ^#(
>> >> + ('hexadecimal' 16 4)
>> >> + ('octal' 8 4)
>> >> + ('binary' 2 4)) collect: [ :each | | label group |
>> >> + group := each third.
>> >> + label := self printStringBase: each second.
>> >> + label := label padded: #left to: (label size roundUpTo: group) with: $0.
>> >> + label := String streamContents: [:s |
>> >> + 1 to: label size by: group do: [:index |
>> >> + 1 to: group do: [:gIndex |
>> >> + s nextPut: (label at: index + gIndex - 1)].
>> >> + s space]].
>> >> + 
>> >> - ('hexadecimal' 16)
>> >> - ('octal' 8)
>> >> - ('binary' 2)) collect: [ :each |
>> >> ObjectExplorerWrapper
>> >> + with: label
>> >> - with: (self printStringBase: each second)
>> >> name: each first translated
>> >> model: self ]!
>> >> 
>> >> 
>> > 
>> 
>> 
>> 
> 




More information about the Squeak-dev mailing list