- Pharo-dev - lists.pharo.org

[Pharo-project] [NativeBoost] calls to munmap always fail on OS X 10.8.2
by Max Leske Nov. 19, 2012

Nov. 19, 2012

Hi When NativeBoost tries to call munmap to free a page (happens because a pointer I freed was the last reserved one in that page) it will throw a NBFFICalloutError (every time) because (I think) it can't find the symbol. I have absolutely no clue how to fix this so I'm in need of help. System: OS X 10.8.2 Image: 1.4 NativeBoost-Core: CamilloBruni.80 (Installed by using the latest NBInstaller) Cheers, Max Here's the stack: 15 November 2012 5:04:23.895 pm VM: Mac OS - intel - 1082 - NBCoInterpreter NativeBoost-CogPlugin-IgorStasenko.14 uuid: da3a649c-e2b2-bd4c-aa2f-9c2ebdb2658a Oct 26 2012, StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.164 uuid: d77dee73-00f5-4d00-847b-00646b08329d Oct 26 2012, git://gitorious.org/cogvm/blessed.git Commit: 48af8595004fd0ec3a3ac6d44c3d7516a87981ca Date: 2012-10-24 16:56:20 +0200 By: Igor Stasenko <siguctua(a)gmail.com> Jenkins build #131 Image: Pharo1.4 [Latest update: #14457] NBFFICallout class>>signalError: Receiver: NBFFICallout Arguments and temporary variables: errorCode: 1 Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: Receiver: NBFFICallout Arguments and temporary variables: aContext: NativeBoostMac32(NativeBoost)>>bootstrapLoadSymbol:ofLength:fromModul...etc... aBlock: [:gen | gen useEmitCall; sender: sender; parseOptions: anOptions; cdecl...etc... method: (NativeBoost>>#bootstrapLoadSymbol:ofLength:fromModule:into: "a Compile...etc... lastError: 1 Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NBFFICallout class>>cdecl:emitCall:options: Receiver: NBFFICallout Arguments and temporary variables: functionSpec: #(#NBBootstrapUlong #(#byte #* #symbolName #, #long #symbolLen #,...etc... aCallEmittingBlock: [:gen | gen proxy callFn: #ioLoadSymbol:OfLength:FromModule...etc... anOptions: #(#- #optDirectProxyFnAddress #optAllowExternalAddressPtr) sender: NativeBoostMac32(NativeBoost)>>bootstrapLoadSymbol:ofLength:fromModule:...etc... Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NativeBoostMac32(NativeBoost)>>bootstrapLoadSymbol:ofLength:fromModule:into: Receiver: a NativeBoostMac32 Arguments and temporary variables: symbolName: 'munmap' symbolLen: 6 moduleHandle: -2 returnValueBuffer: #[0 0 0 0 0 0 0 0] Receiver's instance variables: bootstrapping: false insideCallback: nil callbackCounterAddr: @ 16r5F74000 extraRootsRegistry: a NBExtraRootsRegistry rootsCell: @ 16r5F7402A gateFunction: @ 16r5F74004 heap: a NBMacExternalHeapManager NativeBoostMac32(NativeBoost)>>loadSymbol:fromModule: Receiver: a NativeBoostMac32 Arguments and temporary variables: aSymbolName: 'munmap' moduleName: -2 bytes: #[0 0 0 0 0 0 0 0] module: -2 handle: nil Receiver's instance variables: bootstrapping: false insideCallback: nil callbackCounterAddr: @ 16r5F74000 extraRootsRegistry: a NBExtraRootsRegistry rootsCell: @ 16r5F7402A gateFunction: @ 16r5F74004 heap: a NBMacExternalHeapManager NativeBoostMac32(NativeBoostLinux32)>>loadSymbol:fromModule: Receiver: a NativeBoostMac32 Arguments and temporary variables: aSymbolName: 'munmap' moduleName: -2 Receiver's instance variables: bootstrapping: false insideCallback: nil callbackCounterAddr: @ 16r5F74000 extraRootsRegistry: a NBExtraRootsRegistry rootsCell: @ 16r5F7402A gateFunction: @ 16r5F74004 heap: a NBMacExternalHeapManager NativeBoost class>>loadSymbol:fromModule: Receiver: NativeBoost Arguments and temporary variables: aSymbolName: 'munmap' moduleName: -2 Receiver's instance variables: superclass: Object methodDict: a MethodDictionary(#CLibrary->(NativeBoost>>#CLibrary "a CompiledMe...etc... format: 142 instanceVariables: #('bootstrapping' 'insideCallback' 'callbackCounterAddr' 'ex...etc... organization: ('retrieving symbols' CLibrary VMModule ioLoadFunction:from: ioLo...etc... subclasses: {NativeBoostLinux32. NativeBoostWin32} name: #NativeBoost classPool: a Dictionary(#Current->a NativeBoostMac32 #NBAnnouncer->an Announcer...etc... sharedPools: an OrderedCollection(AJx86Registers NativeBoostConstants) environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core' traitComposition: {} localSelectors: nil NBMacExternalHeapManager class(Object)>>nbGetSymbolAddress:module: Receiver: NBMacExternalHeapManager Arguments and temporary variables: aName: 'munmap' aModuleNameOrHandle: -2 addr: nil Receiver's instance variables: superclass: NBExternalHeapManager methodDict: a MethodDictionary(#mapFlags->(NBMacExternalHeapManager>>#mapFlags ...etc... format: 138 instanceVariables: nil organization: ('as yet unclassified' mapFlags mmapLength:prot:flags:into: primA...etc... subclasses: nil name: #NBMacExternalHeapManager classPool: nil sharedPools: an OrderedCollection(NBMacConstants) environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Mac' traitComposition: {} localSelectors: nil [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec functionName module: aModuleNameOrHandle. fnAddress ifNil: [self error: 'function unavailable']. self optMayGC ifTrue: [asm push: fnAddress asUImm32; mov: NativeBoost callgateFunctionAddress asUImm32 to: EAX; call: EAX] ifFalse: [asm mov: fnAddress asUImm32 to: EAX; call: EAX]] in NBFFICallout>>generateCall:module: Receiver: a NBFFICallout Arguments and temporary variables: aModuleNameOrHandle: a NBFFICallout fnAddress: -2 gen: #(nil) Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo BlockClosure>>valueWithPossibleArgs: Receiver: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec functionName module: aModuleNam...etc... Arguments and temporary variables: anArray: an Array(a NBFFICallout a NBInterpreterProxy an AJx86Assembler) Receiver's instance variables: outerContext: NBFFICallout>>generateCall:module: startpc: 91 numArgs: 1 [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]] in [:call | self optNoAlignment ifTrue: [call alignment: 1]. self pushArguments. coercionMayFail ifTrue: [proxy ifFailedJumpTo: self failedLabel]. asm decorateWith: 'FFI: performing a call' during: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]]] in NBFFICallout>>generateInstructions: Receiver: a NBFFICallout Arguments and temporary variables: aFunctionBodyBlock: an AJCdeclCallInfo call: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec functionName m...etc... Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo BlockClosure>>ensure: Receiver: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [...etc... Arguments and temporary variables: aBlock: [level := level - 1. self addInstruction: (AJInstructionDecoration n...etc... complete: nil returnValue: nil Receiver's instance variables: outerContext: [:call | self optNoAlignment ifTrue: [call alignment: 1]. sel...etc... startpc: 155 numArgs: 0 AJx86Assembler>>decorateWith:during: Receiver: an AJx86Assembler Arguments and temporary variables: annotation: 'FFI: performing a call' aBlock: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self o...etc... Receiver's instance variables: instructions: <<error during printing>> [:call | self optNoAlignment ifTrue: [call alignment: 1]. self pushArguments. coercionMayFail ifTrue: [proxy ifFailedJumpTo: self failedLabel]. asm decorateWith: 'FFI: performing a call' during: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]]] in NBFFICallout>>generateInstructions: Receiver: a NBFFICallout Arguments and temporary variables: aFunctionBodyBlock: an AJCdeclCallInfo call: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec functionName m...etc... Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo AJx86Assembler>>performingCall:in: Receiver: an AJx86Assembler Arguments and temporary variables: ci: an AJCdeclCallInfo aBlock: [:call | self optNoAlignment ifTrue: [call alignment: 1]. self push...etc... Receiver's instance variables: instructions: <<error during printing>> NBFFICallout>>foreignCall: Receiver: a NBFFICallout Arguments and temporary variables: aBlock: [:call | self optNoAlignment ifTrue: [call alignment: 1]. self push...etc... Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo NBFFICallout>>generateInstructions: Receiver: a NBFFICallout Arguments and temporary variables: aFunctionBodyBlock: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec ...etc... instructions: nil Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo NBFFICallout>>generate: Receiver: a NBFFICallout Arguments and temporary variables: aFunctionBodyBlock: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec ...etc... generatedCode: nil Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo NBFFICallout>>generateCall:module: Receiver: a NBFFICallout Arguments and temporary variables: functionSpec: #(#int #munmap #(#uint #addr #, #ulong #len)) aModuleNameOrHandle: -2 fnAddress: #(nil) Receiver's instance variables: asm: an AJx86Assembler proxy: a NBInterpreterProxy options: a Set(#optCdecl #optAllowByteArraysPtr #optUseStackPointer #optReturnP...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... fnSpec: a NBFnSpec requestor: NBMacExternalHeapManager methodArgs: an OrderedCollection('addr' 'len') coercionMayFail: true callInfo: an AJCdeclCallInfo [:gen | gen sender: sender; cdecl; generateCall: functionSpec module: aModuleName] in NBFFICallout class>>cdecl:module: Receiver: NBFFICallout Arguments and temporary variables: functionSpec: a NBFFICallout aModuleName: #(#int #munmap #(#uint #addr #, #ulong #len)) sender: -2 gen: NBMacExternalHeapManager>>unmap:length: Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil [bytes := aBlock value: (self newForMethod: method)] in NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: Receiver: NBFFICallout Arguments and temporary variables: aBlock: [:gen | gen sender: sender; cdecl; generateCall: functionSpec mod...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... bytes: #(nil) Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil BlockClosure>>on:do: Receiver: [bytes := aBlock value: (self newForMethod: method)] Arguments and temporary variables: exception: NBRecursionDetect handlerAction: [:ex | ex check: aMethod] handlerActive: true Receiver's instance variables: outerContext: NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry:...etc... startpc: 96 numArgs: 0 NBRecursionDetect class>>in:during: Receiver: NBRecursionDetect Arguments and temporary variables: aMethod: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)...etc... aBlock: [bytes := aBlock value: (self newForMethod: method)] Receiver's instance variables: superclass: Notification methodDict: a MethodDictionary(#check:->(NBRecursionDetect>>#check: "a Compiled...etc... format: 144 instanceVariables: #('method') organization: ('as yet unclassified' check: defaultAction method signalForMetho...etc... subclasses: nil name: #NBRecursionDetect classPool: nil sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-Errors' traitComposition: {} localSelectors: nil NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: Receiver: NBFFICallout Arguments and temporary variables: aBlock: [:gen | gen sender: sender; cdecl; generateCall: functionSpec mod...etc... retryCtx: NBMacExternalHeapManager>>unmap:length: method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... newMethod: nil args: nil bytes: #(nil) Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: Receiver: NBFFICallout Arguments and temporary variables: aContext: NBMacExternalHeapManager>>unmap:length: aBlock: [:gen | gen sender: sender; cdecl; generateCall: functionSpec mod...etc... method: (NBMacExternalHeapManager>>#unmap:length: "a CompiledMethod(355205120)"...etc... lastError: 502 Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NBFFICallout class>>cdecl:module: Receiver: NBFFICallout Arguments and temporary variables: functionSpec: #(#int #munmap #(#uint #addr #, #ulong #len)) aModuleName: -2 sender: NBMacExternalHeapManager>>unmap:length: Receiver's instance variables: superclass: NBNativeCodeGen methodDict: a MethodDictionary(#aliasForType:->(NBFFICallout>>#aliasForType: "a...etc... format: 148 instanceVariables: #('fnSpec' 'requestor' 'methodArgs' 'coercionMayFail' 'callI...etc... organization: ('type aliases' aliasForType:) ('accessing' anonSpec: callType: c...etc... subclasses: {NBNativeFunctionGen} name: #NBFFICallout classPool: a Dictionary(#CustomErrorCodes->a Dictionary(600->'An instance of NB...etc... sharedPools: nil environment: a SystemDictionary(lots of globals) category: #'NativeBoost-Core-FFI' traitComposition: {} localSelectors: nil NBMacExternalHeapManager>>unmap:length: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: addr: 7380992 len: 32768 errorCode: 502 Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() NBMacExternalHeapManager>>primFreePage: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: aMemoryPage: a NBMemoryPage res: nil Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() NBMacExternalHeapManager(NBExternalHeapManager)>>freePage: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: aMemoryPage: a NBMemoryPage Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() [:page | page length = aMemoryBlock length ifTrue: [self freePage: page. ^ true]. nil] in NBMacExternalHeapManager(NBExternalHeapManager)>>checkForFreePage: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: aMemoryBlock: a NBMemoryPage page: a NBMemoryBlock( @ 16r70A000, 32768, free) Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() BlockClosure>>cull: Receiver: [:page | page length = aMemoryBlock length ifTrue: [self freePage: page. ^ true]. n...etc... Arguments and temporary variables: anArg: a NBMemoryPage Receiver's instance variables: outerContext: NBMacExternalHeapManager(NBExternalHeapManager)>>checkForFreePage...etc... startpc: 41 numArgs: 1 Dictionary>>at:ifPresent: Receiver: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) Arguments and temporary variables: key: 7380992 aBlock: [:page | page length = aMemoryBlock length ifTrue: [self freePage: p...etc... assoc: 7380992->a NBMemoryPage Receiver's instance variables: tally: 2 array: an Array(nil 100089856->a NBMemoryPage nil nil 24981504->a NBMemoryPage)...etc... NBMacExternalHeapManager(NBExternalHeapManager)>>checkForFreePage: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: aMemoryBlock: a NBMemoryBlock( @ 16r70A000, 32768, free) Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() NBMemoryBlock>>makeFreeFor: Receiver: a NBMemoryBlock( @ 16r70A030, 32720, free) Arguments and temporary variables: heapManager: a NBMacExternalHeapManager Receiver's instance variables: left: a NBMemoryBlock( @ 16r70A000, 32768, free) right: nil address: 7381040 length: 32720 free: true [| block | block := reservedBlocks removeKey: address ifAbsent: [self error: 'Unable to find a memory block with given address']. block makeFreeFor: self] in NBMacExternalHeapManager(NBExternalHeapManager)>>free: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: address: 7381040 block: a NBMemoryBlock( @ 16r70A030, 32720, free) Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() [caught := true. self wait. blockValue := mutuallyExcludedBlock value] in Semaphore>>critical: Receiver: a Semaphore() Arguments and temporary variables: <<error during printing> Receiver's instance variables: firstLink: nil lastLink: nil excessSignals: 0 BlockClosure>>ensure: Receiver: [caught := true. self wait. blockValue := mutuallyExcludedBlock value] Arguments and temporary variables: aBlock: [caught ifTrue: [self signal]] complete: nil returnValue: nil Receiver's instance variables: outerContext: Semaphore>>critical: startpc: 42 numArgs: 0 Semaphore>>critical: Receiver: a Semaphore() Arguments and temporary variables: <<error during printing> Receiver's instance variables: firstLink: nil lastLink: nil excessSignals: 0 NBMacExternalHeapManager(NBExternalHeapManager)>>free: Receiver: a NBMacExternalHeapManager Arguments and temporary variables: address: 7381040 Receiver's instance variables: pages: a Dictionary(24981504->a NBMemoryPage 100089856->a NBMemoryPage ) freeBlocks: an IdentitySet(a NBMemoryBlock( @ 16r17D302E, 17, free) a NBMemoryB...etc... reservedBlocks: a Dictionary(24981504->a NBMemoryBlock( @ 16r17D3000, 38) 24981...etc... sema: a Semaphore() --- The full stack --- NBFFICallout class>>signalError: NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: NBFFICallout class>>cdecl:emitCall:options: NativeBoostMac32(NativeBoost)>>bootstrapLoadSymbol:ofLength:fromModule:into: NativeBoostMac32(NativeBoost)>>loadSymbol:fromModule: NativeBoostMac32(NativeBoostLinux32)>>loadSymbol:fromModule: NativeBoost class>>loadSymbol:fromModule: NBMacExternalHeapManager class(Object)>>nbGetSymbolAddress:module: [:gen | fnAddress := requestor nbGetSymbolAddress: fnSpec functionName module: aModuleNameOrHandle. fnAddress ifNil: [self error: 'function unavailable']. self optMayGC ifTrue: [asm push: fnAddress asUImm32; mov: NativeBoost callgateFunctionAddress asUImm32 to: EAX; call: EAX] ifFalse: [asm mov: fnAddress asUImm32 to: EAX; call: EAX]] in NBFFICallout>>generateCall:module: BlockClosure>>valueWithPossibleArgs: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]] in [:call | self optNoAlignment ifTrue: [call alignment: 1]. self pushArguments. coercionMayFail ifTrue: [proxy ifFailedJumpTo: self failedLabel]. asm decorateWith: 'FFI: performing a call' during: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]]] in NBFFICallout>>generateInstructions: BlockClosure>>ensure: AJx86Assembler>>decorateWith:during: [:call | self optNoAlignment ifTrue: [call alignment: 1]. self pushArguments. coercionMayFail ifTrue: [proxy ifFailedJumpTo: self failedLabel]. asm decorateWith: 'FFI: performing a call' during: [aFunctionBodyBlock valueWithPossibleArgs: {self. proxy. asm}. (self optEmitCall or: [self optNoCleanup]) ifTrue: [call disableCleanup]]] in NBFFICallout>>generateInstructions: AJx86Assembler>>performingCall:in: NBFFICallout>>foreignCall: NBFFICallout>>generateInstructions: NBFFICallout>>generate: NBFFICallout>>generateCall:module: [:gen | gen sender: sender; cdecl; generateCall: functionSpec module: aModuleName] in NBFFICallout class>>cdecl:module: [bytes := aBlock value: (self newForMethod: method)] in NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: BlockClosure>>on:do: NBRecursionDetect class>>in:during: NBFFICallout class(NBNativeCodeGen class)>>generateCode:andRetry: NBFFICallout class(NBNativeCodeGen class)>>handleFailureIn:nativeCode: NBFFICallout class>>cdecl:module: NBMacExternalHeapManager>>unmap:length: NBMacExternalHeapManager>>primFreePage: NBMacExternalHeapManager(NBExternalHeapManager)>>freePage: [:page | page length = aMemoryBlock length ifTrue: [self freePage: page. ^ true]. nil] in NBMacExternalHeapManager(NBExternalHeapManager)>>checkForFreePage: BlockClosure>>cull: Dictionary>>at:ifPresent: NBMacExternalHeapManager(NBExternalHeapManager)>>checkForFreePage: NBMemoryBlock>>makeFreeFor: [| block | block := reservedBlocks removeKey: address ifAbsent: [self error: 'Unable to find a memory block with given address']. block makeFreeFor: self] in NBMacExternalHeapManager(NBExternalHeapManager)>>free: [caught := true. self wait. blockValue := mutuallyExcludedBlock value] in Semaphore>>critical: BlockClosure>>ensure: Semaphore>>critical: NBMacExternalHeapManager(NBExternalHeapManager)>>free: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - NativeBoostMac32(NativeBoostLinux32)>>free: NativeBoost class>>free: NBExternalAddress>>free [:pointer | pointer value free] in LimboCommand>>freePointers Set>>do: LimboCommand>>freePointers [self freePointers] in LimboCommand>>run BlockClosure>>ensure: LimboCommand>>run Limbo>>run:arguments: Limbo>>runSh: Limbo class>>runSh: [limbo := Limbo runSh: '/bin/echo ' , arg] in LimboTest>>testShellCommandWithNewLines [aBlock value. false] in LimboTest(TestCase)>>executeShould:inScopeOf: BlockClosure>>on:do: LimboTest(TestCase)>>executeShould:inScopeOf: LimboTest(TestCase)>>shouldnt:raise: LimboTest>>testShellCommandWithNewLines LimboTest(TestCase)>>performTest [self setUp. self performTest] in LimboTest(TestCase)>>runCase BlockClosure>>ensure: LimboTest(TestCase)>>runCase [(self class selector: testSelector) runCase] in LimboTest(TestCase)>>debug BlockClosure>>ensure: LimboTest(TestCase)>>debug OBCmdRunTests>>execute [:each | (each isActive and: [each isEnabled]) ifTrue: [each execute. ^ true]. nil] in OBNodeCommandScan(OBCommandScan)>>processKeystroke:withNode:for: OrderedCollection>>do: OBNodeCommandScan(OBCommandScan)>>processKeystroke:withNode:for: [:each | (scan processKeystroke: aCharacter asKeystroke withNode: each for: self) ifTrue: [^ self]. nil] in OBColumn>>keystroke:from: OrderedCollection>>reverseDo: OBColumn>>keystroke:from: OBPluggableListMorph(PluggableListMorph)>>modifierKeyPressed: OBPluggableListMorph(PluggableListMorph)>>keyStroke: OBPluggableListMorph(Morph)>>handleKeystroke: KeyboardEvent>>sentTo: OBPluggableListMorph(Morph)>>handleEvent: MorphicEventDispatcher>>dispatchDefault:with: MorphicEventDispatcher>>dispatchEvent:with: OBPluggableListMorph(Morph)>>processEvent:using: OBPluggableListMorph(Morph)>>processEvent: OBPluggableListMorph(PluggableListMorph)>>handleFocusEvent: [ActiveHand := self. ActiveEvent := anEvent. result := focusHolder handleFocusEvent: (anEvent transformedBy: (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear: [aBlock value] in PasteUpMorph>>becomeActiveDuring: BlockClosure>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents [:h | ActiveHand := h. h processEvents. ActiveHand := nil] in WorldState>>doOneCycleNowFor: Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [[World doOneCycle. Processor yield. false] whileFalse. nil] in MorphicUIManager>>spawnNewProcess [self value. Processor terminateActive] in BlockClosure>>newProcess

