File 2161-beam_SUITE-Run-the-fconv-1-test-case.patch of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2161-beam_SUITE-Run-the-fconv-1-test-case.patch of Package erlang (Revision 2f15b05a39d64e5cba90e927e8665465)

Currently displaying revision 2f15b05a39d64e5cba90e927e8665465 , Show latest

From 222e0271beeb064eb326d86e4f01fbe8e1549746 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Fri, 13 Oct 2023 06:35:14 +0200
Subject: [PATCH 1/2] beam_SUITE: Run the fconv/1 test case

---
 erts/emulator/test/beam_SUITE.erl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/erts/emulator/test/beam_SUITE.erl b/erts/emulator/test/beam_SUITE.erl
index eff8c6b426..fd499ee007 100644
--- a/erts/emulator/test/beam_SUITE.erl
+++ b/erts/emulator/test/beam_SUITE.erl
@@ -36,7 +36,7 @@ suite() -> [{ct_hooks,[ts_install_cth]}].
 
 all() -> 
     [packed_registers, apply_last, apply_last_bif,
-     heap_sizes, big_lists,
+     heap_sizes, big_lists, fconv,
      select_val, select_tuple_arity,
      swap_temp_apply, beam_init_yregs].
 
@@ -284,7 +284,10 @@ do_fconv(atom, Float) when is_float(Float) ->
 do_fconv(nil, Float) when is_float(Float) ->
     Float + [];
 do_fconv(tuple_literal, Float) when is_float(Float) ->
-    Float + {a,b}.
+    Float + {a,b};
+do_fconv(A, B) when is_float(A), is_float(B) ->
+    A + B.
+
 
 select_val(Config) when is_list(Config) ->
     Mod = ?FUNCTION_NAME,
-- 
2.35.3

Places

File 2161-beam_SUITE-Run-the-fconv-1-test-case.patch of Package erlang (Revision 2f15b05a39d64e5cba90e927e8665465)

Places