Browse Source

- old boostrapping file

git-svn-id: trunk@5189 -
florian 19 years ago
parent
commit
c78a20c26e
2 changed files with 0 additions and 58 deletions
  1. 0 1
      .gitattributes
  2. 0 57
      rtl/win32/wprt0_10.as

+ 0 - 1
.gitattributes

@@ -5243,7 +5243,6 @@ rtl/win32/win32res.inc svneol=native#text/plain
 rtl/win32/windows.pp svneol=native#text/plain
 rtl/win32/windows.pp svneol=native#text/plain
 rtl/win32/winsysut.pp svneol=native#text/plain
 rtl/win32/winsysut.pp svneol=native#text/plain
 rtl/win32/wprt0.as -text
 rtl/win32/wprt0.as -text
-rtl/win32/wprt0_10.as -text
 rtl/win64/Makefile svneol=native#text/plain
 rtl/win64/Makefile svneol=native#text/plain
 rtl/win64/Makefile.fpc svneol=native#text/plain
 rtl/win64/Makefile.fpc svneol=native#text/plain
 rtl/win64/classes.pp svneol=native#text/plain
 rtl/win64/classes.pp svneol=native#text/plain

+ 0 - 57
rtl/win32/wprt0_10.as

@@ -1,57 +0,0 @@
-//Startup code for WIN32 port of FPK-Pascal 0.9.98
-//Written by P.Ozerski
-//1998
-// modified by Pierre Muller
-     .text
-     .globl _mainCRTStartup
-_mainCRTStartup:
-     movb   $1,U_SYSWIN32_ISCONSOLE
-     call   _FPC_EXE_Entry
-     .globl _WinMainCRTStartup
-_WinMainCRTStartup:
-     movb   $0,U_SYSWIN32_ISCONSOLE
-     call   _FPC_EXE_Entry
-     
-     .globl asm_exit
-asm_exit:     
-    pushl   %eax
-	call	exitprocess
-	
-.text
-.globl	exitprocess
-exitprocess:
-	jmp	*.L10
-	.balign 4,144
-	
-.text
-	.balign 4,144
-
-.section .idata$2
-	.rva	.L7
-	.long	0,0
-	.rva	.L6
-	.rva	.L8
-
-.section .idata$4
-.L7:
-	.rva	.L9
-	.long	0
-
-.section .idata$5
-.L8:
-	
-
-.section .idata$5
-.L10:
-	.rva	.L9
-	.long	0
-
-.section .idata$6
-.L9:
-	.short	0
-	.ascii	"ExitProcess\000"
-	.balign 2,0
-
-.section .idata$7
-.L6:
-	.ascii	"kernel32.dll\000"