From f158f8be13c692b8cc5b2198b660cc8a6d221f17 Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Wed, 12 Jan 2000 10:43:40 +0000
Subject: [PATCH]   * added objfpc mode for 0.99.12

---
 rtl/win32/initc.pp | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/rtl/win32/initc.pp b/rtl/win32/initc.pp
index cfc873f7d6..f64f1d418c 100644
--- a/rtl/win32/initc.pp
+++ b/rtl/win32/initc.pp
@@ -2,6 +2,12 @@ unit initc;
 
 interface
 
+{ 0.99.12 had a bug that initialization/finalization only worked for
+  objfpc,delphi mode }
+{$ifdef VER0_99_12}
+  {$mode objfpc}
+{$endif}
+
  {$LINKLIB cygwin}
 
 { this unit is just ment to run