paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 10:39:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

[PATCH 081/188] writing export information

Browse Source 
From 8392cf53a8b93e395c3a41d50741f4bcf264f1db Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <skalogryz.lists@gmail.com>
Date: Mon, 9 Mar 2020 10:32:16 -0400

git-svn-id: branches/wasm@46077 -
This commit is contained in:
nickysn 2020-08-03 13:00:09 +00:00
parent 79e046adf1
commit 8117cba863
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utils/wasmbin/wasmbinwriter.pas
View File

@ -574,7 +574,7 @@ begin
if isFuncLinkSym(f.LinkInfo) or (f.codeRefCount>0) then begin if isFuncLinkSym(f.LinkInfo) or (f.codeRefCount>0) then begin
if f.LinkInfo.Name ='' then f.LinkInfo.Name := f.id; if f.LinkInfo.Name ='' then f.LinkInfo.Name := f.id;
so:=AddSymbolObject; so:=AddSymbolObject;
LinkInfoToBin(f.linkInfo, so.syminfo, SYMTAB_FUNCTION, i); LinkInfoToBin(f.linkInfo, so.syminfo, SYMTAB_FUNCTION, f.idNum);
end; end;
end; end;
end; end;