[kernel-ml 12] Re: Request for Comment (

磯山 卓志 (GGG03556@niftyserve.or.jp)
Tue, 30 May 1995 19:41:00 +0900

磯山です。

>>scheme というと、Common Lisp の Guy Steel Jr. と G.J.Sussman の作った
>>言語ですね。Common Lisp に比べるとかなり仕様は小さいですが、やっぱり
>>Lisp ですので、Boot に使う言語としては無理があるような気がします。

そうですね。中身が完全なLispマシンならばともかく。

「Lispでbootする」って宣伝すると、Lisper達がB-Free OSに興味もってくれるかも
という、スケベな下心から書いてみました。:-)

SUNがforth系だというのならば、forth系でやってみましょうか。
こんな感じなのかしら。

%ITRONが入っているパスの指定
/ITRON-PATH "/itron.img" def

%指定したデバイスからプログラムを読み込み、実行を開始する
/load-and-fly
dup pop
{
read-program-header
get-load-addr
load-program-body
run
{
"Cannot run program" print
} if
}
{
"Cannot open file" print
} ifelse
def

として、

boot>ITRON-PATH "fd0" load-and-fly

※PostScriptもどき