wok diff linld/stuff/src/XMM.ASM @ rev 20486
perl: force arch
author | Pascal Bellard <pascal.bellard@slitaz.org> |
---|---|
date | Fri Oct 26 10:09:53 2018 +0200 (2018-10-26) |
parents | c0625ff5d49b |
children | f0d71e920c5a |
line diff
1.1 --- a/linld/stuff/src/XMM.ASM Mon Aug 13 00:46:30 2018 +0200 1.2 +++ b/linld/stuff/src/XMM.ASM Fri Oct 26 10:09:53 2018 +0200 1.3 @@ -16,7 +16,6 @@ 1.4 1.5 segment _BSS byte public use16 'BSS' 1.6 1.7 - global xmm_handler:dword 1.8 xmm_handler dd ? 1.9 1.10 ends _BSS 1.11 @@ -40,7 +39,6 @@ 1.12 ;Call xmm driver addr or 0 if no xmm 1.13 ;void xmm_driver(ah) 1.14 ;*************************************************************** 1.15 - global xmm_driver:near 1.16 proc xmm_driver near 1.17 1.18 push si 1.19 @@ -100,6 +98,7 @@ 1.20 global _xmm_alloc:near 1.21 proc _xmm_alloc near 1.22 1.23 + ret ; TO BE FIXED 1.24 pop ax 1.25 pop bx 1.26 push bx 1.27 @@ -108,6 +107,8 @@ 1.28 mov edx,[(image_himem bx).size] ; m->size 1.29 ;dec edx 1.30 shr edx,10 ; to Kb 1.31 + inc edx 1.32 + mov ah,89h ;allocate blk of EDX kilobytes 1.33 else 1.34 ;mov ax,-1 1.35 ;cwd 1.36 @@ -118,10 +119,10 @@ 1.37 mov cl,16-10 1.38 extrn N_LXLSH@:near 1.39 call N_LXLSH@ 1.40 + inc dx 1.41 + mov ah,9h ;allocate blk of DX kilobytes (<64Mb) 1.42 endif 1.43 - inc dx 1.44 push bx 1.45 - mov ah,09h ;allocate blk of DX kilobytes 1.46 call xmm_driver ; 1.47 jnz @@goerr 1.48 ;now: dx=handle of the blk