From f42a2d67b9d46962f2451aae456e789ad8cc2ba0 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 18 Feb 2007 20:26:28 +0000
Subject: [PATCH] * made exitcode a longint, at least windows supports it,
 delphi uses a longint too

git-svn-id: trunk@6549 -
---
 rtl/inc/systemh.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/inc/systemh.inc b/rtl/inc/systemh.inc
index 570074ff97..a33e50c8e5 100644
--- a/rtl/inc/systemh.inc
+++ b/rtl/inc/systemh.inc
@@ -357,7 +357,7 @@ const
   InitProc : Pointer = nil;
 
 var
-  ExitCode    : Word; public name 'operatingsystem_result';
+  ExitCode    : Longint; public name 'operatingsystem_result';
   RandSeed    : Cardinal;
   { Delphi compatibility }
   IsLibrary : boolean = false;