Browse Source

* Don't call secondpass(left) in twasmtypeconvnode.second_int_to_real, this fixes bug #39735.

Nikolay Nikolov 3 years ago
parent
commit
4d6e3b4e1a
2 changed files with 8 additions and 4 deletions
  1. 0 4
      compiler/wasm32/nwasmcnv.pas
  2. 8 0
      tests/webtbs/tw39735.pp

+ 0 - 4
compiler/wasm32/nwasmcnv.pas

@@ -70,10 +70,6 @@ implementation
       var
       var
         op: TAsmOp;
         op: TAsmOp;
       begin
       begin
-        secondpass(left);
-        if codegenerror then
-          exit;
-
         case tfloatdef(resultdef).floattype of
         case tfloatdef(resultdef).floattype of
           s32real:
           s32real:
             begin
             begin

+ 8 - 0
tests/webtbs/tw39735.pp

@@ -0,0 +1,8 @@
+program tw39735;
+uses
+  sysutils;
+var
+  LStart: TDateTime;
+begin
+  LStart := DateTimeToTimeStamp(Now).Time;
+end.