Browse Source

[PATCH 171/188] adding float hex format

From b70802cffbdda9ac30dc772ba1be7ea62656880d Mon Sep 17 00:00:00 2001
From: Dmitry Boyarintsev <[email protected]>
Date: Fri, 27 Mar 2020 14:25:54 -0400

git-svn-id: branches/wasm@46167 -
nickysn 5 years ago
parent
commit
d881c155b1
1 changed files with 3 additions and 1 deletions
  1. 3 1
      utils/wasmbin/watscanner.pas

+ 3 - 1
utils/wasmbin/watscanner.pas

@@ -29,7 +29,8 @@ type
      wnfNo,      // other than number
      wnfNo,      // other than number
      wnfInteger, // 00
      wnfInteger, // 00
      wnfHex,     // 0xABC
      wnfHex,     // 0xABC
-     wnfFloat    // 0.000
+     wnfFloat,   // 0.000
+     wnfFloatHex // 0x000.bced
   );
   );
 
 
   { TWatScanner }
   { TWatScanner }
@@ -266,6 +267,7 @@ begin
           token:=weNumber;
           token:=weNumber;
         case fmt of
         case fmt of
           nfFloat: numformat := wnfFloat;
           nfFloat: numformat := wnfFloat;
+          nfFloatHex: numFormat := wnfFloatHex;
           nfHex: numformat := wnfHex;
           nfHex: numformat := wnfHex;
         else
         else
           numformat := wnfInteger;
           numformat := wnfInteger;