* 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
- Avoid crash when a process does not have any connection
ad985205 · Julien Delange · 512d14a5 · ad985205
Commit ad985205 authored Aug 05, 2016 by Julien Delange
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

src/backends/ocarina-backends-vxworks653_conf-connections.adb ...backends/ocarina-backends-vxworks653_conf-connections.adb +4 -0

No files found.
--- 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