File 0878-stdlib-Fix-bugs-in-eval_bits.patch of Package erlang
From 17712ed482b8988a783976f7738befc637bf6fc1 Mon Sep 17 00:00:00 2001
From: Hans Bolinder <hasse@erlang.org>
Date: Mon, 23 Mar 2020 11:53:49 +0100
Subject: [PATCH] stdlib: Fix bugs in eval_bits
---
lib/stdlib/src/eval_bits.erl | 6 ++++++
lib/stdlib/test/erl_eval_SUITE.erl | 12 ++++++------
2 files changed, 12 insertions(+), 6 deletions(-)
diff --git a/lib/stdlib/src/eval_bits.erl b/lib/stdlib/src/eval_bits.erl
index 01b83fb918..5c75320de0 100644
--- a/lib/stdlib/src/eval_bits.erl
+++ b/lib/stdlib/src/eval_bits.erl
@@ -338,12 +338,18 @@ get_value(Bin, utf16, undefined, _Unit, _Sign, big) ->
get_value(Bin, utf16, undefined, _Unit, _Sign, little) ->
<<I/little-utf16,Rest/bits>> = Bin,
{I,Rest};
+get_value(Bin, utf16, undefined, _Unit, _Sign, native) ->
+ <<I/native-utf16,Rest/bits>> = Bin,
+ {I,Rest};
get_value(Bin, utf32, undefined, _Unit, _Sign, big) ->
<<Val/big-utf32,Rest/bits>> = Bin,
{Val,Rest};
get_value(Bin, utf32, undefined, _Unit, _Sign, little) ->
<<Val/little-utf32,Rest/bits>> = Bin,
{Val,Rest};
+get_value(Bin, utf32, undefined, _Unit, _Sign, native) ->
+ <<Val/native-utf32,Rest/bits>> = Bin,
+ {Val,Rest};
get_value(Bin, binary, all, Unit, _Sign, _Endian) ->
0 = (bit_size(Bin) rem Unit),
{Bin,<<>>};
--
2.16.4