色々確認

入口出口を見失ってる状態。色々 gdgd 見つつ gencomp 方面に舞い戻ってたり。
で、compile-toplevel-form のコメントを再度ぼさっと眺めてたら以下な記述

;;    1. use vm-code->list to extract mnemonics from the code
;;       compiled by the host compiler.

ぢつは以下なナニまでは到達してたりして

gosh> (with-module gauche.internal (compile (lambda (obj selector) (ref obj selector)) '()))
#<compiled-code %toplevel@0x820ec78>
gosh> 

参ったな、と言いつつアキラメてましたが、これがありゃいいじゃん、って

gosh> vm-code->list
*** ERROR: unbound variable: vm-code->list
Stack Trace:
_______________________________________
gosh> 

何かを use しないとダメですか。と言いつつ探してみたら gencomp に以下を発見。

(define vm-code->list (with-module gauche.internal vm-code->list))

で試してみた。

gosh> (define vm-code->list (with-module gauche.internal vm-code->list))
vm-code->list
gosh> (vm-code->list (with-module gauche.internal (compile (lambda (obj selector) (ref obj selector)) '())))
((CONST-RET) #<closure #f>)
gosh> 

面白そうなんですが、そろそろ限界。しかし何かの手がかりが欲しいなぁ ...
# コメントきちんと読め、はその手がかりの一つ