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

+ introduced TWasmBasicTypeList

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-01-31 01:55:38 +02:00
parent 1786875319
commit d575aa5240
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/wasm32/aasmcpu.pas
View File

@ -41,6 +41,7 @@ uses
O_MOV_DEST = 0; O_MOV_DEST = 0;
type type
TWasmBasicTypeList = array of TWasmBasicType;
{ TWasmValueStack } { TWasmValueStack }
@ -61,8 +62,8 @@ uses
TWasmControlFrame = record TWasmControlFrame = record
opcode: tasmop; opcode: tasmop;
start_types: array of TWasmBasicType; start_types: TWasmBasicTypeList;
end_types: array of TWasmBasicType; end_types: TWasmBasicTypeList;
height: Integer; height: Integer;
unreachable: Boolean; unreachable: Boolean;
end; end;