Re: Prolog pour 3.10

en fait il doit y avoir un problème avec le "source" des exemples en
Prolog... Quand je demande d'afficher par exemple
Doctor>>healthHistory:   j'ai un subscript out of bound. Ca ne vient
pas d'OB puisque j'ai le même problème avec les package browser.


8 June 2008 12:15:58 pm

VM: Win32 - a SmalltalkImage
Image: Squeak3.10.1 [latest update: #7175]

Array(Object)>>error:
        Receiver: #()
        Arguments and temporary variables:
                aString: 'subscript is out of bounds: 1'
        Receiver's instance variables:
#()

Array(Object)>>errorSubscriptBounds:
        Receiver: #()
        Arguments and temporary variables:
                index: 1
        Receiver's instance variables:
#()

Array(Object)>>at:
        Receiver: #()
        Arguments and temporary variables:
                index: 1
        Receiver's instance variables:
#()

Array(SequenceableCollection)>>replaceFrom:to:with:startingAt:
        Receiver: #(nil)
        Arguments and temporary variables:
                start: 1
                stop: 1
                replacement: #()
                repStart: 1
                index: 1
                repOff: 0
        Receiver's instance variables:
#(nil)


--- The full stack ---
Array(Object)>>error:
Array(Object)>>errorSubscriptBounds:
Array(Object)>>at:
Array(SequenceableCollection)>>replaceFrom:to:with:startingAt:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Array>>replaceFrom:to:with:startingAt:
Array(SequenceableCollection)>>copyFrom:to:
CompiledMethod>>replace:with:in:
CompiledMethod>>getSourceFor:in:
Doctor class(Behavior)>>sourceCodeAt:ifAbsent:
OBMethodNode>>source
OBMethodNode>>definition
OBMethodNode(OBCodeNode)>>getDefinition
OBEnhancementDefinitionPanel>>selectionChanged:
MessageSend>>valueWithArguments:
[] in ActionSequence>>valueWithArguments: {[:each | answer := each
valueWithArguments: anArray]}
ActionSequence(SequenceableCollection)>>do:
ActionSequence>>valueWithArguments:
[] in OBAnnouncer>>announce: {[:class :action | (ann isKindOf: class)
 ifTrue: [action     valueWithArgum...]}
[] in IdentityDictionary(Dictionary)>>keysAndValuesDo: {[:assoc |
aBlock value: assoc key value: assoc value]}
IdentityDictionary(Set)>>do:
IdentityDictionary(Dictionary)>>associationsDo:
IdentityDictionary(Dictionary)>>keysAndValuesDo:
OBAnnouncer>>announce:
OBEnhancementColumn(OBColumn)>>signalSelectionChanged
OBEnhancementColumn>>signalSelectionChanged
OBEnhancementColumn(OBColumn)>>selection:
OBEnhancementColumn>>selection:
OBPluggableListMorph(PluggableListMorph)>>changeModelSelection:
OBPluggableListMorph>>mouseUp:
OBPluggableListMorph(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
OBPluggableListMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
OBPluggableListMorph(Morph)>>processEvent:using:
OBPluggableListMorph(Morph)>>processEvent:
OBPluggableListMorph(PluggableListMorph)>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.
ActiveEvent := anEvent.  result := focusHolder     han...]}
[] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]}
BlockContext>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h
processEvents.  capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor
yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor terminateActive]}

_______________________________________________
Squeak-fr mailing list
Squeak-fr@...
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/squeak-fr