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

* fixed branch ordering in resolve_labels_via_state_machine

Browse Source
This commit is contained in:
Nikolay Nikolov 2023-10-21 23:54:40 +03:00
parent 6f942996a5
commit 5e9cf637d3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/wasm32/cpupi.pas
View File

@ -713,7 +713,7 @@ implementation
asmlist.Concat(taicpu.op_const(a_local_get,machine_state));
asmlist.Concat(taicpu.op_const(a_i32_const,block_nr));
asmlist.Concat(taicpu.op_none(a_i32_eq));
asmlist.Concat(taicpu.op_const(a_br_if,blocks.Count-block_nr-1));
asmlist.Concat(taicpu.op_const(a_br_if,block_nr));
end;
asmlist.Concat(taicpu.op_none(a_unreachable));
tmplist:=TAsmList.Create;