3 10

[Pharo-project] [update 2.0] #20409
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

20409 ----- Issue 7000: Cleanup unused code in BitBlt class http://code.google.com/p/pharo/issues/detail?id=7000 Issue 7003: use ProvideAnswerNotification for DummyUIManager requests http://code.google.com/p/pharo/issues/detail?id=7003 Issue 6956: Some Ring tests are dependent on Monticello http://code.google.com/p/pharo/issues/detail?id=6956 Diff information: http://ss3.gemstone.com/ss/Pharo20/UIManager-MarcusDenker.88.diff http://ss3.gemstone.com/ss/Pharo20/Ring-Tests-Monticello-MarcusDenker.8.diff http://ss3.gemstone.com/ss/Pharo20/Ring-Tests-Kernel-MarcusDenker.44.diff http://ss3.gemstone.com/ss/Pharo20/Ring-Tests-Containers-MarcusDenker.9.diff http://ss3.gemstone.com/ss/Pharo20/Graphics-Primitives-MarcusDenker.96.diff http://ss3.gemstone.com/ss/Pharo20/Graphics-Display Objects-MarcusDenker.94.diff -- Marcus Denker -- http://marcusdenker.de

2 1

[Pharo-project] [update 2.0] #20410
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

20410 ----- Issue 7005: overlapping packages UI and UI-Basic http://code.google.com/p/pharo/issues/detail?id=7005 Issue 7004: remove ChangeSorter from privCleanUnloadMethods http://code.google.com/p/pharo/issues/detail?id=7004 Issue 6992: #cleanUpForRelease breaks image http://code.google.com/p/pharo/issues/detail?id=6992 Diff information: http://ss3.gemstone.com/ss/Pharo20/Tools-MarcusDenker.986.diff http://ss3.gemstone.com/ss/Pharo20/System-Support-MarcusDenker.742.diff -- Marcus Denker -- http://marcusdenker.de

