<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></p>

<div>> <span style="font-size: 12pt;">note that the implementation of Transcripter should be as minimal as possible. That new "clear" command is fine, I guess. :-)</span>

<div><br>

</div>

</div>

<div>Minimality might be a general goal for sustainable software development :) I just wanted to avoid to repeat myself.</div>

<div><br>

</div>

<div>Best,</div>

<div>Christoph</div>

<p></p>

<div id="Signature">

<div id="divtagdefaultwrapper" dir="ltr" style="font-size: 12pt; color: rgb(0, 0, 0); font-family: Calibri, Helvetica, sans-serif, EmojiFont, "Apple Color Emoji", "Segoe UI Emoji", NotoColorEmoji, "Segoe UI Symbol", "Android Emoji", EmojiSymbols;">

<div name="divtagdefaultwrapper" style="font-family:Calibri,Arial,Helvetica,sans-serif; font-size:; margin:0">

<div>

<div class="_rp_T4" id="Item.MessagePartBody">

<div class="_rp_U4 ms-font-weight-regular ms-font-color-neutralDark rpHighlightAllClass rpHighlightBodyClass" id="Item.MessageUniqueBody" style="font-family:wf_segoe-ui_normal,"Segoe UI","Segoe WP",Tahoma,Arial,sans-serif,serif,EmojiFont">

<div dir="ltr">

<div id="divtagdefaultwrapper"><font face="Calibri,Helvetica,sans-serif,EmojiFont,Apple Color Emoji,Segoe UI Emoji,NotoColorEmoji,Segoe UI Symbol,Android Emoji,EmojiSymbols">

<div id="Signature">

<div style="margin:0px"><font style="font-family:Calibri,Arial,Helvetica,sans-serif,serif,EmojiFont"></font></div>

</div>

</font></div>

</div>

</div>

</div>

</div>

<div><font size="2" color="#808080"></font></div>

</div>

</div>

</div>

</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> Montag, 16. Dezember 2019 19:37:15<br>

<b>An:</b> John Pfersich via Squeak-dev<br>

<b>Betreff:</b> Re: [squeak-dev] The Inbox: System-ct.1128.mcz</font>

<div> </div>

</div>

<div>

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

Hi Christoph,

<div><br>

</div>

<div>note that the implementation of Transcripter should be as minimal as possible. That new "clear" command is fine, I guess. :-)</div>

<div><br>

</div>

<div>> <span style="font-family: Arial, Helvetica, sans-serif;font-size: 13px">In TranscriptStream, #showln: prints the newline first as well</span></div>

<div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 13px"><br>

</span></div>

<div><span style="font-family: Arial, Helvetica, sans-serif;font-size: 13px">I added that to TranscriptStream to make sure that even the first call to #showln: is on an extra line, regardless of its previous contents.</span></div>

<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 15.12.2019 12:15:18 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p>

<div style="font-family:Arial,Helvetica,sans-serif">A new version of System was added to project The Inbox:<br>

http://source.squeak.org/inbox/System-ct.1128.mcz<br>

<br>

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

<br>

Name: System-ct.1128<br>

Author: ct<br>

Time: 14 December 2019, 3:14:14.108612 pm<br>

UUID: 89698e0d-cee3-2041-afa8-96674d632912<br>

Ancestors: System-mt.1127<br>

<br>

Extends Transcripter with #clear command and refactors readEvalPrint loop<br>

<br>

- Adds #showln: method<br>

<br>

=============== Diff against System-mt.1127 ===============<br>

<br>

Item was changed:<br>

----- Method: Transcripter>>readEvalPrint (in category 'command line') -----<br>

readEvalPrint<br>

| line okToRevert |<br>

okToRevert := true.<br>

+ [#(quit exit done) includes: (line := self request: '>')]<br>

+ whileFalse: [ line<br>

+ caseOf: {<br>

+ [#revert] -> [okToRevert<br>

+ ifTrue: [RecentMessages default revertMostRecent.<br>

+ self showln: 'reverted: ' , RecentMessages default mostRecent.<br>

+ okToRevert := false]<br>

+ ifFalse: [self showln: 'Only one level of revert currently supported']].<br>

+ [#clear] -> [self clear]. }<br>

+ otherwise: [<br>

+ self showln: ([Compiler evaluate: line] ifError: [:err :ex | err])] ]!<br>

- [#('quit' 'exit' 'done' ) includes: (line := self request: '>')]<br>

- whileFalse:<br>

- [line = 'revert'<br>

- ifTrue: [okToRevert<br>

- ifTrue: [RecentMessages default revertMostRecent.<br>

- self cr; show: 'reverted: ' , RecentMessages default mostRecent.<br>

- okToRevert := false]<br>

- ifFalse: [self cr; show: 'Only one level of revert currently supported']]<br>

- ifFalse: [self cr; show: ([Compiler evaluate: line] ifError: [:err :ex | err])]]!<br>

<br>

Item was added:<br>

+ ----- Method: Transcripter>>showln: (in category 'accessing') -----<br>

+ showln: anObject<br>

+ self<br>

+ cr;<br>

+ show: anObject!<br>

<br>

<br>

</div>

</blockquote>

</div>

</div>

</body>

</html>