CVS difference for acats/new/c650b04.a
--- acats/new/c650b04.a 2016/01/22 05:43:02 1.2
+++ acats/new/c650b04.a 2016/01/23 01:25:06 1.3
@@ -261,7 +261,7 @@
Report.Failed ("Test function did not raise Program_Error " &
"as expected (" & Natural'Image(Subtest) & ')');
end if;
- F650B00_2.Add_Spin (Obj, 20);
+ F650B00_2.Add_Spin (Obj, Base_RPM);
if F650B00_2."/=" (F650B00_2.Spin (Obj), Expected_Spin) then
Report.Failed ("Unexpected spin value (" &
Natural'Image(Subtest) & ')');
Questions? Ask the ACAA Technical Agent