[squeak-dev] The Trunk: Kernel-eem.969.mcz

Eliot Miranda eliot.miranda at gmail.com
Sat Nov 14 01:01:19 UTC 2015


On Fri, Nov 13, 2015 at 4:12 PM, Nicolas Cellier <
nicolas.cellier.aka.nice at gmail.com> wrote:

>
>
> 2015-11-13 2:30 GMT+01:00 <commits at source.squeak.org>:
>
>> Eliot Miranda uploaded a new version of Kernel to project The Trunk:
>> http://source.squeak.org/trunk/Kernel-eem.969.mcz
>>
>> ==================== Summary ====================
>>
>> Name: Kernel-eem.969
>> Author: eem
>> Time: 12 November 2015, 5:30:04.713 pm
>> UUID: ec5388a5-1235-4c2d-8ec1-9ec28a9f617a
>> Ancestors: Kernel-nice.968
>>
>> Fix tow speeling sorres.
>>
>
> Worse than that, words are so short in English, it's not amazing that any
> typo find an entry in the urban dictionary ;)
> http://www.urbandictionary.com/define.php?term=sput
>

:-)

Sput, man, you right!!


>
>
>
>> Handle the case where a method compiled in the debugger has a large frame.
>>
>> =============== Diff against Kernel-nice.968 ===============
>>
>> Item was changed:
>>   ----- Method: InstructionPrinter>>callPrimitive: (in category
>> 'instruction decoding') -----
>>   callPrimitive: index
>> +       "Print the callPrimitive bytecode."
>> -       "Print the callPrimitive."
>>
>> +       self print: 'callPrimitive: ' , index printString!
>> -       self print: 'callPrimtive: ' , index printString!
>>
>> Item was changed:
>>   ----- Method: Process>>restartTopWith: (in category 'changing suspended
>> state') -----
>>   restartTopWith: method
>>         "Rollback top context and replace with new method.  Assumes self
>> is suspended"
>>
>>         method isQuick
>> +               ifTrue: [self popTo: suspendedContext sender]
>> +               ifFalse:
>> +                       [suspendedContext method frameSize >= method
>> frameSize
>> +                               ifTrue: [suspendedContext
>> privRefreshWith: method]
>> +                               ifFalse:
>> +                                       [self assert: suspendedContext
>> isExecutingBlock not.
>> +                                        suspendedContext := MethodContext
>> +
>>                        sender: suspendedContext sender
>> +
>>                        receiver: suspendedContext receiver
>> +
>>                        method: method
>> +
>>                        arguments: ((1 to: method numArgs) collect:
>> +
>>                                                        [:i|
>> suspendedContext tempAt: i])]].
>> -               ifTrue: [ self popTo: suspendedContext sender ]
>> -               ifFalse: [ suspendedContext privRefreshWith: method ].
>>   !
>>
>> Item was changed:
>>   ----- Method: SmallInteger>>objectForDataStream: (in category 'objects
>> from disk') -----
>>   objectForDataStream: refStrm
>> +       "In a 64-bit Spur VM, we may have to fake 32-bit SmallIntegers
>> for compatibility."
>> -       "In a 64bits sput VM, we may have to fake 32bits SmallInteger for
>> compatibility"
>>
>>         | large |
>>         self > 16r3FFFFFFF ifTrue: [
>>                 large := LargePositiveInteger new: self digitLength neg:
>> false.
>>                 1 to: self digitLength do: [:i | large digitAt: i put:
>> (self digitAt: i)].
>>                 ^large].
>>         self < -16r40000000 ifTrue: [
>>                 large := LargeNegativeInteger new: self digitLength neg:
>> true.
>>                 1 to: self digitLength do: [:i | large digitAt: i put:
>> (self digitAt: i)].
>>                 ^large].
>> +       ^ self!
>> -       ^ self
>> - !
>>
>>
>>
>
>
>
>


-- 
_,,,^..^,,,_
best, Eliot
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20151113/669af98d/attachment.htm


More information about the Squeak-dev mailing list