1 0

[Pharo-project] [Issues] Review needed
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

This issue needs to be reviewed: Issue 6996: SoundSystem cleanup http://code.google.com/p/pharo/issues/detail?id=6996 -- Marcus Denker -- http://marcusdenker.de

1 0

[Pharo-project] fOSSa 2012
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

Pharo will participate to the fourth edition of the fOSSa Conference taking place from December 4 to 6, 2012 in Lille (France). The aim of the fOSSa (Free Open Source Academia Conference) is to reaffirm the underlying values of Open Source software: innovation & research in software development. While the first edition aimed at providing valuable information on the Open Source model at large, the second edition focused specific key-aspects of FOSS such as tech innovation,upcoming issues & challenges in the open development context and how open activities, collaboration and knowledge sharing is beneficial to academia, education & industry. The third edition look at the future of Open Source (Eco system, Trends, new territories, etc). The fourth edition will address in an open-minded style about: - Digital Geographic Strategies & the Native Generation, - FLOSS History with the movie: "Revolution OSâ followed by a debate, - Open Art, collaboration between art & science, - Licenses in the real life: no lawyers speeches, only facts & return experience, - Workshops to learn how to develop code for debian, gnome, apache, robotics ROS ... And, of course the usual fOSSa topics (Education & Community management). There will be a Pharo Workshop Dec 5th. "What marks the difference between fOSSa and other events is the air that you breath there. An event organized by passionate people, with passionate attendees as well â¦ and great speakers. Every year you can get some presentations of greater international events in advance (I remember the year of Arduino, to give you an example).â -- Gabriele Ruffatti -- SpagoWorld Blog 2012. fOSSa days are open to everyone and registration is free ! more information @ http://fossa.inria.fr -- Marcus Denker -- http://marcusdenker.de

