mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-18 00:29:22 +02:00
* update the flowcontrol set in the IF node pass_generate_code
git-svn-id: branches/wasm@48183 -
This commit is contained in:
parent
c0e7035e50
commit
7f31c03718
@ -160,6 +160,9 @@ begin
|
||||
|
||||
location_reset(location,LOC_VOID,OS_NO);
|
||||
|
||||
oldflowcontrol := flowcontrol;
|
||||
include(flowcontrol,fc_inflowcontrol);
|
||||
|
||||
//todo: MOVE all current_asm_data actions to Wasm HL CodeGen
|
||||
|
||||
secondpass(left); // condition exprssions
|
||||
@ -180,6 +183,8 @@ begin
|
||||
|
||||
current_asmdata.CurrAsmList.concat(taicpu.op_none(a_end_if));
|
||||
thlcgwasm(hlcg).decblock;
|
||||
|
||||
flowcontrol := oldflowcontrol + (flowcontrol - [fc_inflowcontrol]);
|
||||
end;
|
||||
|
||||
initialization
|
||||
|
Loading…
Reference in New Issue
Block a user