paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 10:40:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Try to fix go32v2 problems related to DJGPP 2.04 CVS code using __environ as alias of _environ

Browse Source 
git-svn-id: trunk@20113 -
This commit is contained in:
pierre 2012-01-19 17:12:03 +00:00
parent bf321b72c7
commit ac80391c74
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
rtl/go32v2/v2prt0.as
View File

@ -856,7 +856,7 @@ _pascal_start:
movl %esp,%ebx
movl 12(%ebx),%eax
movl %eax,operatingsystem_parameter_envp
movl %eax,_environ
movl %eax,__environ
movl 8(%ebx),%eax
movl %eax,_args
movl 4(%ebx),%eax
@ -891,9 +891,13 @@ _core_selector:
.globl ___v2prt0_start_fs
___v2prt0_start_fs:
.word 0
.globl _environ
_environ:
.long 0
/* DJGPP CVS crt1.c code uses __environ symbol */
/* corresponding to _environ C variable */
/* instead of _environ symbol since commit rev 1.11 */
/* Thu Aug 19 9:11:52 2004 UTC by peuha */
/* _environ is provided by linker script at the same address */
/* as __environ if needed by linker. */
.comm __environ,4
/* Here Pierre Muller added all what was in crt1.c */
/* in assembler */