Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 1443 → Rev 1442

/programs/develop/fasm/trunk/fasm.asm
32,12 → 32,14
dd params,cur_dir_path ; parameters,icon
 
include 'lang.inc'
include '../../../macros.inc'
include '..\..\..\macros.inc'
purge add,sub ; macros.inc does incorrect substitution
include 'fasm.inc'
 
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
include '../../../develop/libraries/box_lib/load_lib.mac'
include '..\..\..\develop\libraries\box_lib\trunk\box_lib.mac'
;include '..\..\..\develop\libraries\box_lib\trunk\editbox.mac'
;include '..\..\..\develop\libraries\box_lib\trunk\checkbox.mac'
include '..\..\..\develop\libraries\box_lib\load_lib.mac'
@use_library
 
 
116,7 → 118,9
pop eax
mcall
cmp al,6
je call_mouse
jne @f
call mouse
@@:
dec eax
je red ; Redraw request
dec eax
135,10 → 139,6
 
jmp still
 
call_mouse:
call mouse
jmp still
 
button: ; Button in Window
 
mov al,17
/programs/develop/fasm/trunk/system.inc
57,21 → 57,13
 
init_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 ecx, 16*1024*1024
 
allocate_memory:
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