paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 01:29:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

WebAssembly debug info: use different LINE_BASE and LINE_RANGE on WebAssembly to

Browse Source 
improve compatibility with WasmTime's debugger support
This commit is contained in:
Nikolay Nikolov 2024-09-15 07:21:25 +03:00
parent 4914a5a31f
commit 993db6cf32
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/dbgdwarf.pas
View File

@ -282,8 +282,16 @@ implementation
;
const
{$ifdef WASM}
{ WasmTime's debugger requires that:
(LINE_BASE<=0) and (SignedInt8(LINE_BASE + LINE_RANGE) > 0),
so we use different values for WebAssembly }
LINE_BASE = 0;
LINE_RANGE = 127;
{$else WASM}
LINE_BASE = 1;
LINE_RANGE = 255;
{$endif WASM}
OPCODE_BASE = 13;
const