From: Adrian-Ken Rueegsegger <ken@codelabs.ch>
Date: Thu, 19 Oct 2017 08:39:20 +0000 (+0200)
Subject: Add Null_String_Desc constant
X-Git-Url: https://git.codelabs.ch/?p=libxhcidbg.git;a=commitdiff_plain;h=164c8618ecc1309e04abfdd742b8d033501f22b4;hp=0043d20b64a6e903414e06104aebba11869be7de;ds=sidebyside

Add Null_String_Desc constant

Signed-off-by: Adrian-Ken Rueegsegger <ken@codelabs.ch>
---

diff --git a/src/hw-dbc.adb b/src/hw-dbc.adb
index 3bc248a..13748c7 100644
--- a/src/hw-dbc.adb
+++ b/src/hw-dbc.adb
@@ -65,6 +65,11 @@ is
       wData             : Desc_Str;
    end record with Pack;
 
+   Null_String_Desc : constant String_Descriptor
+     := (bLength          => 0,
+         bDescriptor_Type => 0,
+         wData            => (others => 0));
+
    type Desc_Strings_Type is (String0, Manufacturer, Product, Serial_Number);
    type Desc_Strings_Array is
       array (Desc_Strings_Type) of String_Descriptor with Pack;