1 0

[Pharo-project] We crossed the 7000th issue!
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

We crossed the 7000 mark yesterday! 6000 was reached In May 31. And of the 7000, just 381 are not yet solved. http://code.google.com/p/pharo/issues/list?can=2 Marcus -- Marcus Denker -- http://marcusdenker.de

1 0

[Pharo-project] [update 2.0] #20408
by Marcus Denker Nov. 19, 2012

Nov. 19, 2012

20408 ----- Issue 7002: Remove old ChangeSorter implementation http://code.google.com/p/pharo/issues/detail?id=7002 Issue 7001: fix obsoleteReferences in Pharo Kernel http://code.google.com/p/pharo/issues/detail?id=7001 Issue 6999: cleaning a bit unused methods in DisplayObject hierarchy http://code.google.com/p/pharo/issues/detail?id=6999 Diff information: http://ss3.gemstone.com/ss/Pharo20/UI-Basic-MarcusDenker.20.diff http://ss3.gemstone.com/ss/Pharo20/UI-MarcusDenker.4.diff http://ss3.gemstone.com/ss/Pharo20/Tools-MarcusDenker.984.diff http://ss3.gemstone.com/ss/Pharo20/System-Support-MarcusDenker.741.diff http://ss3.gemstone.com/ss/Pharo20/Morphic-MarcusDenker.1289.diff http://ss3.gemstone.com/ss/Pharo20/Graphics-Files-MarcusDenker.35.diff http://ss3.gemstone.com/ss/Pharo20/Graphics-Display Objects-MarcusDenker.93.diff -- Marcus Denker -- http://marcusdenker.de

