Use Aspect

[pjljvandelaar]

Dear AUnit Developers,

Why is on

aunit/include/aunit/framework/aunit-test_suites.adb

Lines 109 to 110 in 1625e40

	Obj : Test_Suite;
	for Obj'Address use Ret.all'Address;

not an aspect used?

Why don't you prefer the equivalent alternative

-      Obj : Test_Suite;
-      for Obj'Address use Ret.all'Address;
+      Obj : Test_Suite with
+         Address => Ret.all'Address;

Greetings,
Pierre