[fpc-devel] Saving of the registers in the Go32v2 core

[borsa77 at libero.it]

I corrected several asm blocks for preservation of used registers in the core 
Go32v2 files, the name of attached patch is regscore.diff and it appliyes on 
the trunk branch. I also found a potential bug in the function strcopy of the 
file sysos.inc demonstrated (toggle with the OZMAGIC define) by the 
exploit5 program: when the conditional REGCALL is undefined the 
assembler optimization switch causes a problem (for what I can understand) 
with the parameters declared as a pchar. A patch is attached with the name 
strcopy.diff and it is cumulative to the previous one.
Greetings, Marco.
-------------- next part --------------
The following section of this message contains a file attachment
prepared for transmission using the Internet MIME message format.
If you are using Pegasus Mail, or any other MIME-compliant system,
you should be able to save it or view it from within your mailer.
If you cannot, please ask your system administrator for assistance.

   ---- File information -----------
     File:  regscore.diff
     Date:  6 Aug 2007, 18:21
     Size:  25212 bytes.
     Type:  Unknown
-------------- next part --------------
A non-text attachment was scrubbed...
Name: regscore.diff
Type: application/octet-stream
Size: 25212 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20070807/a36ee21f/attachment.obj>
-------------- next part --------------
The following section of this message contains a file attachment
prepared for transmission using the Internet MIME message format.
If you are using Pegasus Mail, or any other MIME-compliant system,
you should be able to save it or view it from within your mailer.
If you cannot, please ask your system administrator for assistance.

   ---- File information -----------
     File:  strcopy.diff
     Date:  6 Aug 2007, 18:30
     Size:  583 bytes.
     Type:  Unknown
-------------- next part --------------
A non-text attachment was scrubbed...
Name: strcopy.diff
Type: application/octet-stream
Size: 583 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20070807/a36ee21f/attachment-0001.obj>
-------------- next part --------------
The following section of this message contains a file attachment
prepared for transmission using the Internet MIME message format.
If you are using Pegasus Mail, or any other MIME-compliant system,
you should be able to save it or view it from within your mailer.
If you cannot, please ask your system administrator for assistance.

   ---- File information -----------
     File:  exploit5.pas
     Date:  7 Aug 2007, 18:26
     Size:  2198 bytes.
     Type:  Program-source
-------------- next part --------------
A non-text attachment was scrubbed...
Name: exploit5.pas
Type: application/octet-stream
Size: 2198 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20070807/a36ee21f/attachment-0002.obj>