From ad9852058f48695374ed73e4bbf6a410468967ad Mon Sep 17 00:00:00 2001
From: Julien Delange <julien@gunnm.org>
Date: Fri, 5 Aug 2016 10:10:50 -0400
Subject: [PATCH]  *
 src/backends/ocarina-backends-vxworks653_conf-connections.adb    - Avoid
 crash when a process does not have any connection

---
 src/backends/ocarina-backends-vxworks653_conf-connections.adb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/backends/ocarina-backends-vxworks653_conf-connections.adb b/src/backends/ocarina-backends-vxworks653_conf-connections.adb
index 80a120e5..2b8b7650 100644
--- a/src/backends/ocarina-backends-vxworks653_conf-connections.adb
+++ b/src/backends/ocarina-backends-vxworks653_conf-connections.adb
@@ -207,6 +207,10 @@ package body Ocarina.Backends.Vxworks653_Conf.Connections is
    begin
       Corresponding_Process := Find_Associated_Process (E);
 
+      if AINU.Is_Empty (Features (Corresponding_Process)) then
+         return;
+      end if;
+
       Feature := First_Node (Features (Corresponding_Process));
 
       while Present (Feature) loop
-- 
GitLab