<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Exchange Server">
<!-- converted from text --><style><!-- .EmailQuote { margin-left: 1pt; padding-left: 4pt; border-left: #800000 2px solid; } --></style>
</head>
<body>
<meta content="text/html; charset=UTF-8">
<style type="text/css" style="">
<!--
p
        {margin-top:0;
        margin-bottom:0}
-->
</style>
<div dir="ltr">
<div id="x_divtagdefaultwrapper" dir="ltr" style="font-size:12pt; color:#000000; font-family:Calibri,Helvetica,sans-serif">
<p>Thanks for merging! :-) But I believe you copied the versions only, they are still in the inbox ...</p>
<p><br>
</p>
<p>Best,</p>
<p>Christoph</p>
<div id="x_Signature">
<div id="x_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="x_divtagdefaultwrapper" style="font-family:Calibri,Arial,Helvetica,sans-serif; font-size:; margin:0">
<div>
<div class="x__rp_T4" id="x_Item.MessagePartBody">
<div class="x__rp_U4 x_ms-font-weight-regular x_ms-font-color-neutralDark x_rpHighlightAllClass x_rpHighlightBodyClass" id="x_Item.MessageUniqueBody" style="font-family:wf_segoe-ui_normal,"Segoe UI","Segoe WP",Tahoma,Arial,sans-serif,serif,EmojiFont">
<div dir="ltr">
<div id="x_divtagdefaultwrapper"><font face="Calibri,Helvetica,sans-serif,EmojiFont,Apple Color Emoji,Segoe UI Emoji,NotoColorEmoji,Segoe UI Symbol,Android Emoji,EmojiSymbols">
<div id="x_Signature">
<div style="margin:0px"><font style="font-family:Calibri,Arial,Helvetica,sans-serif,serif,EmojiFont">
<div><font size="3" color="black"><span style="font-size:12pt"><a href="http://www.hpi.de/" target="_blank" rel="noopener noreferrer" id="LPNoLP"><font size="2"><span id="LPlnk909538"><font color="#757B80"></font></span></font></a></span></font></div>
</font></div>
</div>
</font></div>
</div>
</div>
</div>
</div>
<div><font size="2" color="#808080"></font></div>
</div>
</div>
</div>
</div>
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="x_divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>Von:</b> Squeak-dev <squeak-dev-bounces@lists.squeakfoundation.org> im Auftrag von commits@source.squeak.org <commits@source.squeak.org><br>
<b>Gesendet:</b> Freitag, 30. Oktober 2020 20:10:10<br>
<b>An:</b> squeak-dev@lists.squeakfoundation.org; packages@lists.squeakfoundation.org<br>
<b>Betreff:</b> [squeak-dev] The Trunk: Kernel-eem.1359.mcz</font>
<div> </div>
</div>
</div>
<font size="2"><span style="font-size:10pt;">
<div class="PlainText">Eliot Miranda uploaded a new version of Kernel to project The Trunk:<br>
<a href="http://source.squeak.org/trunk/Kernel-eem.1359.mcz">http://source.squeak.org/trunk/Kernel-eem.1359.mcz</a><br>
<br>
==================== Summary ====================<br>
<br>
Name: Kernel-eem.1359<br>
Author: eem<br>
Time: 30 October 2020, 12:10:07.699375 pm<br>
UUID: 1ec9a445-37fa-4256-84d8-9bdf8b52eb7d<br>
Ancestors: Kernel-eem.1358<br>
<br>
Merge Kernel-ct.1358<br>
Author: ct<br>
Time: 28 October 2020, 11:37:24.817544 pm<br>
UUID: c9af6acb-61cf-af42-b5fa-3afa8451bb24<br>
Ancestors: Kernel-mt.1353<br>
<br>
Fixes a simulation bug that occurs when executing ProtoObject >> #doesNotUnderstand:. See KernelTests-ct.388.<br>
<br>
=============== Diff against Kernel-eem.1358 ===============<br>
<br>
Item was changed:<br>
  ----- Method: Context>>send:to:with:lookupIn: (in category 'controlling') -----<br>
  send: selector to: rcvr with: arguments lookupIn: lookupClass<br>
         "Simulate the action of sending a message with selector and arguments to rcvr. The argument, lookupClass, is the class in which to lookup the message. This is the receiver's class for normal messages, but for super messages it will be some specific
 class related to the source method."<br>
  <br>
         | meth primIndex val ctxt |<br>
         (meth := lookupClass lookupSelector: selector) ifNil:<br>
+                [selector == #doesNotUnderstand: ifTrue:<br>
+                        [self error: 'Recursive message not understood!!' translated].<br>
+                ^self send: #doesNotUnderstand:<br>
-                [^self send: #doesNotUnderstand:<br>
                                 to: rcvr<br>
                                 with: {(Message selector: selector arguments: arguments) lookupClass: lookupClass}<br>
                                 lookupIn: lookupClass].<br>
         <br>
         meth isCompiledMethod ifFalse:<br>
                 ["Object as Methods (OaM) protocol: 'The contract is that, when the VM encounters an ordinary object (rather than a compiled method) in the method dictionary during lookup, it sends it the special selector #run:with:in: providing the original
 selector, arguments, and receiver.'. DOI: 10.1145/2991041.2991062."<br>
+                ^self send: #run:with:in:<br>
-                ^ self send: #run:with:in:<br>
                         to: meth<br>
                         with: {selector. arguments. rcvr}].<br>
         <br>
         meth numArgs = arguments size ifFalse:<br>
                 [^ self error: ('Wrong number of arguments in simulated message {1}' translated format: {selector})].<br>
         (primIndex := meth primitive) > 0 ifTrue:<br>
                 [val := self doPrimitive: primIndex method: meth receiver: rcvr args: arguments.<br>
                 (self isPrimFailToken: val) ifFalse:<br>
                         [^val]].<br>
         <br>
         (selector == #doesNotUnderstand: and: [lookupClass == ProtoObject]) ifTrue:<br>
+                [^self error: ('Simulated message {1} not understood' translated format: {arguments first selector})].<br>
-                [^ self error: ('Simulated message {1} not understood' translated format: {arguments first selector})].<br>
         <br>
         ctxt := Context sender: self receiver: rcvr method: meth arguments: arguments.<br>
+        (primIndex isInteger and: [primIndex > 0]) ifTrue:<br>
-        (primIndex notNil and: [primIndex > 0]) ifTrue:<br>
                 [ctxt failPrimitiveWith: val].<br>
         <br>
         ^ctxt!<br>
<br>
<br>
</div>
</span></font>
</body>
</html>