From 02fc2827e0b3dbe5d93e3cd25d734c11fd6263d2 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Mon, 4 Jun 2018 14:10:11 +0000
Subject: [PATCH] * TOmfObjInput.ReadLEDataAndFixups renamed
 ReadLeOrLiDataAndFixups

git-svn-id: trunk@39170 -
---
 compiler/ogomf.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/compiler/ogomf.pas b/compiler/ogomf.pas
index 69b3b8ff1a..b28b9cfcef 100644
--- a/compiler/ogomf.pas
+++ b/compiler/ogomf.pas
@@ -164,7 +164,7 @@ interface
         function ReadExtDef(RawRec: TOmfRawRecord; objdata:TObjData): Boolean;
         function ReadPubDef(RawRec: TOmfRawRecord; objdata:TObjData): Boolean;
         function ReadModEnd(RawRec: TOmfRawRecord; objdata:TObjData): Boolean;
-        function ReadLEDataAndFixups(RawRec: TOmfRawRecord; objdata:TObjData): Boolean;
+        function ReadLeOrLiDataAndFixups(RawRec: TOmfRawRecord; objdata:TObjData): Boolean;
         function ImportOmfFixup(objdata: TObjData; objsec: TOmfObjSection; Fixup: TOmfSubRecord_FIXUP): Boolean;
 
         property LNames: TOmfOrderedNameCollection read FLNames;
@@ -1485,7 +1485,7 @@ implementation
         Result:=True;
       end;
 
-    function TOmfObjInput.ReadLEDataAndFixups(RawRec: TOmfRawRecord; objdata: TObjData): Boolean;
+    function TOmfObjInput.ReadLeOrLiDataAndFixups(RawRec: TOmfRawRecord; objdata: TObjData): Boolean;
       var
         Is32Bit: Boolean;
         NextOfs: Integer;
@@ -1988,7 +1988,7 @@ implementation
                 exit;
             RT_LEDATA,RT_LEDATA32,
             RT_FIXUPP,RT_FIXUPP32:
-              if not ReadLEDataAndFixups(FRawRecord,objdata) then
+              if not ReadLeOrLiDataAndFixups(FRawRecord,objdata) then
                 exit;
             RT_LIDATA,RT_LIDATA32:
               begin