Adding addresses for windows

hernanmd · Apr 8, 2022 · b0b0541 · b0b0541
1 parent 4832058
commit b0b0541
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 2 deletions.
diff --git a/smalltalksrc/VMMaker/VMBasicConstants.class.st b/smalltalksrc/VMMaker/VMBasicConstants.class.st
@@ -65,7 +65,8 @@ Class {
 		'STACKVM',
 		'SistaVM',
 		'TempVectReadBarrier',
-		'VMBIGENDIAN'
+		'VMBIGENDIAN',
+		'WIN32'
 	],
 	#category : #'VMMaker-Interpreter'
 }

diff --git a/smalltalksrc/VMMaker/VMClass.class.st b/smalltalksrc/VMMaker/VMClass.class.st
@@ -206,7 +206,8 @@ VMClass class >> initializeMiscConstants [
 			 SistaVM ifTrue: [self error: 'Sista VM works with spur VM only...']].
 
 	"And not these; they're compile-time"
-	IMMUTABILITY := InitializationOptions at: #IMMUTABILITY ifAbsent: [SPURVM] "Default as enabled for Spur VMs"
+	IMMUTABILITY := InitializationOptions at: #IMMUTABILITY ifAbsent: [SPURVM]. "Default as enabled for Spur VMs"
+	WIN32 := InitializationOptions at: #WIN32 ifAbsent: [false].
 ]
 
 { #category : #initialization }

diff --git a/smalltalksrc/VMMaker/VMMemoryMapConfigurationFor64Bits.class.st b/smalltalksrc/VMMaker/VMMemoryMapConfigurationFor64Bits.class.st
@@ -7,12 +7,16 @@ Class {
 { #category : #'initial addresses' }
 VMMemoryMapConfigurationFor64Bits >> codeZoneInitialAddress [
 
+	self cppIf: WIN32 ifTrue: [ ^ 16r440000000 "17GB" ].
+
 	^ 16r240000000 "9GB"
 ]
 
 { #category : #'initial addresses' }
 VMMemoryMapConfigurationFor64Bits >> newSpaceInitialAddress [
 
+	self cppIf: WIN32 ifTrue: [ ^ 16r480000000 "18GB" ].
+
 	^ 16r280000000 "10GB"
 ]
 
@@ -31,5 +35,7 @@ VMMemoryMapConfigurationFor64Bits >> permSpaceInitialAddress [
 { #category : #'initial addresses' }
 VMMemoryMapConfigurationFor64Bits >> stackPagesInitialAddress [
 
+	self cppIf: WIN32 ifTrue: [ ^ 16r400000000 "16GB" ].
+
 	^ 16r200000000 "8GB"
 ]