04/10/16 16:29:31.net
with Ada.Text_IO;
procedure Test2 is
begin
select
delay 1.0;
then abort
loop
Ada.Text_IO.Put("*");
delay 0.1;
end loop;
end select;
end Test2;
条件を満たしたらthen abort以下の処理を強制中断するとか…こんな機能あっても使うのか？
RM読んでたら、並列処理関係はほんとのほんとに無駄に機能豊富。
04/10/16 16:29:31.net
with Ada.Text_IO;
procedure Test2 is
begin
select
delay 1.0;
then abort
loop
Ada.Text_IO.Put("*");
delay 0.1;
end loop;
end select;
end Test2;
条件を満たしたらthen abort以下の処理を強制中断するとか…こんな機能あっても使うのか？
RM読んでたら、並列処理関係はほんとのほんとに無駄に機能豊富。