fasm: fixed window minimization broken in rev. 1361

git-svn-id: svn://kolibrios.org@1443 a494cfbc-eb01-0410-851d-a64ba20cac60

programs/develop/fasm/trunk/system.inc

@@ -57,13 +57,21 @@ filepos 	 dd 0x0
 
 init_memory:
 
-        mov ecx, 16*1024*1024
-
- allocate_memory:
+;        mov ecx, 16*1024*1024
+;
+; allocate_memory:
+	mcall	18, 16
+	cmp	eax, 0x38000000 shr 9
+	jbe	@f
+	mov	eax, 0x38000000 shr 9
+@@:
+	shl	eax, 9
+	xchg	eax, ecx
 	mov	[memory_setting],ecx
 	mcall	68, 12
 	or	eax,eax
 	jz	out_of_memory
+	mov	[memblock], eax
 	mov	[additional_memory],eax
 	add	eax,[memory_setting]
 	mov	[memory_end],eax