[Q] how can i run cgen interactively?

[blue <ml@colors.myhome.cx>]

hi, i'm a student of graduated school of Univ. in japan.
i'm trying to port gnu tool-chain to our new processor with cgen.
but i cannot run cgen interactively. how can i run it?
i'm trying to port Binutils-2.16.1 and GDB-6.2.

my environment is 
  OS:    Debian GNU/Linux 3.1 sarge (stable)
  CGEN:  cgen-20051015
  Guile: guile-1.6

i run cgen as following. now i run with m32r.

$ tar xjf cgen-20051015.tar.bz2 
$ cd cgen-20051015/cgen/
$ guile
guile> (load "dev.scm")
	...<snipped>
guile> (load-opc)
	...<snipped>
guile> (cload #:arch "m32r")
	...<snipped>
guile> (cgen-desc.h)
	...<snipped> and ...

extern const CGEN_HW_ENTRY @arch@_cgen_hw_table[];


Backtrace:
In ./desc-cpu.scm:
1002:  0* (opc-file-path)
1002:  1  [gen-extra-cpu.h ...
In ./utils.scm:
 414:  2* [#<procedure #f ()>]
 414:  3  [-string-write #(print-state 0) ...
 412:  4* (cond ((string? expr) (display expr)) ((symbol? expr) (display expr)) ...)
 403:  5* [-string-write #(print-state 0) #<procedure #f ()>]
In unknown file:
   ?:  6* [#<procedure #f (elm)> #<procedure #f ()>]
In ./utils.scm:
 403:  7* [for-each #<procedure #f #> #]
 401:  8  (let ((pstate (make-print-state))) (set! -current-print-state pstate) ...)
In ./desc-cpu.scm:
 966:  9  [string-write "/* CPU data header for @arch@.  THIS FILE IS MACHINE GENERA$
In standard input:
   4: 10* [cgen-desc.h]

./desc-cpu.scm:1002:32: In expression (opc-file-path):
./desc-cpu.scm:1002:32: Unbound variable: opc-file-path
ABORT: (unbound-variable)
guile>

could you please tell me how to run cgen interactively.
i found that opc-file-path is defined in cgen-opc.scm, so i tried to load it.
but i cannot load it.

-- 
blue