From 766757fd5b0da81471b3761c1853e0a7bae077fb Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Fri, 20 Dec 2002 18:14:53 +0000
Subject: [PATCH]   * fix result of high_tree when high was not available

---
 compiler/nld.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/nld.pas b/compiler/nld.pas
index dfe3143743..6e25283626 100644
--- a/compiler/nld.pas
+++ b/compiler/nld.pas
@@ -196,6 +196,7 @@ implementation
         srsym : tsym;
         srsymtable : tsymtable;
       begin
+        result:=nil;
         srsymtable:=vs.owner;
         if vo_is_local_copy in vs.varoptions then
          begin
@@ -1268,7 +1269,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.72  2002-12-17 22:19:33  peter
+  Revision 1.73  2002-12-20 18:14:53  peter
+    * fix result of high_tree when high was not available
+
+  Revision 1.72  2002/12/17 22:19:33  peter
     * fixed pushing of records>8 bytes with stdcall
     * simplified hightree loading