[squeak-dev] The Trunk: ShoutCore-eem.22.mcz

Ken Causey ken at kencausey.com
Mon Oct 11 21:09:42 UTC 2010


Deleted.

Ken

On Mon, 2010-10-11 at 13:50 -0700, Eliot Miranda wrote:
> Hi Ken,
> 
> 
>     please go ahead and delete; thanks.
> 
> 
> best
> Eliot
> 
> 
> 
> 
> On Mon, Oct 11, 2010 at 1:15 PM, Ken Causey <ken at kencausey.com> wrote:
>         I was poised to delete the package version and then saw this
>         query from
>         Levente.  I'll hold off until I've heard from Eliot to confirm
>         he wants
>         it deleted.
>         
>         Ken
>         
>         
>         On Mon, 2010-10-11 at 21:21 +0200, Levente Uzonyi wrote:
>         > On Mon, 11 Oct 2010, Eliot Miranda wrote:
>         >
>         > > Argh!  This went to the wrong repository.  Can someone
>         with admin privileges
>         > > on source.squeak.org delete this?
>         >
>         > Why? Are these changes private? Fixing the highlighting of
>         the new
>         > primitive pragmas is on my todo list, and these changes seem
>         to be fixing
>         > them.
>         >
>         >
>         > Levente
>         >
>         > >
>         > > TIA
>         > > Eliot
>         > >
>         > > On Mon, Oct 11, 2010 at 11:37 AM,
>         <commits at source.squeak.org> wrote:
>         > >
>         > >> Eliot Miranda uploaded a new version of ShoutCore to
>         project The Trunk:
>         > >> http://source.squeak.org/trunk/ShoutCore-eem.22.mcz
>         > >>
>         > >> ==================== Summary ====================
>         > >>
>         > >> Name: ShoutCore-eem.22
>         > >> Author: eem
>         > >> Time: 11 October 2010, 11:37:36.994 am
>         > >> UUID: bf5e644e-451b-4117-bb1a-8d3a087f902d
>         > >> Ancestors: ShoutCore-eem.16, ShoutCore-nice.21
>         > >>
>         > >> Merge with ShoutCore-nice.21.
>         > >> Now that we now that $- is (almost) a normal binary
>         selector character (it
>         > >> also occurs in Number literals), let's do more
>         simplifications.
>         > >>
>         > >> Laza's isNil ifTrue:... => ifNil: tweaks.
>         > >>
>         > >> =============== Diff against ShoutCore-nice.21
>         ===============
>         > >>
>         > >> Item was changed:
>         > >>  ----- Method: SHParserST80>>parseExternalCall (in
>         category 'parse') -----
>         > >>  parseExternalCall
>         > >> +       [self scanNext.
>         > >> +       ((Smalltalk at: #ExternalFunction)
>         callingConventionModifierFor:
>         > >> currentToken) notNil]
>         > >> +               whileTrue.
>         > >> -       self scanNext.
>         > >>        self scanPast: #externalCallType.
>         > >>        currentToken = '*'
>         > >>                ifTrue: [self scanPast:
>         #externalCallTypePointerIndicator].
>         > >>        currentTokenFirst isDigit
>         > >>                ifTrue: [self scanPast: #integer]
>         > >>                ifFalse:        [
>         > >>                        self failUnless: currentTokenFirst
>         == $'.
>         > >>                        self parseString].
>         > >>        self failUnless: currentTokenFirst == $(.
>         > >>        self scanPast: #leftParenthesis.
>         > >> +       [currentTokenFirst ~= $)]
>         > >> -       [currentTokenFirst ~~ $)]
>         > >>                whileTrue: [
>         > >>                        self scanPast: #externalCallType.
>         > >>                        currentToken = '*'
>         > >>                                ifTrue: [self scanPast:
>         > >> #externalCallTypePointerIndicator]].
>         > >>        self scanPast: #rightParenthesis.
>         > >>        currentToken = 'module:'
>         > >>                ifTrue: [
>         > >>                        self scanPast: #module.
>         > >>                        self failUnless: currentTokenFirst
>         == $'.
>         > >>                        self parseString].
>         > >> +       currentToken = 'error:'
>         > >> +               ifTrue: [
>         > >> +                       self scanPast: #module.
>         > >> +                       currentTokenFirst == $'
>         > >> +                               ifTrue: [self
>         parseString]
>         > >> +                               ifFalse: [self scanPast:
>         #patternTempVar]].
>         > >>        self failUnless: currentToken = '>'.
>         > >>        self scanPast: #primitiveOrExternalCallEnd!
>         > >>
>         > >> Item was changed:
>         > >>  ----- Method: SHParserST80>>parsePrimitive (in category
>         'parse') -----
>         > >>  parsePrimitive
>         > >> +       | numericPrim yetToSeeErrorCode |
>         > >> +       yetToSeeErrorCode := true.
>         > >>        self scanNext.
>         > >> +       (numericPrim := currentTokenFirst isDigit)
>         > >> -       currentTokenFirst isDigit
>         > >>                ifTrue: [self scanPast: #integer]
>         > >>                ifFalse: [
>         > >> +                       self failUnless:
>         currentTokenFirst == $'.
>         > >> +                       self parseString].
>         > >> +       currentToken = 'error:' ifTrue:
>         > >> +               [yetToSeeErrorCode := false.
>         > >> +                self scanPast: #primitive.
>         > >> +                self isName
>         > >> +                       ifTrue: [self scanPast:
>         #patternTempVar]
>         > >> +                       ifFalse:
>         > >> +                               [self failUnless:
>         currentTokenFirst == $'.
>         > >> +                                self parseString]].
>         > >> +       numericPrim ifFalse:
>         > >> +               [currentToken = 'module:' ifTrue:
>         > >> +                       [self scanPast: #module.
>         > >> +                        self failUnless:
>         currentTokenFirst == $'.
>         > >> +                        self parseString]].
>         > >> +       (yetToSeeErrorCode
>         > >> +        and: [currentToken = 'error:']) ifTrue:
>         > >> +               [self scanPast: #primitive.
>         > >> +                self isName
>         > >> +                       ifTrue: [self scanPast:
>         #patternTempVar]
>         > >> +                       ifFalse:
>         > >> +                               [self failUnless:
>         currentTokenFirst == $'.
>         > >> +                                self parseString]].
>         > >> +       self failUnless: currentToken = '>'.
>         > >> -                       currentTokenFirst == $'
>         > >> -                               ifTrue: [ self
>         parseString ]
>         > >> -                               ifFalse: [
>         > >> -                                       currentTokenFirst
>         == $#
>         > >> -                                               ifTrue:
>         [ self parseSymbol
>         > >> ]
>         > >> -                                               ifFalse:
>         [ self error ] ].
>         > >> -                       currentToken = 'module:'
>         > >> -                               ifTrue: [
>         > >> -                                       self scanPast:
>         #module.
>         > >> -                                       currentTokenFirst
>         == $'
>         > >> -                                               ifTrue:
>         [ self parseString
>         > >> ]
>         > >> -                                               ifFalse:
>         [
>         > >> -
>         currentTokenFirst
>         > >> == $#
>         > >> -
>         ifTrue: [
>         > >> self parseSymbol ]
>         > >> -
>         ifFalse: [
>         > >> self error ] ] ] ].
>         > >> -       self failUnless: currentTokenFirst == $>.
>         > >>        self scanPast: #primitiveOrExternalCallEnd!
>         > >>
>         > >>
>         > >>
>         > >
>         >
>         >
>         
>         
> 
> 

-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 190 bytes
Desc: This is a digitally signed message part
Url : http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20101011/62007a15/attachment.pgp


More information about the Squeak-dev mailing list