
<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">

</head>

<body>

<style type="text/css" style="display:none;"><!-- P {margin-top:0;margin-bottom:0;} --></style>

<div id="divtagdefaultwrapper" style="font-size:12pt;color:#000000;font-family:Calibri,Helvetica,sans-serif;" dir="ltr">

<p>Hi Marcel,</p>

<p><br>

</p>

<p>when do we use "flag: #deprecate" and when "flag: #deprecated"? I thought that we would only use the latter to indicate that we did not yet risk inserting an actual "self deprecated" in the same place. :-)</p>

<p><br>

</p>

<p>Best,</p>

<p>Christoph</p>

</div>

<hr style="display:inline-block;width:98%" tabindex="-1">

<div id="divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" style="font-size:11pt" color="#000000"><b>Von:</b> Squeak-dev <squeak-dev-bounces@lists.squeakfoundation.org> im Auftrag von Taeumel, Marcel<br>

<b>Gesendet:</b> Mittwoch, 9. Februar 2022 19:50:03<br>

<b>An:</b> squeak-dev<br>

<b>Betreff:</b> Re: [squeak-dev] The Trunk: Collections-mt.987.mcz</font>

<div> </div>

</div>

<div>

<div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000;text-align: left" dir="ltr">

@Levente: Would you verify that this implementation in LimitedWriteStream is okay? Thanks. :-)

<div><br>

</div>

<div>Best,</div>

<div>Marcel</div>

<div class="mb_sig"></div>

<blockquote class="history_container" type="cite" style="border-left-style: solid;border-width: 1px;margin-top: 20px;margin-left: 0px;padding-left: 10px;min-width: 500px">

<p style="color: #AAAAAA; margin-top: 10px;">Am 09.02.2022 19:40:28 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p>

<div style="font-family:Arial,Helvetica,sans-serif">Marcel Taeumel uploaded a new version of Collections to project The Trunk:<br>

http://source.squeak.org/trunk/Collections-mt.987.mcz<br>

<br>

==================== Summary ====================<br>

<br>

Name: Collections-mt.987<br>

Author: mt<br>

Time: 9 February 2022, 7:40:16.073774 pm<br>

UUID: 0e417f39-a88b-8045-bb6c-32a1024cfb27<br>

Ancestors: Collections-mt.986<br>

<br>

Fixes regression in #printStringLimitedTo:. Minor code cleanup.<br>

<br>

=============== Diff against Collections-mt.986 ===============<br>

<br>

Item was changed:<br>

----- Method: Collection>>printOn:delimiter: (in category 'printing - obsolete') -----<br>

printOn: aStream delimiter: delimString<br>

<br>

+ self flag: #deprecated.<br>

- self flag: #deprecate.<br>

self<br>

printElementsOn: aStream<br>

separatedBy: delimString.!<br>

<br>

Item was changed:<br>

----- Method: Collection>>printOn:delimiter:last: (in category 'printing - obsolete') -----<br>

printOn: aStream delimiter: delimString last: lastDelimString<br>

"Print elements on a stream separated<br>

with a delimiter between all the elements and with<br>

a special one before the last like: 'a, b and c'<br>

<br>

Note: Feel free to improve the code to detect the last element."<br>

<br>

| n sz |<br>

+ self flag: #deprecated.<br>

- self flag: #deprecate.<br>

n := 1.<br>

sz := self size.<br>

self do: [:elem |<br>

n := n + 1.<br>

aStream print: elem]<br>

separatedBy: [<br>

n = sz<br>

ifTrue: [aStream print: lastDelimString]<br>

ifFalse: [aStream print: delimString]]!<br>

<br>

Item was added:<br>

+ ----- Method: LimitedWriteStream>>next:putAll:startingAt: (in category 'writing') -----<br>

+ next: anInteger putAll: aCollection startingAt: startIndex<br>

+ "Store the next anInteger elements from the given collection."<br>

+ <br>

+ | newEnd |<br>

+ anInteger > 0 ifFalse: [ ^aCollection ].<br>

+ <br>

+ newEnd := position + anInteger.<br>

+ newEnd > limit ifTrue: [<br>

+ super next: (limit - position max: 0) putAll: aCollection startingAt: startIndex.<br>

+ limitBlock value.<br>

+ ^ aCollection].<br>

+ <br>

+ ^ super next: anInteger putAll: aCollection startingAt: startIndex!<br>

<br>

Item was removed:<br>

- ----- Method: String>>asExplorerString (in category 'user interface') -----<br>

- asExplorerString<br>

- <br>

- ^ self printString!<br>

<br>

Item was removed:<br>

- ----- Method: Symbol>>asExplorerString (in category 'user interface') -----<br>

- asExplorerString<br>

- ^ self printString!<br>

<br>

<br>

</div>

</blockquote>

</div>

</div>

</body>

</html>