私はいくつかのレガシープログラムを見ています。そこでは次のようなコードが見つかります:
C/free
Dow 1=1;
SubRoutine();
EndDo;
*INLR = *On;
/end-free
問題のプログラムはサーバーのようなプログラムであり、サブルーチンがネットワークを介した着信要求を処理します。私には、* INLR = * Onステートメントは効果がないように見えますが、RPGに関する知識は非常に限られており、このパターンは、私が見ているいくつかのプログラムで繰り返されます。
したがって、私の質問は次のとおりです。/ end-freeの前の最後の行は到達不能であり、したがって冗長ですか?