ＰＩＣＢＡＳＩＣコンパイラ
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
まるでインタプリタ。でもコンパイラです。超カンタン超シンプルです。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
［第２９回］
●ＧＯＳＵＢ文／ＲＥＴＵＲＮ文
今回はＧＯＳＵＢ文です。
ＧＯＴＯ文に比べるとＧＯＳＵＢ文はほんの少しですが上級者向きです。
使わなくても済んでしまいますし使い方を間違えると困ったことになります。
ですけれどこれを使うと便利なことも多くあります。
ＧＯＴＯ文とよく似ていますが根本的に異なっているのはＧＯＴＯ文が「行ったきり」なのに対してＧＯＳＵＢ文は必ず元のところに戻ってくる（戻ってこなければならない）という点です。
そのためＧＯＳＵＢ文で呼ばれたプログラム（これをサブルーチンと言います）の最後は必ずＲＥＴＵＲＮ文で終ります。
ＧＯＳＵＢ文はアセンブラや他の言語では大抵はＣＡＬＬという名前の命令に相当します。
ＧＯＳＵＢ文のテストプログラムです。
ＢＡＳＩＣのテキストプログラムをロードしてコンパイルが完了するところまでは前回と同じです。
ＬＩＳＴコマンドでプログラムリストを表示しました。
２０行にＧＯＳＵＢ文があります。
６０行のサブルーチンをＣＡＬＬしています。
２０行をＧＯＴＯ ６０と書いた場合でも次に６０行が実行されるところまではＧＯＴＯ文でもＧＯＳＵＢ文でも変わりません。
ＧＯＴＯ文のプログラムと違うのはその先にＲＥＴＵＲＮ文があることです。
ＧＯＳＵＢ文とＲＥＴＵＲＮ文はこのように対になって使われます。
このプログラム例では６０行がマルチステートメントになっていて、すぐ同じ行にＲＥＴＵＲＮ文があります。
これはテストプログラムなのでそのように簡単に書いています。
普通はサブルーチンによってはもっと長いことも多く何行も何十行ものこともあります。
その場合でも最後は必ずＲＥＴＵＲＮ文で終るようにします。
／ＲＵＮコマンドを実行するとコンパイルされて出来ていたマシン語プログラムコードがＰＩＣに書き込まれたあとそのマシン語プログラムがただちに実行されます。
プログラムの動作としては６０行を実行したあと２０行の次の行（３０行）に戻ってそこからプログラムの続きが実行されます。
プログラムの流れは１０→２０→６０→３０→４０→５０と進んで最後のＳＴＯＰ文でブレークしてＢＡＳＩＣシステムに戻ってきます。
ｂｒｅａｋ［２０４６］はＰＩＣのマシン語プログラムを実行した結果アドレス２０４６でブレークしたことを示しています。
その下のｂｒｅａｋ ｂｅｆｏｒｅ ｌｉｎｅ＃＝６０はもとのＢＡＳＩＣプログラムの６０行の直前の位置でブレークしたことを示しています。
このようにちゃんともとのＢＡＳＩＣプログラムとの関係をしっかり維持しています。
簡単ですけれど意外とかしこいコンパイラなのです。
ＰＩＣＢＡＳＩＣコンパイラによって作成されたマシン語プログラムリストファイルです。