From f2e75976772b6a1d52a2c71ec1eecb4b338ed632 Mon Sep 17 00:00:00 2001
From: Anders Svensson <anders@erlang.org>
Date: Sun, 16 Apr 2017 09:51:34 +0200
Subject: Replace slow binary comprehensions

Which appears to be about an order of magnitude slower than just
creating a binary of the desired size.
---
 lib/diameter/include/diameter_gen.hrl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lib/diameter/include')

diff --git a/lib/diameter/include/diameter_gen.hrl b/lib/diameter/include/diameter_gen.hrl
index 09af829259..f8d6cbde89 100644
--- a/lib/diameter/include/diameter_gen.hrl
+++ b/lib/diameter/include/diameter_gen.hrl
@@ -723,7 +723,8 @@ z('AVP') ->
     <<0:64/integer>>;  %% minimal header
 z(Name) ->
     Bin = diameter_codec:pack_avp(avp_header(Name), empty_value(Name)),
-    << <<0>> || <<_>> <= Bin >>.
+    Sz = size(Bin),
+    <<0:Sz/unit:8>>.
 
 %% ---------------------------------------------------------------------------
 %% # empty/1
-- 
cgit v1.2.3