S390: Fix SQEBR sim to treat operands as float32

src/s390/simulator-s390.cc

 // Copyright 2014 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #include <stdarg.h>
 #include <stdlib.h>
 #include <cmath>
 
 #if V8_TARGET_ARCH_S390
 
@@ skipping 3419 matching lines @@
       } else if (op == CFDBR) {
         DecodeFourByteFloatingPointRound(instr);
       } else if (op == CGDBR) {
         DecodeFourByteFloatingPointRound(instr);
       } else if (op == CGEBR) {
         DecodeFourByteFloatingPointRound(instr);
       } else if (op == SQDBR) {
         r1_val = std::sqrt(r2_val);
         set_d_register_from_double(r1, r1_val);
       } else if (op == SQEBR) {
-        r1_val = std::sqrt(r2_val);
-        set_d_register_from_float32(r1, r1_val);
+        fr1_val = std::sqrt(fr2_val);
+        set_d_register_from_float32(r1, fr1_val);
       } else if (op == CFEBR) {
         DecodeFourByteFloatingPointRound(instr);
       } else if (op == LCDBR) {
         r1_val = -r2_val;
         set_d_register_from_double(r1, r1_val);
         if (r2_val != r2_val) {  // input is NaN
           condition_reg_ = CC_OF;
         } else if (r2_val == 0) {
           condition_reg_ = CC_EQ;
         } else if (r2_val < 0) {
@@ skipping 1587 matching lines @@
   uintptr_t address = *stack_slot;
   set_register(sp, current_sp + sizeof(uintptr_t));
   return address;
 }
 
 }  // namespace internal
 }  // namespace v8
 
 #endif  // USE_SIMULATOR
 #endif  // V8_TARGET_ARCH_S390