Vm-dev November 2022

vm-dev@lists.squeakfoundation.org

11 participants
72 discussions

[OpenSmalltalk/opensmalltalk-vm] 40ddfc: CogVM source as per VMMaker.oscog-eem.3263
by Eliot Miranda 05 Nov '22

05 Nov '22

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 40ddfcebaf2a75c6fc7e266145917ee99a2e60e3 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/40ddfcebaf2a75c6fc… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-04 (Fri, 04 Nov 2022) Changed paths: M platforms/win32/plugins/DropPlugin/sqWin32Drop.c M scripts/findUnofficialFiles M src/plugins/DESPlugin/DESPlugin.c M src/plugins/DSAPrims/DSAPrims.c M src/plugins/MD5Plugin/MD5Plugin.c M src/plugins/SHA2Plugin/SHA2Plugin.c M src/plugins/SqueakFFIPrims/ARM32FFIPlugin.c M src/plugins/SqueakFFIPrims/ARM64AppleFFIPlugin.c M src/plugins/SqueakFFIPrims/ARM64FFIPlugin.c M src/plugins/SqueakFFIPrims/IA32FFIPlugin.c M src/plugins/SqueakFFIPrims/RiscV64FFIPlugin.c M src/plugins/SqueakFFIPrims/X64SysVFFIPlugin.c M src/plugins/SqueakFFIPrims/X64Win64FFIPlugin.c M src/spur32.cog.lowcode/cogit.h M src/spur32.cog.lowcode/cogitARMv5.c M src/spur32.cog.lowcode/cogitIA32.c M src/spur32.cog.lowcode/cointerp.c M src/spur32.cog.lowcode/cointerp.h M src/spur32.cog.lowcode/gcc3x-cointerp.c M src/spur32.cog/cogit.h M src/spur32.cog/cogitARMv5.c M src/spur32.cog/cogitIA32.c M src/spur32.cog/cointerp.c M src/spur32.cog/cointerp.h M src/spur32.cog/cointerpmt.c M src/spur32.cog/cointerpmt.h M src/spur32.cog/gcc3x-cointerp.c M src/spur32.cog/gcc3x-cointerpmt.c M src/spur32.sista/cogit.h M src/spur32.sista/cogitARMv5.c M src/spur32.sista/cogitIA32.c M src/spur32.sista/cointerp.c M src/spur32.sista/cointerp.h M src/spur32.sista/gcc3x-cointerp.c M src/spur32.stack.lowcode/gcc3x-interp.c M src/spur32.stack.lowcode/interp.c M src/spur32.stack/gcc3x-interp.c M src/spur32.stack/interp.c M src/spur32.stack/validImage.c M src/spur64.cog.lowcode/cogit.h M src/spur64.cog.lowcode/cogitARMv8.c M src/spur64.cog.lowcode/cogitX64SysV.c M src/spur64.cog.lowcode/cogitX64WIN64.c M src/spur64.cog.lowcode/cointerp.c M src/spur64.cog.lowcode/cointerp.h M src/spur64.cog.lowcode/gcc3x-cointerp.c M src/spur64.cog/cogit.h M src/spur64.cog/cogitARMv8.c M src/spur64.cog/cogitX64SysV.c M src/spur64.cog/cogitX64WIN64.c M src/spur64.cog/cointerp.c M src/spur64.cog/cointerp.h M src/spur64.cog/cointerpmt.c M src/spur64.cog/cointerpmt.h M src/spur64.cog/gcc3x-cointerp.c M src/spur64.cog/gcc3x-cointerpmt.c M src/spur64.sista/cogit.h M src/spur64.sista/cogitARMv8.c M src/spur64.sista/cogitX64SysV.c M src/spur64.sista/cogitX64WIN64.c M src/spur64.sista/cointerp.c M src/spur64.sista/cointerp.h M src/spur64.sista/gcc3x-cointerp.c M src/spur64.stack.lowcode/gcc3x-interp.c M src/spur64.stack.lowcode/interp.c M src/spur64.stack/gcc3x-interp.c M src/spur64.stack/interp.c M src/spur64.stack/validImage.c M src/v3.cog/cogit.h M src/v3.cog/cogitARMv5.c M src/v3.cog/cogitIA32.c Log Message: ----------- CogVM source as per VMMaker.oscog-eem.3263 Fix a crash on ARMv8 when toggling fail/succeed primitives for mixed mode arithmetic. Improve dead code elimination, in particular for empty cppIf: constructs (i.e. ensureExecutableCodeZone in non-ARMv8 contexts). Fix a mistake in Cogit class>>defineAtCompileTime: which mistakenly assumed COGMTVM & Debug are defined at translation time. Make sure SpurMemoryManager class>>initializeWithOptions: defines SPURVM. Fix some comment typos. Tydy sqWin32Drop.c and make findUnofficialFiles more robust.

