* Allow for empty property sets

        For test AADL-CTS/02-Semantic/SC0009/AADL-11.1/02-pos in aadlqa

src/frontends/aadl/ocarina-fe_aadl-parser-properties.adb

@@ -1250,6 +1250,8 @@ package body Ocarina.FE_AADL.Parser.Properties is
       end if;
 
       loop
+         exit when Token = T_End;
+
          if Token /= T_Identifier then
             DPE (PC_Property_Declaration, T_Identifier);
             Skip_Tokens ((T_End, T_Semicolon));