[squeak-dev] The Inbox: System-dtl.1304.mcz

Marcel Taeumel marcel.taeumel at hpi.de
Wed Feb 9 16:57:49 UTC 2022

Hi Dave --

Nice idea. Well, #privateAuthorsRaw was meant to be a small database. Like those base64 encoded icon contents. If you really want to see nicer diffs for this method, go ahead at update it. :-) Then we can also see whether we remove something by accident.

Am 09.02.2022 02:54:29 schrieb commits at source.squeak.org <commits at source.squeak.org>:
A new version of System was added to project The Inbox:

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

Name: System-dtl.1304
Author: dtl
Time: 8 February 2022, 8:54:15.36808 pm
UUID: 425a12bd-d324-4d48-91db-a29dfb4bb67b
Ancestors: System-mt.1303

Use Character cr as a separator in privateAuthorsRaw so that each author appears on a separate line in the method. Future updates will be readable in the version diffs.

=============== Diff against System-mt.1303 ===============

Item was changed:
----- Method: SystemNavigation class>>initializeAuthors (in category 'class initialization') -----
"self initializeAuthors"

| s currentName currentAbbrv |
Authors := Dictionary new.
s := self privateAuthorsRaw readStream.

[s atEnd] whileFalse: [
"Read author name"
currentName := String streamContents: [:as |
[s peek ~= $#] whileTrue: [as nextPut: s next]].
Authors at: currentName put: Set new.
"Read abbreviations"
s next. "skip $#"
currentAbbrv := ''.
+ [s atEnd not and: [s peek ~= Character cr]] whileTrue: [
- [s atEnd not and: [s peek ~= $!!]] whileTrue: [
s peek = $# ifTrue: [
(Authors at: currentName) add: currentAbbrv.
currentAbbrv := ''.
s next. "skip $#"].
currentAbbrv := currentAbbrv, s next asString. "slow..."
currentAbbrv ifNotEmpty: [(Authors at: currentName) add: currentAbbrv].
s next. "skip $!!"

"Fill inverted index for authors."
AuthorsInverted := Dictionary new.
Authors keysAndValuesDo: [:fullName :abbreviations |
abbreviations do: [:abbrv |
at: abbrv
ifAbsentPut: [Set new]) add: fullName]].!

Item was changed:
----- Method: SystemNavigation class>>privateAuthorsRaw (in category 'class initialization') -----
(excessive size, no diff calculated)

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220209/2777a530/attachment.html>

More information about the Squeak-dev mailing list