1 0

VM Maker: VMMaker.oscog-eem.3263.mcz
by commits＠source.squeak.org 05 Nov '22

05 Nov '22

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.3263.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.3263 Author: eem Time: 4 November 2022, 6:34:15.825583 pm UUID: c48ac37e-0ad2-430c-9c68-bd264949a3cc Ancestors: VMMaker.oscog-eem.3262 Improve dead code elimination, in particular for empty cppIf: constructs (i.e. ensureExecutableCodeZone in non-ARMv8 contexts). Fix a mistake in Cogit class>>defineAtCompileTime: which mistakenly assumed COGMTVM & Debug are defined at translation time. Make sure SpurMemoryManager class>>initializeWithOptions: defines SPURVM. =============== Diff against VMMaker.oscog-eem.3262 =============== Item was changed: ----- Method: CCodeGenerator>>generateInlineCppIfElse:asArgument:on:indent: (in category 'C translation') ----- generateInlineCppIfElse: msgNode asArgument: asArgument on: aStream indent: level "Generate the C code for this message onto the given stream." | lastCondition allAlternativesWereDeterminable expr pos directive index keywords | "Compile-time expansion for constants set in the options dictionary, e.g. to cut down on noise for MULTIPLEBYTECODESETS." + "First eliminate empty expansions, e.g. ensureExecutableCodeZone in non-ARMv8 Cogits" + (msgNode args allButFirst allSatisfy: #isNullCCode) ifTrue: + [^self]. + + "Then attempt to expand statically..." - "First attempt to expand statically..." allAlternativesWereDeterminable := true. lastCondition := nil. msgNode selector keywords "Deal with cppIf:ifTrue:, cppIf:ifTrue:ifFalse:, cppIf:ifTrue:cppIf:ifTrue:ifFalse:, etc" with: msgNode args do: [:keyword :node| | expansion | self assert: (#(cppIf: ifFalse: ifTrue:) includes: keyword). keyword = #cppIf: ifTrue: [(self nilOrBooleanConditionFor: node) ifNil: [allAlternativesWereDeterminable := false] ifNotNil: [:condition| lastCondition := condition]] ifFalse: [(allAlternativesWereDeterminable and: [lastCondition == (keyword = #ifTrue:)]) ifTrue: [asArgument ifTrue: "emitCCodeAsArgumentOn: doesn't indent, the code needs indenting if it takes multiple lines, so post-process." [expansion := String streamContents: [:s| node emitCCodeAsArgumentOn: s level: level generator: self]. aStream nextPutAll: ((expansion includes: Character cr) ifTrue: [(String streamContents: [:s| s position > 0 ifTrue: [s tab: level + 1]. node emitCCodeAsArgumentOn: s level: level generator: self]) copyReplaceAll: (String with: Character cr) with: (String with: Character cr), (String new: level + 1 withAll: Character tab)] ifFalse: [expansion])] ifFalse: [expansion := String streamContents: [:s| node emitCCodeOn: s level: level generator: self]. "Remove tabs from first line to avoid indenting a second time" expansion ifNotEmpty: [expansion := expansion allButFirst: (expansion findFirst: [:c| c ~~ Character tab]) - 1]. aStream nextPutAll: expansion]. ^self]]]. + allAlternativesWereDeterminable ifTrue: + [^self]. - self deny: allAlternativesWereDeterminable. "Expand for compile-time evaluation. Full #if ... #else..." directive := 'if'. index := 0. expr := nil. (keywords := msgNode selector keywords) "Deal with cppIf:ifTrue:, cppIf:ifFalse:, cppIf:ifTrue:ifFalse:, cppIf:ifTrue:cppIf:ifTrue:ifFalse:, etc" with: msgNode args do: [:keyword :node| | expansion | self assert: (#(cppIf: ifFalse: ifTrue:) includes: keyword). index := index + 1. keyword = #cppIf: ifTrue: [lastCondition := node. expansion := String streamContents: [:es| node emitCCodeAsArgumentOn: es level: 0 generator: self]. (keywords at: index + 1) = #ifFalse: ifTrue: [expansion := node isLeaf ifTrue: ['!!', expansion] ifFalse: ['!!(', expansion, ')']]. [expansion last isSeparator] whileTrue: [expansion := expansion allButLast]. aStream ensureCr; nextPut: $#; space: level * 2; nextPutAll: directive; space; nextPutAll: expansion; cr. directive := 'elif'. expr := (expr ifNil: [' // '] ifNotNil: [expr, ' || ']), expansion] ifFalse: [(keywords at: index - 1) = #cppIf: ifFalse: "this is an else..." [aStream ensureCr; nextPut: $#; next: level * 2 put: Character space; nextPutAll: 'else'. aStream position - pos >= 128 ifTrue: [aStream nextPutAll: expr]. aStream cr]. pos := aStream position. self with: lastCondition ifAppropriateSetTo: keyword = #ifTrue: do: [asArgument ifTrue: "emitCCodeAsArgumentOn: doesn't indent, the code needs indenting in this case, so post-process." [aStream nextPutAll: ((String streamContents: [:s| s next: level + 1 put: Character tab. node emitCCodeAsArgumentOn: s level: level generator: self]) copyReplaceAll: (String with: Character cr) with: (String with: Character cr), (String new: level + 1 withAll: Character tab))] ifFalse: [node emitCCodeOn: aStream level: level generator: self]]]]. aStream ensureCr; nextPut: $#; next: level * 2 put: Character space; nextPutAll: 'endif'. aStream position - pos >= 128 ifTrue: [aStream nextPutAll: expr]. aStream cr. asArgument ifTrue: [aStream next: level + 1 put: Character tab]! Item was changed: ----- Method: CCodeGenerator>>nilOrBooleanConditionFor: (in category 'utilities') ----- nilOrBooleanConditionFor: nodeOrNil "If nodeOrNil is one of the conditional sends for which we do translation-time dead code elimination (i.e. cppIf:ifTrue: et al or ifTrue: et al) and the conditional does evaluate to a translation-time boolean constant, answer that constant, otherwise answer nil. Used to prune dead code, either for code generaton or dead variable elimination." generateDeadCode ifTrue: [^nil]. nodeOrNil ifNil: [^nil]. + nodeOrNil isConstant ifTrue: + [^self nilOrBooleanConstantReceiverOf: nodeOrNil]. nodeOrNil isSend ifFalse: [^nil]. (#(ifTrue: ifFalse: ifTrue:ifFalse: ifFalse:ifTrue:) includes: nodeOrNil selector) ifTrue: [^self nilOrBooleanConstantReceiverOf: nodeOrNil receiver]. (#(and: or:) includes: nodeOrNil selector) ifTrue: [^self nilOrBooleanConstantReceiverOf: nodeOrNil]. (#(cppIf:ifTrue: cppIf:ifTrue:ifFalse:) includes: nodeOrNil selector) ifTrue: [| maybeName value | (vmClass notNil and: [nodeOrNil args first isConstant and: [(value := nodeOrNil args first value) isSymbol and: [(self defineAtCompileTime: value) not and: [(vmClass bindingOf: value) notNil]]]]) ifTrue: [self logger nextPutAll: 'Warning: cppIf: reference to '; store: value; nextPutAll: ' when variable of same name exists.'; cr]. maybeName := nodeOrNil args first isConstant ifTrue: [nodeOrNil args first nameOrValue]. ^(optionsDictionary notNil and: [nodeOrNil args first isConstant and: [(#(true false) includes: (optionsDictionary at: maybeName ifAbsent: [nil])) and: [(self defineAtCompileTime: maybeName) not]]]) ifTrue: [optionsDictionary at: nodeOrNil args first name]]. ^nil! Item was changed: ----- Method: Cogit class>>defineAtCompileTime: (in category 'C translation') ----- defineAtCompileTime: anObject "Override to define at translation time those variables that need to be defined at compile time only in plugins, but not in the main VM, because the VM generated is specific to these varables." anObject isSymbol ifFalse: [^false]. + (#(COGMTVM Debug) includes: anObject) ifTrue: + [^true]. + (#(STACKVM COGVM SPURVM) includes: anObject) ifTrue: - (#(STACKVM COGVM COGMTVM SPURVM) includes: anObject) ifTrue: [^false]. ^VMBasicConstants defineAtCompileTime: anObject! Item was changed: ----- Method: Cogit>>ensureExecutableCodeZone (in category 'memory access') ----- ensureExecutableCodeZone "On some platforms run-time calls may be required to enable execution and disable write-protect of the code zone. This is sequenced by ensuring that the code zone is executable most of the time. Note that any code space modification requires an icache flush (on processors with such an icache). Hence the least invasive time to ensure code is executable is post icache flush. Making sure code is writable can be done either before any bulk edit (e.g. code zone reclamation) or as part of any fine- grained code modification (e.g. setting an anonymous method's selector)." <inline: #always> self cppIf: #DUAL_MAPPED_CODE_ZONE ifFalse: [backEnd needsCodeZoneExecuteWriteSwitch ifTrue: [self cCode: nil inSmalltalk: [| currentAPISelector | "What's all this crap? We're trying to catch cases where ensureExecutableCodeZone is called without first calling ensureWritableCodeZone, and vice verse. But there are lots of exceptions where code is not modified but executability is turned on unnecessarily. The list of exceptions follows." currentAPISelector := self debugAPISelector. self assert: (codeZoneIsExecutableNotWritable not or: [currentAPISelector == #mapObjectReferencesInMachineCode: or: [currentAPISelector == #cogitPostGCAction: or: [currentAPISelector == #ceSICMiss: or: [currentAPISelector == #ceCPICMiss:receiver: or: [currentAPISelector == #unlinkSendsOf:isMNUSelector: or: [currentAPISelector == #unlinkSendsTo:andFreeIf: + or: [currentAPISelector == #unlinkSendsToMethodsSuchThat:AndFreeIf: + or: [currentAPISelector == #followMovableLiteralsAndUpdateYoungReferrers]]]]]]]])]. - or: [currentAPISelector == #followMovableLiteralsAndUpdateYoungReferrers]]]]]]])]. backEnd makeCodeZoneExecutable. self cCode: nil inSmalltalk: [codeZoneIsExecutableNotWritable := true. debugAPISelector := self debugAPISelector]]]! Item was changed: ----- Method: SpurMemoryManager class>>initializeWithOptions: (in category 'class initialization') ----- initializeWithOptions: optionsDictionary "SpurMemoryManager initializeWithOptions: Dictionary new" super initializeWithOptions: optionsDictionary. InitializationOptions + at: #SPURVM put: true; at: #Spur32BitMemoryManager ifAbsentPut: false; at: #Spur64BitMemoryManager ifAbsentPut: false. self initialize. self initBytesPerWord: (self == SpurMemoryManager ifTrue: [optionsDictionary at: #BytesPerWord ifAbsent: [4]] ifFalse: [self wordSize]). self initializeObjectHeaderConstants. "Initializes BaseHeaderSize so do early" self initializeSpurObjectRepresentationConstants. self initializeSpecialObjectIndices. self initializeCompactClassIndices. self initializePrimitiveErrorCodes. SpurGenerationScavenger initialize! Item was changed: ----- Method: TSendNode>>isNullCCode (in category 'testing') ----- isNullCCode | node | + (receiver isConstant + and: [(receiver value == true and: [selector == #ifFalse:]) + or: [receiver value == false and: [selector == #ifTrue:]]]) ifTrue: + [^true]. (#(cCode: cCode:inSmalltalk:) includes: selector) ifFalse: [^false]. "all of cCode: nil ..., cCode: []..., cCode: '' are null" node := arguments first. node isConstant ifTrue: [^(node value isString and: [node value notEmpty]) not]. ^node hasEffect not! Item was added: + ----- Method: TStmtListNode>>isNullCCode (in category 'testing') ----- + isNullCCode + ^statements allSatisfy: #isNullCCode!

1 0

VM Maker: VMMaker.oscog-eem.3262.mcz
by commits＠source.squeak.org 05 Nov '22

05 Nov '22

Eliot Miranda uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-eem.3262.mcz ==================== Summary ==================== Name: VMMaker.oscog-eem.3262 Author: eem Time: 4 November 2022, 5:00:26.932232 pm UUID: eb9e0f35-dee3-41a5-9665-becc970c383a Ancestors: VMMaker.oscog-mt.3261 Fix a crash on ARMv8 when toggling fail/succeed primitives for mixed mode arithmetic. Fix some comment typos. =============== Diff against VMMaker.oscog-mt.3261 =============== Item was changed: ----- Method: CCodeGenerator>>ifStaticallyResolvedPolymorphicReceiverThenUpdateSelectorIn: (in category 'public') ----- ifStaticallyResolvedPolymorphicReceiverThenUpdateSelectorIn: aSendNode + "We allow a limited amount of polymorphism; if a class chooses, its selectors can be - "We allow a limited amount of polymorphism; if a class chooses, its selectoers can be prefixed with a given string to disambiguate. This hack allows us to use two different compaction algorithms with the same API at the same time; the selection being done by a class which holds the flag stating which algorithm is in effect at the current time." | class | staticallyResolvedPolymorphicReceivers ifNil: [^self]. aSendNode receiver isVariable ifFalse: [^self]. class := staticallyResolvedPolymorphicReceivers at: aSendNode receiver name ifAbsent: [^self]. aSendNode selector: (class staticallyResolvePolymorphicSelector: aSendNode selector)! Item was changed: ----- Method: CCodeGenerator>>staticallyResolveMethodNamed:forClass:to: (in category 'public') ----- staticallyResolveMethodNamed: selector forClass: aClass to: staticallyResolvedSelector + "We allow a limited amount of polymorphism; if a class chooses, its selectors can be - "We allow a limited amount of polymorphism; if a class chooses, its selectoers can be prefixed with a given string to disambiguate. This hack allows us to use two different compaction algorithms with the same API at the same time; the selection being done by a class which holds the flag stating which algorithm is in effect at the current time." | method | method := methods removeKey: selector ifAbsent: [self logger cr; nextPutAll: 'warning: did not find ', selector, ' to be able to map to ', staticallyResolvedSelector. ^self]. method selector: staticallyResolvedSelector. methods at: staticallyResolvedSelector put: method! Item was changed: ----- Method: CCodeGenerator>>staticallyResolvedPolymorphicReceiver:to: (in category 'public') ----- staticallyResolvedPolymorphicReceiver: variableName to: aClass + "We allow a limited amount of polymorphism; if a class chooses, its selectors can be - "We allow a limited amount of polymorphism; if a class chooses, its selectoers can be prefixed with a given string to disambiguate. This hack allows us to use two different compaction algorithms with the same API at the same time; the selection being done by a class which holds the flag stating which algorithm is in effect at the current time." (staticallyResolvedPolymorphicReceivers ifNil: [staticallyResolvedPolymorphicReceivers := Dictionary new]) at: variableName put: aClass! Item was changed: ----- Method: Cogit>>unlinkSendsToMethodsSuchThat:AndFreeIf: (in category 'jit - api') ----- unlinkSendsToMethodsSuchThat: criterion AndFreeIf: freeIfTrue <api> "Unlink all sends in cog methods to methods with a machine code primitive, and free machine code primitive methods if freeIfTrue. To avoid having to scan PICs, free any and all PICs" <var: 'criterion' declareC: 'sqInt (*criterion)(CogMethod *)'> | cogMethod freedSomething | <var: #cogMethod type: #'CogMethod *'> methodZoneBase ifNil: [^self]. self cCode: nil inSmalltalk: [debugAPISelector := nil]. codeModified := freedSomething := false. cogMethod := self cCoerceSimple: methodZoneBase to: #'CogMethod *'. [cogMethod < methodZone limitZony] whileTrue: [cogMethod cmType = CMMethod ifTrue: [(freeIfTrue and: [self perform: criterion with: cogMethod]) ifTrue: [methodZone freeMethod: cogMethod. freedSomething := true] ifFalse: [self mapFor: cogMethod performUntil: #unlinkIfLinkedSend:pc:if: arg: criterion]] ifFalse: [cogMethod cmType = CMClosedPIC ifTrue: [methodZone freeMethod: cogMethod. freedSomething := true]]. cogMethod := methodZone methodAfter: cogMethod]. freedSomething ifTrue: [self unlinkSendsToFree] ifFalse: [codeModified ifTrue: "After possibly updating inline caches we need to flush the icache." + [backEnd flushICacheFrom: methodZoneBase asUnsignedInteger to: methodZone freeStart]]. + self ensureExecutableCodeZone! - [backEnd flushICacheFrom: methodZoneBase asUnsignedInteger to: methodZone freeStart]]!

1 0

[OpenSmalltalk/opensmalltalk-vm] 2e65ec: Remove some noise, an unused import, from sqWin32E...
by Eliot Miranda 05 Nov '22

05 Nov '22

Branch: refs/heads/virtend Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 2e65ece1d34e0458aaedca5d45f26c87f31be53c https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/2e65ece1d34e0458aa… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-04 (Fri, 04 Nov 2022) Changed paths: M platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c Log Message: ----------- Remove some noise, an unused import, from sqWin32ExtendedClipboard.c.

1 0

[OpenSmalltalk/opensmalltalk-vm] 2fa2db: Reverse scan lines to convert to top-down to botto...
by Eliot Miranda 04 Nov '22

04 Nov '22

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 2fa2db74b444a8df85afe44fe9ca997490884725 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/2fa2db74b444a8df85… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-04 (Fri, 04 Nov 2022) Changed paths: M platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c Log Message: ----------- Reverse scan lines to convert to top-down to bottom-up bitmaps on exporting DIB & DIBV5 bitmaps to the clipboard.

1 0

[OpenSmalltalk/opensmalltalk-vm] 40612e: Reverse scan lines to convert to top-down to botto...
by Eliot Miranda 04 Nov '22

04 Nov '22

Branch: refs/heads/virtend Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 40612ee81b2bc5a28cabdabe92d4c15f1d58523d https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/40612ee81b2bc5a28c… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-04 (Fri, 04 Nov 2022) Changed paths: M platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c Log Message: ----------- Reverse scan lines to convert to top-down to bottom-up bitmaps on exporting DIB & DIBV5 bitmaps to the clipboard.

1 0

[OpenSmalltalk/opensmalltalk-vm] 661fe9: Reverse scan lines to convert bottom-up bitmaps to...
by Eliot Miranda 03 Nov '22

03 Nov '22

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 661fe92df65d394722498733c4d71e14939e7193 https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/661fe92df65d394722… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-03 (Thu, 03 Nov 2022) Changed paths: M platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c Log Message: ----------- Reverse scan lines to convert bottom-up bitmaps to top-down bitmaps on importing DIB & DIBV5 bitmaps from the clipboard. Commit: 8cee0a56e6e844cf8618bf69ea363f3acee4f22d https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/8cee0a56e6e844cf86… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-03 (Thu, 03 Nov 2022) Changed paths: M cmake/Zlib.cmake M platforms/unix/vm/sqUnixMain.c M platforms/win32/plugins/DropPlugin/sqWin32Drop.c M platforms/win32/plugins/FileDialogPlugin/sqWin32FileDialog.c M platforms/win32/vm/sqWin32Main.c M src/plugins/Squeak3D/Squeak3D.c M src/spur32.cog.lowcode/cogitARMv5.c M src/spur32.cog.lowcode/cogitIA32.c M src/spur32.cog.newspeak/cogit.h M src/spur32.cog.newspeak/cogitARMv5.c M src/spur32.cog.newspeak/cogitIA32.c M src/spur32.cog.newspeak/cointerp.c M src/spur32.cog.newspeak/cointerp.h M src/spur32.cog.newspeak/gcc3x-cointerp.c M src/spur32.cog/cogitARMv5.c M src/spur32.cog/cogitIA32.c M src/spur32.sista/cogitARMv5.c M src/spur32.sista/cogitIA32.c M src/spur32.stack.newspeak/gcc3x-interp.c M src/spur32.stack.newspeak/interp.c M src/spur32.stack/gcc3x-interp.c M src/spur32.stack/interp.c M src/spur64.cog.lowcode/cogitARMv8.c M src/spur64.cog.lowcode/cogitX64SysV.c M src/spur64.cog.lowcode/cogitX64WIN64.c M src/spur64.cog.newspeak/cogit.h M src/spur64.cog.newspeak/cogitARMv8.c M src/spur64.cog.newspeak/cogitX64SysV.c M src/spur64.cog.newspeak/cogitX64WIN64.c M src/spur64.cog.newspeak/cointerp.c M src/spur64.cog.newspeak/cointerp.h M src/spur64.cog.newspeak/gcc3x-cointerp.c M src/spur64.cog/cogitARMv8.c M src/spur64.cog/cogitX64SysV.c M src/spur64.cog/cogitX64WIN64.c M src/spur64.sista/cogitARMv8.c M src/spur64.sista/cogitX64SysV.c M src/spur64.sista/cogitX64WIN64.c M src/spur64.stack.newspeak/gcc3x-interp.c M src/spur64.stack.newspeak/interp.c M src/spur64.stack/gcc3x-interp.c M src/spur64.stack/interp.c M src/v3.cog/cogitARMv5.c M src/v3.cog/cogitIA32.c M src/v3.cog/cointerp.c M src/v3.cog/cointerp.h M src/v3.cog/gcc3x-cointerp.c M src/v3.stack/gcc3x-interp.c M src/v3.stack/interp.c M third-party/zlib.spec Log Message: ----------- Merge branch 'Cog' of github.com:OpenSmalltalk/opensmalltalk-vm into Cog Compare: https://github.com/OpenSmalltalk/opensmalltalk-vm/compare/2d41759b91c6...8c…

1 0

[OpenSmalltalk/opensmalltalk-vm] 1e7464: Fixing a merge conflict for a cherry-pick for the ...
by Eliot Miranda 03 Nov '22

03 Nov '22

Branch: refs/heads/virtend Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 1e74644321af5ab92889608761af3ec2d9ebeced https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/1e74644321af5ab928… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-10-27 (Thu, 27 Oct 2022) Changed paths: M platforms/iOS/plugins/ClipboardExtendedPlugin/sqMacExtendedClipboard.m A platforms/win32/plugins/ClipboardExtendedPlugin/Makefile.msvc A platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c M src/plugins/ClipboardExtendedPlugin/ClipboardExtendedPlugin.c Log Message: ----------- Fixing a merge conflict for a cherry-pick for the ClipbardExtendedPlugin. Add win32 support for the ClipboardExtendedPlugin. Commit: 0ae30c02a096d3d9f91c7f4281df31d45c94422b https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/0ae30c02a096d3d9f9… Author: Eliot Miranda <eliot.miranda(a)gmail.com> Date: 2022-11-03 (Thu, 03 Nov 2022) Changed paths: M platforms/win32/plugins/ClipboardExtendedPlugin/sqWin32ExtendedClipboard.c Log Message: ----------- Reverse scan lines to convert bottom-up bitmaps to top-down bitmaps on importing DIB & DIBV5 bitmaps from the clipboard. Compare: https://github.com/OpenSmalltalk/opensmalltalk-vm/compare/2431b7d7cb72...0a…

1 0

[OpenSmalltalk/opensmalltalk-vm] 2d4175: CogVM (V3) source as per VMMaker.oscog-mt.3261 [ci...
by Marcel Taeumel 01 Nov '22

01 Nov '22

Branch: refs/heads/Cog Home: https://github.com/OpenSmalltalk/opensmalltalk-vm Commit: 2d41759b91c6e7f438169a5f471d3ad0ff5bdb9d https://github.com/OpenSmalltalk/opensmalltalk-vm/commit/2d41759b91c6e7f438… Author: Marcel Taeumel <marcel.taeumel(a)hpi.de> Date: 2022-11-01 (Tue, 01 Nov 2022) Changed paths: M src/v3.cog/cogitARMv5.c M src/v3.cog/cogitIA32.c Log Message: ----------- CogVM (V3) source as per VMMaker.oscog-mt.3261 [ci skip]

1 0

VM Maker: VMMaker.oscog-mt.3261.mcz
by commits＠source.squeak.org 01 Nov '22

01 Nov '22

Marcel Taeumel uploaded a new version of VMMaker to project VM Maker: http://source.squeak.org/VMMaker/VMMaker.oscog-mt.3261.mcz ==================== Summary ==================== Name: VMMaker.oscog-mt.3261 Author: mt Time: 1 November 2022, 1:16:45.056814 pm UUID: b3a000a3-05ac-c34e-87c4-09d2c548a7ba Ancestors: VMMaker.oscog-mt.3260 Fixes one more "-Wint-conversion" error. =============== Diff against VMMaker.oscog-mt.3260 =============== Item was changed: ----- Method: Cogit>>markYoungObjects:pc:method: (in category 'garbage collection') ----- markYoungObjects: annotation pc: mcpc method: cogMethod "Mark and trace young literals." <var: #mcpc type: #'char *'> + <var: #cogMethod type: #'CogMethod *'> <var: #nsSendCache type: #'NSSendCache *'> | literal | annotation = IsObjectReference ifTrue: [literal := literalsManager fetchLiteralAtAnnotatedAddress: mcpc asUnsignedInteger using: backEnd. objectRepresentation markAndTraceLiteralIfYoung: literal]. NewspeakVM ifTrue: [annotation = IsNSSendCall ifTrue: [| nsSendCache | nsSendCache := self nsSendCacheFromReturnAddress: mcpc asInteger. objectRepresentation markAndTraceLiteralIfYoung: nsSendCache selector. nsSendCache enclosingObject ~= 0 ifTrue: [objectRepresentation markAndTraceLiteralIfYoung: nsSendCache enclosingObject]]]. (self isPureSendAnnotation: annotation) ifTrue: [self entryCacheTagAndCouldBeObjectAt: mcpc annotation: annotation into: [:entryPoint :cacheTag :tagCouldBeObj | tagCouldBeObj ifTrue: [objectRepresentation markAndTraceLiteralIfYoung: cacheTag]]]. ^0 "keep scanning"!

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Vm-dev November 2022