diff options
author | nickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2019-06-14 23:10:38 +0000 |
---|---|---|
committer | nickysn <nickysn@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2019-06-14 23:10:38 +0000 |
commit | ebac59fded74cb6c40607c90c815e1eae0f85902 (patch) | |
tree | 21f6b304528a4dbd7f4197de7c1e791abc597193 | |
parent | 2e882b787d2ca90e7d053fc89a9afce4f07d95f7 (diff) | |
download | fpc-ebac59fded74cb6c40607c90c815e1eae0f85902.tar.gz |
+ use the new CC_OmfExtension_EXPDEF constant instead of the direct magic value
when writing export libraries
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@42233 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r-- | compiler/systems/t_win16.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/systems/t_win16.pas b/compiler/systems/t_win16.pas index 93c1fa2743..3ea0a65083 100644 --- a/compiler/systems/t_win16.pas +++ b/compiler/systems/t_win16.pas @@ -206,7 +206,7 @@ begin end else internal_name:=hp.name^; - DllExport_COMENT.CommentString:=#2+Chr(expflag)+Chr(Length(hp.name^))+hp.name^+Chr(Length(internal_name))+internal_name; + DllExport_COMENT.CommentString:=Chr(CC_OmfExtension_EXPDEF)+Chr(expflag)+Chr(Length(hp.name^))+hp.name^+Chr(Length(internal_name))+internal_name; if eo_index in hp.options then DllExport_COMENT.CommentString:=DllExport_COMENT.CommentString+Chr(Byte(hp.index))+Chr(Byte(hp.index shr 8)); DllExport_COMENT.EncodeTo(RawRecord); |