6800用のGAMEインタプリタとコンパイラの6809への移植がようやく完成しました
時代錯誤ではありますが、折を見ながら昔のマイコン時代に使用していたGAME言語を6809に移植する試みを続けていまして、今までに２回報告しています。
・2021年5月19日のブログ「6800用のGAMEインタプリタとコンパイラを6809に移植」https://www.blogger.com/blog/post/edit/1662007451717538019/285975797531168690
・2019年5月8日のブログ「6802基板でGAME68コンパイラを走らせる」https://www.blogger.com/blog/post/edit/1662007451717538019/2314144451913456377
できる限りオリジナルから改変せずに自作の6802／6809両用カードにインタプリタとコンパイラを移植することを目指したので、既に他の方々が実践されているような高速化・高機能化とは無縁ですが、移植過程の経験とソースを得られることが目標でした。
上記２回の報告では、とりあえず動作したというレベルでしたので、何とか完成させたいと折を見ながら取り組んできましたが、ようやく完成と言ってもよいものができあがりましたので紹介するとともに作成したファイルを公開します。
作成に使用した自作マイコンですが、以前のブログで紹介したものと同じ6802／6809両用カードを使用しています。（見出しに画像を表示させるために以前と同じ画像を張り付けてあります。）
 |
| 6802/6809両用カード |
１．GAME3インタプリタ
まずインタプリタですが、ASCII誌に連載されたオリジナルのGAME３に作者の大西氏が行編集機能を追加されたものを使用しています。
オリジナルのソースに追加する必要があるのはI/O関係の1文字入力、1文字出力、ブレーク判定ルーチンのみで、変更点はRUB,DELコード、RAM末アドレスなどですが、これらについてはソースプログラムを添付しますのでそれを見ていただければ分かると思います。
２．GAME3コンパイラ
前回のブログで紹介しましたが、ASCII誌に掲載された松島義明さんのH68/TR・TV用の「GAME68コンパイラ」を移植しました。（松島さんには申し訳ないのですが、名称をGAME3コンパイラに変更させていただきました。）
これはGAME3自身で記述されており、6809に移植しやすいということで使用しました。
基本的にはオリジナルのままで動作しますが、インタプリタ中のルーチンを使用していますので、上記のインタプリタとセットで使用します。
変更点は220行のモニタへのアドレス$F0B1と、オリジナルのままではコンパイル結果のバイナリを実行後に暴走しますので、80行の末尾にA:0)=$39を追加した2点のみです。
３．GAME9インタプリタ
6800用GAME3インタプリタを元にして、6809用GAME9インタプリタを作成するわけですが、以前のブログで報告しましたように、基本的にはソースプログラムが公開されていますのでその6800の命令を6809の命令に置き換えるだけです。
置き換えに当たってはスタックポインタをインデックスポインタとして使用している箇所や比較命令CPXを1バイトスキップに利用している箇所に注意するだけで良いはずなのですが、何と終了判定にプログラムコード中の$00を利用している箇所があり、6800と6809では命令の長さが異なるために判定位置がずれてしまうことに気づかず、最後まで悩まされました。
以上に注意しながらインタプリタのソースを書き換えた結果、正常に動作させることができました。出来上がったものは基本的にただ6800の命令を6809の命令に置き換えただけですので、他の方々が移植されたものとは速度や機能の面で劣りますが、とにかく正常に動作するソースが作成できたということで良しとします。
４．GAME9コンパイラ
続いて「GAME68コンパイラ」の移植に取り組みましたが、これも以前のブログで報告しましたが、まずランタイムルーチンのバイナリを逆アセンブルしてソースを起こし、それを6809の命令に書き換えました。
続いてコンパイラの移植ですが、まず、GAME自身で記述されているコンパイラのリスト中の、インタプリタ中のルーチンを呼んでいるアドレスを書き換え、次に、6800の命令コードを発行している箇所を見つけて6809の命令に置き換えました。 同じバイト数で置き換えられるものは単純に置き換えられるのですが、バイト数が変わる場合はそれに応じて、その周辺を書き換える必要がありました。
最後に、多少なりとも6809らしいコードを出力して欲しいということで、AccAとAccBの両方を使用している箇所をAccDに置き換える等を試みましたが、全てを置き換えることはできませんでした。
結果として作成したコンパイラですが、いくつかのサンプルプログラムを実行して正常にコンパイルできていることを確認し、最後にコンパイラ自身をコンパイルしてみました。
その結果、得られたバイナリが正常に動作しましたし、さらにそのバイナリでもう一度コンパイルしてみたところ、そのバイナリも正常に動作しました。
ただし、GAME9コンパイラ自身をコンパイルする過程では、最終行までコンパイルした後にハングアップしてしまいましたが、調べてみるとインタプリタに戻るアドレスが書き込まれていませんでしたので、手作業で該当の２個所に$0103を書き込むことで正常に動作するオブジェクトが得られました。
（この現象はGAME3でも同様でしたので、元のGAME68コンパイラに原因があるのではないかと思っていますが、コンパイルせずにそのまま使用した場合には正常に動作するので、原因については良く分かりません。）
以上により得られたファイルは次のようです。
［１］GAME3
・GAME3EX インタプリタ
・GAME3C コンパイラ（GAME言語で書かれたもの）
・GAME3CC コンパイラオブジェクト（GAME3Cを自身でコンパイルしたもの）
・RELSUB3 コンパイラ用ランタイムルーチン（$2000-212Aだが移動可能）
コンパイル結果のオブジェクトの実行開始アドレスはランタイムルーチンの先頭アドレス＋$012Bです。
［２］GAME9
・GAME9EX インタプリタ
・GAME9C コンパイラ（GAME言語で書かれたもの）
・GAME9CC コンパイラオブジェクト（GAME9Cを自身でコンパイルしたもの）
・RELSUB9 コンパイラ用ランタイムルーチン（$2000-2106だが移動可能）
ランタイムルーチンがGAME3用よりも小さいのですが、操作を統一するためにコンパイル結果の実行開始アドレスをGAME3と同じランタイムルーチンの先頭アドレス＋$012Bに揃えてあります。
 |
メモリマップ |
コンパイラの動作速度を知るために、参考までに、インタプリタで300行弱のコンパイラプログラムを実行（コンパイル）した場合と、コンパイル済みのオブジェクトでコンパイルした時の時間を測ってみました。
（１）GAME3
・インタプリタでは、パス１終了までに4分30秒、パス２終了までに10分30秒
・コンパイラでは、パス１終了までに約11秒、パス２終了までに約29秒
（２）GAME9
・インタプリタでは、パス１終了までに4分11秒、パス２終了までに9分27秒
・コンパイラでは、パス１終了までに約11秒、パス２終了までに約25秒
0 件のコメント:
コメントを投稿