From 90a164bcdac5e814327c161d2ce7dcd9e4a3c725 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Sat, 10 Aug 2019 00:11:12 +0000
Subject: [PATCH] + write the module description as the first entry to the
 nonresident names table

git-svn-id: trunk@42631 -
---
 compiler/ogomf.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/compiler/ogomf.pas b/compiler/ogomf.pas
index 9c93f689a6..ac12a81a9f 100644
--- a/compiler/ogomf.pas
+++ b/compiler/ogomf.pas
@@ -4303,6 +4303,8 @@ cleanup:
 
         { the first entry in the resident-name table is the module name }
         TNewExeExportNameTableEntry.Create(ResidentNameTable,ExtractModuleName(current_module.exefilename),0);
+        { the first entry in the nonresident-name table is the module description }
+        TNewExeExportNameTableEntry.Create(NonresidentNameTable,description,0);
 
         FillImportedNameAndModuleReferenceTable;
         ImportedNameTable.CalcTableOffsets;