From 93ec811c9742db20337d348a8da66548735a3671 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Wed, 6 May 2015 13:45:39 +0000
Subject: [PATCH] + created the msdos internal linker class (empty for now)
git-svn-id: trunk@30810 -
---
compiler/systems.inc | 3 ++-
compiler/systems/t_msdos.pas | 7 +++++++
2 files changed, 9 insertions(+), 1 deletion(-)
diff --git a/compiler/systems.inc b/compiler/systems.inc
index 8157cbe08f..e4970f0445 100644
--- a/compiler/systems.inc
+++ b/compiler/systems.inc
@@ -252,7 +252,8 @@
ld_int_linux,
ld_int_nativent,
ld_int_netware,
- ld_int_windows
+ ld_int_windows,
+ ld_int_msdos
);
tar = (ar_none
diff --git a/compiler/systems/t_msdos.pas b/compiler/systems/t_msdos.pas
index 043a2a9f8c..78192099c2 100644
--- a/compiler/systems/t_msdos.pas
+++ b/compiler/systems/t_msdos.pas
@@ -70,6 +70,12 @@ implementation
function MakeExecutable:boolean;override;
end;
+ { TInternalLinkerMsDos }
+
+ TInternalLinkerMsDos=class(tinternallinker)
+
+ end;
+
{****************************************************************************
TExternalLinkerMsDosTLink
@@ -385,6 +391,7 @@ end;
*****************************************************************************}
initialization
+ RegisterLinker(ld_int_msdos,TInternalLinkerMsDos);
{$if defined(USE_LINKER_TLINK)}
RegisterLinker(ld_msdos,TExternalLinkerMsDosTLink);
{$elseif defined(USE_LINKER_ALINK)}