[squeak-dev] The Trunk: ShoutCore-eem.22.mcz
Eliot Miranda
eliot.miranda at gmail.com
Mon Oct 11 20:50:21 UTC 2010
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 --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20101011/50c3a771/attachment.htm
More information about the Squeak-dev
mailing list
|