mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-02 12:31:01 +02:00
[PATCH 121/188] renaming ipTable to ipJumpVec
From 8a001584706ce24acf3742ed40a5697aecdb7af1 Mon Sep 17 00:00:00 2001 From: Dmitry Boyarintsev <skalogryz.lists@gmail.com> Date: Mon, 23 Mar 2020 15:31:36 -0400 git-svn-id: branches/wasm@46117 -
This commit is contained in:
parent
0dad8b4b3d
commit
bf0a263074
@ -212,7 +212,7 @@ type
|
|||||||
ipi64, // signed Leb of maximum 8 bytes
|
ipi64, // signed Leb of maximum 8 bytes
|
||||||
ipf32, // float point single
|
ipf32, // float point single
|
||||||
ipf64, // float point double
|
ipf64, // float point double
|
||||||
ipTable, // a complex structure... used for br_table only
|
ipJumpVec, // an array of jump labels used for br_table only
|
||||||
ipResType, // result type used for blocks, such as If, block or loop
|
ipResType, // result type used for blocks, such as If, block or loop
|
||||||
ipCallType, // used for call_indirect
|
ipCallType, // used for call_indirect
|
||||||
ipi32OrFunc // use for i32.const. Either a numeric OR function id is accepted.
|
ipi32OrFunc // use for i32.const. Either a numeric OR function id is accepted.
|
||||||
@ -241,7 +241,7 @@ const
|
|||||||
,(valid: true; Param: ipNone) // 0B end
|
,(valid: true; Param: ipNone) // 0B end
|
||||||
,(valid: true; Param: ipLeb) // 0C br
|
,(valid: true; Param: ipLeb) // 0C br
|
||||||
,(valid: true; Param: ipLeb) // 0D br_if
|
,(valid: true; Param: ipLeb) // 0D br_if
|
||||||
,(valid: true; Param: ipTable) // 0E br_table
|
,(valid: true; Param: ipJumpVec) // 0E br_table
|
||||||
,(valid: true; Param: ipNone) // 0F return
|
,(valid: true; Param: ipNone) // 0F return
|
||||||
,(valid: true; Param: ipLeb) // 10 call
|
,(valid: true; Param: ipLeb) // 10 call
|
||||||
,(valid: true; Param: ipCallType) // 11 call_indirect
|
,(valid: true; Param: ipCallType) // 11 call_indirect
|
||||||
@ -451,7 +451,7 @@ begin
|
|||||||
ReadU(st);
|
ReadU(st);
|
||||||
ReadU(st);
|
ReadU(st);
|
||||||
end;
|
end;
|
||||||
ipTable: begin // not implemented :(
|
ipJumpVec: begin // not implemented :(
|
||||||
Result:=-2;
|
Result:=-2;
|
||||||
Exit;
|
Exit;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user