1 0

Nov. 19, 2012

While I love the idea of sharing the systemDictionary class binding in the method to gain immediate update in case of change I was questioning myself if we could not gain from not having (for example to get parametrized modules). The point is that we are not constantly changing classes especially when not programming but running program. So let us do some experiments: CompiledMethod allInstances size 58891 (CompiledMethod allInstances select: [:each | each classBinding value name = #Point]) size 100 [CompiledMethod allInstances select: [:each | each classBinding value name = #Point]] timeToRun 23 this is the best case since classBinding is at a fixed size now looking for any reference to Point (CompiledMethod allInstances select: [:cm | cm literals anySatisfy: [:each | each class = Association and: [each key = #Point ]]]) size 134 methods. [CompiledMethod allInstances select: [:cm | cm literals anySatisfy: [:each | each class = Association and: [each key = #Point ]]]] timeToRun 91 ms so it looks to me that this sharing is not something that we should not changed if needed. What do you think? Stef

7 9

[Pharo-project] traits file-in problem
by Pavel Krivanek Nov. 19, 2012

Nov. 19, 2012

Hi, if I file-out the category Tests-Traits-MOP to own *.st file and then try to load it into the Pharo Kernel, this test will fail because of this expression: self assert: (MOPTestClassA>>#c2) origin = Trait2. in this case it shows that the origin of MOPTestClassA>>#c2 is Trait3. The solution of this issue was to recompile the loaded classes. But it shows that the we miss some mechanism for preservation of system consistency when changing classes with traits. Cheers, -- Pavel

1 0

[Pharo-project] Support: Redline Smalltalk ...
by James Ladd Nov. 19, 2012

Nov. 19, 2012

Hey All, As you know I really love Smalltalk. So much so I have created a version of it that runs on the Java Virtual Machine. Please can you look at this campaign (http://www.indiegogo.com/smalltalk?a=1366536) and possibly support me raising some money to further develop Redline Smalltalk into a Version 1.0 product. If you hate this sort of post than apologies but you can't blame a developer for trying. Keep well, Rgs, James. http://redline.st

1 0