paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-27 11:52:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

[PATCH 158/188] update parsing of the wat format

Browse Source 
From 03948b289d998a45ccdc57154da3f0c55f391bf3 Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <skalogryz.lists@gmail.com>
Date: Fri, 27 Mar 2020 09:20:30 -0400

git-svn-id: branches/wasm@46154 -
This commit is contained in:
nickysn 2020-08-03 13:01:50 +00:00
parent 3e8efcf249
commit 8dd03120c8
1 changed files with 12 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
utils/wasmbin/watparser.pas
View File

@ -490,11 +490,20 @@ procedure ParseMemory(sc: TWatScanner; dst: TWasmMemory);
begin
if sc.token=weMemory then sc.Next;
if sc.token in [weIdent, weNumber] then
if sc.token in [weIdent] then
ParseId(sc, dst.id);
// todo: parsing of ImportInfo
// todo: parsing of ExportInfo
// todo: parsing of Import / Export
if sc.token in [weNumber] then begin
dst.min := sc.resInt32(0);
sc.Next;
end;
if sc.token in [weNumber] then begin
dst.max := sc.resInt32(0);
sc.Next;
end;
ConsumeToken(sc, weCloseBrace);
end;