* Correct some warnigns

src/backends/ocarina-backends-pn-components.adb

@@ -151,6 +151,7 @@ package body Ocarina.Backends.PN.Components is
       Instance : Node_Id;
       PN_Generated : Node_Id;
       Success : Boolean := False;
+      pragma Warnings (Off, Success); --  XXX
 
       --  0 for CPN, 1 for TPN
       Formalism : constant Value_Id := New_Integer_Value (F);

src/backends/ocarina-backends-pn-iutils.adb

@@ -654,6 +654,7 @@ package body Ocarina.Backends.PN.Iutils is
    is
       use Ocarina.Backends.PN.Nodes;
       use Ocarina.Aadl_Values;
+      pragma Unreferenced (M);
 
    begin
       if P /= No_Node and then PN_G /= No_Node then