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

Nicolas Cellier nicolas.cellier.aka.nice at gmail.com
Sat Nov 14 00:12:00 UTC 2015


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


> 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
> - !
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20151114/9fdce34c/attachment.htm


More information about the Squeak-dev mailing list