paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 06:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* reverted to previous version

Browse Source
This commit is contained in:
florian 2001-08-21 13:12:22 +00:00
parent 07495c8526
commit 120c4eb588
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/go32v2/v2prt0.as
View File

@ -326,7 +326,7 @@ no_exception:
movw %cs, %bx movw %cs, %bx
/* Call exit procedure with BX=32-bit CS; SI+DI=32-bit handle; DL=exit status */ /* Call exit procedure with BX=32-bit CS; SI+DI=32-bit handle; DL=exit status */
.byte 0x2e .byte 0x2e
ljmp *(sbrk16_api_ofs) ljmp sbrk16_api_ofs
/*-----------------------------------------------------------------------------*/ /*-----------------------------------------------------------------------------*/
@ -400,7 +400,7 @@ brk_common:
movw $0x0900, %ax /* disable interrupts */ movw $0x0900, %ax /* disable interrupts */
int $0x31 int $0x31
movl %eax,___sbrk_interrupt_state movl %eax,___sbrk_interrupt_state
lcall *(sbrk16_api_ofs) lcall sbrk16_api_ofs
setc %dl /* Save carry */ setc %dl /* Save carry */
/* popl %eax restore interrupts /* popl %eax restore interrupts
@ -918,9 +918,8 @@ ___PROXY_LEN:
/* /*
$Log$ $Log$
Revision 1.2 2001-08-19 21:02:01 florian Revision 1.3 2001-08-21 13:12:22 florian
* fixed and added a lot of stuff to get the Jedi DX( headers * reverted to previous version
compiled
Revision 1.1 2000/07/13 06:30:40 michael Revision 1.1 2000/07/13 06:30:40 michael
+ Initial import + Initial import