fixing my stupid change with removing Smalltalk::
by Stéphane Ducasse
Hi all
I revert the stupid change I did to do not display Smalltalk for class.
I think that the renaming
moosePrintOn: to mooseNameOn: is really important because it conveys
that the moosePrintOn: is not about printing but naming the entity.
Stef
14 years, 4 months
Fwd: [Pharo-project] The Fame code generator does not generate "container" annotation.
by Stéphane Ducasse
Begin forwarded message:
> From: François Tanguy <francois.tanguy(a)gmail.com>
> Date: May 10, 2009 10:46:36 AM CEDT
> To: pharo-project-request <Pharo-project(a)lists.gforge.inria.fr>
> Subject: [Pharo-project] The Fame code generator does not generate
> "container" annotation.
> Reply-To: Pharo-project(a)lists.gforge.inria.fr
>
> Hello all,
>
> The Fame code generator does not generate "container" annotation.
>
> ex : if in a MSE file
> (FM3.Property
> (id: 10051)
> (name ''superEquipment'')
> (type (ref: 5))
> (container true)
> (opposite (ref: 10061))
> )
>
> the code generated looks like this :
> superEquipment
> <MSEProperty: #superEquipment type: #SCAbstractEquipment
> opposite: #subEquipments>
> ^superEquipment
>
> should not it be like the following ?
> superEquipment
> <MSEProperty: #superEquipment type: #SCAbstractEquipment
> opposite: #subEquipments> <container>
> ^superEquipment
>
> It is pretty important because it allows the traversal of a model
> based on the containment of objects.
>
> François
> _______________________________________________
> Pharo-project mailing list
> Pharo-project(a)lists.gforge.inria.fr
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
14 years, 4 months
Stable Version of EyeSee?
by Mircea Lungu
Hi guys,
Do you know which EyeSee version is a stable one? We loaded the latest
version from the Bern Store, but the examples break.
EyeSee.Example>>scatterPlot1 and ScatterPlot2 are breaking when
displaying the axes. The problem is that in the following code, each
is a number, when it should have been a <something that responds to
width>.
The stack trace follows:
Unhandled exception: Message not understood: #width
SmallInteger(Object)>>doesNotUnderstand:
optimized [] in
EyeSee.LeftAxisStrategy>>setLabelDistanceFromAxisCalculation:
EyeSee
.ValueLabelDecorator(EyeSee.AbstractAxisDecorator)>>getDistanceToAxis:
EyeSee
.ValueLabelDecorator
(EyeSee.AbstractAxisDecorator)>>displayLabelAt:value:on:
optimized [] in EyeSee.ValueLabelDecorator>>displayOn:
Set>>do:
EyeSee.ValueLabelDecorator>>displayOn:
EyeSee.ScatterPlot>>displayOn:
EyeSee.DiagramRenderer>>defaultDisplayOn:
EyeSee.DiagramRenderer>>displayOn:
optimized [] in VisualizationHolder>>displayOn:
BlockClosure>>cull:
EyeSee.DiagramRenderer(Object)>>ifNotNil:
VisualizationHolder>>displayOn:
ScrollWrapper(TranslatingWrapper)>>displayOn:
BorderedWrapper>>displayOn:
BorderDecorator(CompositePart)>>displayOn:
BoundedWrapper>>displayOn:
SpecWrapper(Wrapper)>>displayOn:
SpecWrapper(WidgetWrapper)>>displayOn:
CompositePart>>displayOn:
WindowDisplayPolicy>>displayDamageList:in:
ApplicationWindow(ScheduledWindow)>>displayDamageEvent:
ApplicationWindow(ScheduledWindow)>>checkForEvents
optimized [] in [] in WindowManager>>repairDamagesExcept:
OrderedCollection>>do:
optimized [] in WindowManager>>repairDamagesExcept:
BlockClosure>>on:do:
WindowManager>>repairDamagesExcept:
WindowManager>>repairDamages
WindowManager>>processNextEvent
optimized [] in [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in WindowManager>>newProcess
BlockClosure>>on:do:
optimized [] in Process class>>forBlock:priority:
----------------------------------------------------------------------
SmallInteger(Object)>>doesNotUnderstand:
Receiver:
a SmallInteger
Arguments:
aMessage = a Message with selector: #width and arguments: #()
Temporaries:
excpt = a MessageNotUnderstood
resumeValue = nil
Context PC = 25
----------------------------------------------------------------------
optimized [] in
EyeSee.LeftAxisStrategy>>setLabelDistanceFromAxisCalculation:
Receiver:
an UndefinedObject
Arguments:
each = 150
Temporaries:
.aDiagram = an EyeSee.ScatterPlot
Context PC = 9
----------------------------------------------------------------------
EyeSee
.ValueLabelDecorator(EyeSee.AbstractAxisDecorator)>>getDistanceToAxis:
Receiver:
a EyeSee.ValueLabelDecorator
Instance Variables:
preferedMaxValue = nil
preferedMinValue = nil
maxValue = nil
minValue = nil
values = nil
start = nil
end = nil
label = nil
color = nil
labelRepresentation = BlockClosure [] in
EyeSee.AbstractDiagram>>initialize
rotatedLabels = false
normalLabelOrientation = nil
labelDistanceBlock = nil
labelPointCalculationBlock = nil
textStyle = nil
anAxis = an EyeSee.ValueTickDecorator
minTickDistance = 15
centerIdentifiers = true
Arguments:
aString = 150
Context PC = 6
----------------------------------------------------------------------
EyeSee
.ValueLabelDecorator
(EyeSee.AbstractAxisDecorator)>>displayLabelAt:value:on:
Receiver:
a EyeSee.ValueLabelDecorator
Instance Variables:
preferedMaxValue = nil
preferedMinValue = nil
maxValue = nil
minValue = nil
values = nil
start = nil
end = nil
label = nil
color = nil
labelRepresentation = BlockClosure [] in
EyeSee.AbstractDiagram>>initialize
rotatedLabels = false
normalLabelOrientation = nil
labelDistanceBlock = nil
labelPointCalculationBlock = nil
textStyle = nil
anAxis = an EyeSee.ValueTickDecorator
minTickDistance = 15
centerIdentifiers = true
Arguments:
aPoint = 0.0(a)332.0
aNumber = 150
aGraphicsContext = an EyeSee.DiagramGraphicsContextWrapper
Temporaries:
labelPoint = 0.0(a)340.0
distance = nil
labelString = 150
Context PC = 17
----------------------------------------------------------------------
optimized [] in EyeSee.ValueLabelDecorator>>displayOn:
Receiver:
an UndefinedObject
Arguments:
each = 150
Temporaries:
currPoint = 0.0(a)332.0
.super = an EyeSee.ValueLabelDecorator
.aGraphicsContext = an EyeSee.DiagramGraphicsContextWrapper
Context PC = 40
----------------------------------------------------------------------
Set>>do:
Receiver:
a Set
Instance Variables:
tally = 6
Arguments:
aBlock = BlockClosure [] in EyeSee.ValueLabelDecorator>>displayOn:
Temporaries:
index = 15
elem = 150
Context PC = 31
----------------------------------------------------------------------
EyeSee.ValueLabelDecorator>>displayOn:
Receiver:
a EyeSee.ValueLabelDecorator
Instance Variables:
preferedMaxValue = nil
preferedMinValue = nil
maxValue = nil
minValue = nil
values = nil
start = nil
end = nil
label = nil
color = nil
labelRepresentation = BlockClosure [] in
EyeSee.AbstractDiagram>>initialize
rotatedLabels = false
normalLabelOrientation = nil
labelDistanceBlock = nil
labelPointCalculationBlock = nil
textStyle = nil
anAxis = an EyeSee.ValueTickDecorator
minTickDistance = 15
centerIdentifiers = true
Arguments:
aGraphicsContext = an EyeSee.DiagramGraphicsContextWrapper
Context PC = 16
----------------------------------------------------------------------
EyeSee.ScatterPlot>>displayOn:
Receiver:
a EyeSee.ScatterPlot
Instance Variables:
layerHolder = an EyeSee.LayerHolder
elements = an OrderedCollection[17]
scale = 1@-1
contentTranslation = 0@0
contentScale = 1@1
diagramTranslation = 0@332
height = 400
width = 400
xPadding = 20
yPadding = 20
models = an OrderedCollection[17]
axisColor = ColorValue black
defaultColor = ColorValue gray
labels = BlockClosure [] in EyeSee.AbstractDiagram>>initialize
rotatedLabels = false
leftBorder = 36
upperBorder = 0
rightBorder = 0
lowerBorder = 28
defaultFontSize = 12
color = #color
colorDict = a Dictionary[2]
availableColors = an OrderedCollection[10]
displayLegend = false
legendHeight = 30
legendWidth = nil
diagramTitle = nil
titleFontHeight = 18
horizontalLegend = true
gcWrapper = an EyeSee.DiagramGraphicsContextWrapper
legendOrigin = nil
titleAlignment = nil
axisFontSize = 8
legend = nil
labelDistance = nil
decorators = a Dictionary[0]
decorationPadding = 0
hasOrientationLeftRight = true
hasOrientationBottomTop = true
xAxis = an EyeSee.ValueLabelDecorator
yAxis = an EyeSee.ValueLabelDecorator
xAxisStrategy = an EyeSee.BottomAxisStrategy
movedXAxis = false
movedYAxis = false
yAxisStrategy = an EyeSee.LeftAxisStrategy
xAxisLabel = nil
yAxisLabel = nil
xAxisTranslation = 0@0
yAxisTranslation = 0@0
xAxisScale = 1@1
yAxisScale = 1@1
preferredAxisMaxX = 150
preferredAxisMaxY = 150
preferredAxisMinX = 50
preferredAxisMinY = 50
xDeviationValue = nil
yDeviationValue = nil
xDeviationDescription = nil
yDeviationDescription = nil
xAxisDecorators = an OrderedCollection[2]
yAxisDecorators = an OrderedCollection[2]
showBorder = false
radius = 10
x = #xValue
y = #yValue
shape = #color
shapeDict = a Dictionary[2]
dataObjectFilled = true
defaultShape = BlockClosure [] in EyeSee.Shape class>>circle
Arguments:
aGraphicsContext = a ZoomGraphicsContext
Context PC = 52
----------------------------------------------------------------------
EyeSee.DiagramRenderer>>defaultDisplayOn:
Receiver:
a EyeSee.DiagramRenderer
Instance Variables:
diagram = an EyeSee.ScatterPlot
backgroundColor = Color white
Arguments:
gc = a ZoomGraphicsContext
Temporaries:
tempGC = an EyeSee.DiagramGraphicsContextWrapper
Context PC = 25
----------------------------------------------------------------------
EyeSee.DiagramRenderer>>displayOn:
Receiver:
a EyeSee.DiagramRenderer
Instance Variables:
diagram = an EyeSee.ScatterPlot
backgroundColor = Color white
Arguments:
gc = a ZoomGraphicsContext
Context PC = 12
----------------------------------------------------------------------
optimized [] in VisualizationHolder>>displayOn:
Receiver:
an UndefinedObject
Temporaries:
newGC = a ZoomGraphicsContext
.gc = a ScreenGraphicsContext
.super = a VisualizationHolder
Context PC = 17
----------------------------------------------------------------------
BlockClosure>>cull:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in VisualizationHolder>>displayOn:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anObject = an EyeSee.DiagramRenderer
Context PC = 10
----------------------------------------------------------------------
EyeSee.DiagramRenderer(Object)>>ifNotNil:
Receiver:
a EyeSee.DiagramRenderer
Instance Variables:
diagram = an EyeSee.ScatterPlot
backgroundColor = Color white
Arguments:
aBlock = BlockClosure [] in VisualizationHolder>>displayOn:
Context PC = 4
----------------------------------------------------------------------
VisualizationHolder>>displayOn:
Receiver:
a VisualizationHolder
Instance Variables:
container = a ScrollWrapper on: a VisualizationHolder
eventHandlers = nil
properties = nil
model = an EyeSee.DiagramRenderer
controller = a VisualizationController
hoover = a BlockValue
zoom = a ZoomFactorHolder on: 1
mousePosition = a ValueHolder on: 720@559
visualization = a ValueHolder on: an EyeSee.DiagramRenderer
background = ColorValue white
Arguments:
gc = a ScreenGraphicsContext
Context PC = 25
----------------------------------------------------------------------
ScrollWrapper(TranslatingWrapper)>>displayOn:
Receiver:
a ScrollWrapper
Instance Variables:
container = a BorderedWrapper on: a ScrollWrapper on: a
VisualizationHolder
eventHandlers = nil
properties = nil
component = a VisualizationHolder
origin = a ScrollValueHolder
dependents = a DependentsCollection[6]
preferredBoundsBlock = nil
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Context PC = 11
----------------------------------------------------------------------
BorderedWrapper>>displayOn:
Receiver:
a BorderedWrapper
Instance Variables:
container = a BorderDecorator
eventHandlers = nil
properties = nil
component = a ScrollWrapper on: a VisualizationHolder
origin = 0@0
layout = a LayoutFrame
extent = 786@563
insetDisplayBox = 1@1 corner: 785@562
border = a SimpleBorder
inset = 0
insideColor = nil
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Temporaries:
bx = 0@0 corner: 786@563
clipBox = 1@1 corner: 785@562
insetClipBox = 1@1 corner: 785@562
Context PC = 64
----------------------------------------------------------------------
BorderDecorator(CompositePart)>>displayOn:
Receiver:
a BorderDecorator
Instance Variables:
container = a BoundedWrapper on: a BorderDecorator
eventHandlers = nil
properties = nil
components = an OrderedCollection[3]
preferredBounds = 0@0 corner: 800@577
component = a ScrollWrapper on: a VisualizationHolder
widgetFlags = 11
policy = nil
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Temporaries:
clipBox = 1@1 corner: 785@562
i = 1
component = a BorderedWrapper on: a ScrollWrapper on: a
VisualizationHolder
Context PC = 30
----------------------------------------------------------------------
BoundedWrapper>>displayOn:
Receiver:
a BoundedWrapper
Instance Variables:
container = a SpecWrapper on: a BoundedWrapper on: a BorderDecorator
eventHandlers = nil
properties = nil
component = a BorderDecorator
origin = 0@0
layout = a LayoutFrame
extent = 800@577
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Context PC = 14
----------------------------------------------------------------------
SpecWrapper(Wrapper)>>displayOn:
Receiver:
a SpecWrapper
Instance Variables:
container = a CompositePart
eventHandlers = nil
properties = nil
component = a BoundedWrapper on: a BorderDecorator
widget = a VisualizationHolder
widgetState = a WidgetState
effectivelyVisible = true
decorator = a BorderDecorator
dependents = nil
dropTarget = nil
spec = an ArbitraryComponentSpec
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Context PC = 7
----------------------------------------------------------------------
SpecWrapper(WidgetWrapper)>>displayOn:
Receiver:
a SpecWrapper
Instance Variables:
container = a CompositePart
eventHandlers = nil
properties = nil
component = a BoundedWrapper on: a BorderDecorator
widget = a VisualizationHolder
widgetState = a WidgetState
effectivelyVisible = true
decorator = a BorderDecorator
dependents = nil
dropTarget = nil
spec = an ArbitraryComponentSpec
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Temporaries:
lp = nil
Context PC = 26
----------------------------------------------------------------------
CompositePart>>displayOn:
Receiver:
a CompositePart
Instance Variables:
container = an ApplicationWindow 495098176
eventHandlers = nil
properties = nil
components = an OrderedCollection[2]
preferredBounds = 0@0 corner: 800@600
Arguments:
aGraphicsContext = a ScreenGraphicsContext
Temporaries:
clipBox = 1@1 corner: 785@562
i = 2
component = a SpecWrapper on: a BoundedWrapper on: a BorderDecorator
Context PC = 30
----------------------------------------------------------------------
WindowDisplayPolicy>>displayDamageList:in:
Receiver:
a WindowDisplayPolicy
Arguments:
aDamageList = an Array[4]
aWindow = an ApplicationWindow 495098176
Temporaries:
windowGraphicsContext = a ScreenGraphicsContext
windowVisual = a CompositePart
i = 5
i = 4
Context PC = 73
----------------------------------------------------------------------
ApplicationWindow(ScheduledWindow)>>displayDamageEvent:
Receiver:
an ApplicationWindow
Instance Variables:
handle = a GraphicsHandle(495098176)
width = 800
height = 600
background = a DevicePaint
inputOrigin = 320@150
creationOrigin = 320@150
sensor = an EventSensor
iconic = false
windowType = #normal
effectiveWindowType = nil
statusLineHeight = 0
allowsStatusLine = true
mapped = true
eventHandlers = nil
windowManager = a WindowManager
label = 'Visualization viewer'
icon = an Icon
minimumSize = 20@20
maximumSize = 0@0
component = a CompositePart
lookPreferences = nil
paintPreferences = nil
edgeDecorationPolicy = a MacOSXBorderDecorationPolicy
widgetPolicy = a MacOSXWidgetPolicy
controller = an ApplicationStandardSystemController
model = a VisualizationUI
damageRepairPolicy = a WindowDisplayPolicy
masterWindow = nil
keyboardProcessor = a KeyboardProcessor
application = nil
sendWindowEvents = nil
receiveWindowEvents = nil
windowEventBlock = nil
activationNotification = true
isEventDriven = nil
toolbarVisible = true
dropTarget = nil
dragDropInProgress = nil
dragDropTracker = nil
Arguments:
aDamageList = an Array[4]
Context PC = 7
----------------------------------------------------------------------
ApplicationWindow(ScheduledWindow)>>checkForEvents
Receiver:
an ApplicationWindow
Instance Variables:
handle = a GraphicsHandle(495098176)
width = 800
height = 600
background = a DevicePaint
inputOrigin = 320@150
creationOrigin = 320@150
sensor = an EventSensor
iconic = false
windowType = #normal
effectiveWindowType = nil
statusLineHeight = 0
allowsStatusLine = true
mapped = true
eventHandlers = nil
windowManager = a WindowManager
label = 'Visualization viewer'
icon = an Icon
minimumSize = 20@20
maximumSize = 0@0
component = a CompositePart
lookPreferences = nil
paintPreferences = nil
edgeDecorationPolicy = a MacOSXBorderDecorationPolicy
widgetPolicy = a MacOSXWidgetPolicy
controller = an ApplicationStandardSystemController
model = a VisualizationUI
damageRepairPolicy = a WindowDisplayPolicy
masterWindow = nil
keyboardProcessor = a KeyboardProcessor
application = nil
sendWindowEvents = nil
receiveWindowEvents = nil
windowEventBlock = nil
activationNotification = true
isEventDriven = nil
toolbarVisible = true
dropTarget = nil
dragDropInProgress = nil
dragDropTracker = nil
Temporaries:
damage = an Array[4]
Context PC = 33
----------------------------------------------------------------------
optimized [] in [] in WindowManager>>repairDamagesExcept:
Receiver:
an UndefinedObject
Arguments:
w = an ApplicationWindow 495098176
Temporaries:
.obj = nil
Context PC = 10
----------------------------------------------------------------------
OrderedCollection>>do:
Receiver:
an OrderedCollection
Instance Variables:
firstIndex = 4
lastIndex = 5
Arguments:
aBlock = BlockClosure [] in [] in WindowManager>>repairDamagesExcept:
Temporaries:
index = 4
Context PC = 17
----------------------------------------------------------------------
optimized [] in WindowManager>>repairDamagesExcept:
Receiver:
an UndefinedObject
Temporaries:
.super = a WindowManager
.obj = nil
Context PC = 13
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in WindowManager>>repairDamagesExcept:
outerContext = nil
copiedValues = an Array[2]
Arguments:
anExceptionSelector = ClosedWindowNotification
handlerBlock = BlockClosure [] in WindowManager>>repairDamagesExcept:
Context PC = 18
----------------------------------------------------------------------
WindowManager>>repairDamagesExcept:
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = nil
interruptLock = false
outstandingMetaOrDamage = false
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Arguments:
obj = nil
Context PC = 16
----------------------------------------------------------------------
WindowManager>>repairDamages
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = nil
interruptLock = false
outstandingMetaOrDamage = false
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Context PC = 5
----------------------------------------------------------------------
WindowManager>>processNextEvent
Receiver:
a WindowManager
Instance Variables:
windows = an OrderedCollection[2]
activeController = nil
interruptLock = false
outstandingMetaOrDamage = false
openInProgress = false
eventQueue = an EventQueue
baseProcess = a Process in Semaphore>>wait
dontFilterEvents = false
Temporaries:
event = a KeyPressedEvent
Context PC = 12
----------------------------------------------------------------------
optimized [] in [] in WindowManager>>newProcess
Receiver:
an UndefinedObject
Temporaries:
.super = a WindowManager
Context PC = 13
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in [] in WindowManager>>newProcess
outerContext = nil
copiedValues = a WindowManager
Arguments:
anExceptionSelector = TerminateException
handlerBlock = BlockClosure [] in [] in WindowManager>>newProcess
Context PC = 18
----------------------------------------------------------------------
optimized [] in WindowManager>>newProcess
Receiver:
an UndefinedObject
Temporaries:
.super = a WindowManager
Context PC = 15
----------------------------------------------------------------------
BlockClosure>>on:do:
Receiver:
a BlockClosure
Instance Variables:
method = CompiledBlock [] in WindowManager>>newProcess
outerContext = nil
copiedValues = a WindowManager
Arguments:
anExceptionSelector = TerminateException
handlerBlock = BlockClosure [] in [] in Process
class>>forBlock:priority:
Context PC = 18
----------------------------------------------------------------------
optimized [] in Process class>>forBlock:priority:
Receiver:
an UndefinedObject
Temporaries:
.aBlock = BlockClosure [] in WindowManager>>newProcess
Context PC = 9
Thanks,
Mircea.
14 years, 4 months
eyesee
by Liliana Ivan
Hi.
My questions:
1. If I only want to use EyeSee graphing tool for a project, what is the
minimal set of parcels I need to load and is there any specific setup?
2. I installed Moose off the repository by loading the MooseSetup
parcel; but when I try to run some of the EyeSee samples eg:
Examples>>lineDiagram (evaluate self new lineDiagram)
>>lineBarCompositeDiagramWithSameAxis
I get the error Message not understood: #width on a SmallInteger (each
width; where each is integer 3346) called from
setlabelDistanceFromAxisCalculation: aDiagram on ValueLabelDecorator
I get the same error from the image I also downloaded from the web site
(moose-suite-2008-11-25.zip).
Should I load a different version of parcels; or is there something
missing?
Thanks
Liliana
14 years, 4 months
about Smalltalk::Class
by Stéphane Ducasse
Hi guys
do we have a displayString in moose?
Because I'm fedup to see Smalltalk::Morph..... all the times
we have moosePrintOn: so I was in the mood to skip 'Smalltalk' when
the parent namespace is smalltalk.
Stef
14 years, 4 months
in the mooseBrowser
by stephane ducasse
how can I
- remove a model
- save
- ...
when I click on the project list I get a walback scanTakesNotes
Stef
14 years, 4 months
Re: [Pharo-project] Smalltalk -> MSE translator
by Stéphane Ducasse
There is a prelimary one I did some years ago to extract limited
information out of MC loaded code.
MSEExporter on SqueakSource.
Stef
On May 6, 2009, at 8:23 PM, Alexandre Bergel wrote:
> Dear All,
>
> Is there a Smalltalk -> MSE translator? Probably not since there is an
> importer. I am just wondering.
>
> Cheers,
> Alexandre
> --
> _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
> Alexandre Bergel http://www.bergel.eu
> ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
>
>
>
>
>
>
> _______________________________________________
> Pharo-project mailing list
> Pharo-project(a)lists.gforge.inria.fr
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
14 years, 4 months
3.2.149.soulintegration
by Tudor Girba
Hi,
I marked the MooseDevelopment 3.2.149.soulintegration as broken
because it has unloadable definitions.
With this occasion I looked at the code and I could not really
understand the changes. Especially adding a "version" instance
variable in FAMIXModelRoot does not sound right.
If this is something needed by SOUL, then you want to use the built-in
attribute dictionary:
self __state__ attributeGet: #YOUR_VAR default: VALUE
self __state__ attributeSet: #YOUR_VAR value: VALUE
Also, the code added in the constructor of EntityVersion makes
reference to an inexistent method (perhaps a SOUL method?):
aVersionEntity shouldStoreVersion ifTrue:[ aVersionEntity version:
version ].
Cheers,
Doru
--
www.tudorgirba.com
"Every now and then stop and ask yourself if the war you're fighting
is the right one."
14 years, 4 months
