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

[PATCH 139/188] adding parsing of weEqual token (for parsing

Browse Source 
expressions align= offset=)

From 960f875f4a3e7f1d3e6c93ff29d6fb1e0856e764 Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <skalogryz.lists@gmail.com>
Date: Wed, 25 Mar 2020 10:29:24 -0400

git-svn-id: branches/wasm@46135 -
This commit is contained in:
nickysn 2020-08-03 13:01:32 +00:00
parent 44fe34b7a8
commit 9223e3c1ec
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
utils/wasmbin/watscanner.pas
View File

@ -21,7 +21,7 @@ type
wef32, wef64, wef32, wef64,
weType, weType,
weImport, weGlobal, weTable, weMemory, weLocal, weExport, weImport, weGlobal, weTable, weMemory, weLocal, weExport,
weElem, weData, weOffset, weAlign weElem, weData, weOffset, weAlign, weEqual
); );
// used only for weNumber // used only for weNumber
@ -246,6 +246,9 @@ begin
end else if buf[idx]=')' then begin end else if buf[idx]=')' then begin
token:=weCloseBrace; token:=weCloseBrace;
inc(idx); inc(idx);
end else if buf[idx]='=' then begin
token:=weEqual;
inc(idx);
end else if buf[idx]='"' then begin end else if buf[idx]='"' then begin
token:=weString; token:=weString;
resText:=ScanString(buf, idx); resText:=ScanString(buf, idx);