ada - Ada パッケージとメソッド名

Question

ここで好奇心からの質問ですが、あなたがいるメソッドの名前を見つけることは可能ですか? このようなものは、文字列リテラルに頼らずにMagic出力する必要があります。"foo.bar.foobar"

with ada.text_io;
package body foo.bar is 

   function foobar return boolean is 
   begin
     ada.text_io.put_line ("I am in :" & Magic);
     return true;
   end foobar;

end foo.bar;

これは、スタックトレース、例外、プロファイリングツールなどの出力と同様の情報がどこかにあると思いますが、どこにも文書化されていません!

Answer 1

ご存知のとおり、Ada は (残念ながら) リフレクションをサポートしていません。

ただし... GNAT を使用していて、コンパイラ固有のユーティリティに問題がない場合は、パッケージGNAT.Source_Infoからこの種の情報を取得できます。