Three major fixes to morphic and eToys of interest to Squeakland.

Peace Jerome peace_the_dreamer at yahoo.com
Fri Dec 24 04:01:03 UTC 2004


--- Ned Konz <ned at squeakland.org> wrote:

> On Wednesday 22 December 2004 9:59 pm, you wrote:
> > They are in good shape an worthy of being added to
> an
> > unstable version of 3.9.  Once that is done I
> don't
> > believe there will be any problems and certainly
> none
> > I won't be able to fix.
> 
> OK, here's another thing to fix:
> 
> * Make a CurvierMorph. Open its Etoy viewer. Change
> "gradientFill" to true.
> get a walkback:

You picked the fancy speckled arrow open curve with
the moving ants display and tried to gradient fill
that. You don't need a curvierMorph to get the walk
back. It will blow up with a regular polygon or  curve
put into that state.  Congrats you found another
genuine eToy bug. 

I agree it needs to be fixed. My pride just makes me
want to point out I didn't introduce it.

>   borderColor:  a GradientFillStyle
So why it the player trying to set the BORDER color to
a gradient fill???

P.S I'm suppose to be packing for travel. So I won't
be able to respond for  about a week. You want to add
this to mantis?


> 
> 23 December 2004 12:38:16 pm
> 
> VM: unix - a SmalltalkImage
> Image: Squeak3.9alpha [latest update: #6474]
> 
> SecurityManager state:
> Restricted: false
> FileAccess: true
> SocketAccess: true
> Working Dir /home/ned/Squeak/3.9a
> Trusted Dir /home/ned/Squeak/3.9a/secure
> Untrusted Dir /home/ned/Squeak/3.9a/untrusted
> 
> BorderStyle class(Object)>>doesNotUnderstand: a
> GradientFillStyle
>  Receiver: BorderStyle
>  Arguments and temporary variables: 
> <<error during printing>
>  Receiver's instance variables: 
>   superclass:  Object
>   methodDict:  a MethodDictionary(#=->a
> CompiledMethod (1941) #baseColor->a 
> Compil...etc...
>   format:  2
>   instanceVariables:  nil
>   organization:  ('accessing' baseColor baseColor:
> color color: 
> colorsAtCorners do...etc...
>   subclasses:  #(SimpleBorder)
>   name:  #BorderStyle
>   classPool:  a Dictionary(#Default->a BorderStyle )
>   sharedPools:  nil
>   environment:  a SystemDictionary(lots of globals)
>   category:  nil
> 
> CurvierMorph(BorderedMorph)>>borderStyle
>  Receiver: a CurvierMorph<Curvier>(1725)
>  Arguments and temporary variables: 
>   style:  a SimpleBorder
>  Receiver's instance variables: 
>   bounds:  1424 at 431 corner: 1719 at 874
>   owner:  a PasteUpMorph<world>(1068) [world]
>   submorphs:  #()
>   fullBounds:  1424 at 431 corner: 1719 at 874
>   color:  Color orange
>   extension:  a MorphExtension (1432) [externalName
> = Curvier ]  [player = an 
> Unsc...etc...
>   borderWidth:  7
>   borderColor:  a GradientFillStyle
>   vertices:  #(1520 at 723 1429 at 780
> 1547.21328800095 at 870.654319166234 
> 1625.8723018617...etc...
>   closed:  false
>   filledForm:  nil
>   arrows:  #forward
>   arrowForms:  #(Form(44x57x1))
>   smoothCurve:  true
>   curveState:  #(#(#(1520.0 1429.0 1547.21328800095
> 1625.872301861727 
> 1650.8092489...etc...
>   borderDashSpec:  nil
>   handles:  nil
>   borderForm:  nil
> 
> UnscriptedPlayer(Player)>>getBorderStyle
>  Receiver: an UnscriptedPlayer (1694) named Curvier
>  Arguments and temporary variables: 
> 
>  Receiver's instance variables: 
>   dependents:  nil
>   costume:  a CurvierMorph<Curvier>(1725)
>   costumes:  nil
> 
> UpdatingStringMorph>>readFromTarget
>  Receiver: an UpdatingStringMorph(2288)'simple'
>  Arguments and temporary variables: 
>   v:  nil
>  Receiver's instance variables: 
>   bounds:  2473 at 522 corner: 2518 at 538
>   owner:  a SymbolListTile(40) - #literal op= ''
>   submorphs:  #()
>   fullBounds:  2473 at 522 corner: 2518 at 538
>   color:  Color black
>   extension:  nil
>   font:  nil
>   emphasis:  0
>   contents:  'simple'
>   hasFocus:  false
>   format:  #string
>   target:  an UnscriptedPlayer (1694) named Curvier
>   lastValue:  #simple
>   getSelector:  #getBorderStyle
>   putSelector:  #setBorderStyle:
>   floatPrecision:  1
>   growable:  true
>   stepTime:  50
>   autoAcceptOnFocusLoss:  true
>   minimumWidth:  24
>   maximumWidth:  300
> 
> 
> --- The full stack ---
> BorderStyle class(Object)>>doesNotUnderstand: a
> GradientFillStyle
> CurvierMorph(BorderedMorph)>>borderStyle
> UnscriptedPlayer(Player)>>getBorderStyle
> UpdatingStringMorph>>readFromTarget
>  - - - - - - - - - - - - - - - - - - - - - - - - - -
> - - - - - - -
> UpdatingStringMorph>>step
> UpdatingStringMorph(Morph)>>stepAt:
> StepMessage(MorphicAlarm)>>value:
> WorldState>>runLocalStepMethodsIn:
> WorldState>>runStepMethodsIn:
> PasteUpMorph>>runStepMethods
> WorldState>>doOneCycleNowFor:
> WorldState>>doOneCycleFor:
> PasteUpMorph>>doOneCycle
> [] in Project class>>spawnNewProcess {[[World
> doOneCycle.  Processor yield.  
> false] whileFalse.  nil]}
> [] in BlockContext>>newProcess {[self value. 
> Processor terminateActive]}
> 
> -- 
> Ned Konz
> MetaMagix
> Stanwood WA
> (360) 629-1091
> 



		
__________________________________ 
Do you Yahoo!? 
Send holiday email and support a worthy cause. Do good. 
http://celebrity.mail.yahoo.com



More information about the Squeak-dev mailing list