use-module not finding module in guile-1.9.5

[Linas Vepstas <linasvepstas@gmail.com>]

Hi,

I'm experiencing trouble loading a module in guile-1.9.5

I maintain the guile-dbi module at http://home.gna.org/guile-dbi/
and am having trouble getting guile-1.9.5 to find the module:

$ /usr/local/bin/guile
Guile Scheme interpreter 0.5 on Guile 1.9.5
Copyright (C) 2001-2008 Free Software Foundation, Inc.

Enter `,help' for help.
scheme@(guile-user)> (use-modules (dbi dbi))

Backtrace:
In system/repl/common.scm:
  85:  0* [repl-eval # #]
In system/base/compile.scm:
 239:  1  [compile (use-modules (dbi dbi)) #:key ...]
In system/base/compile.scm:
 185:  2  [lp # # # ...]
In ice-9/boot-9.scm:
1775:  3  [save-module-excursion #<program b31fa0 at
language/scheme/compile-tree-il.scm:29:3 ()>]
In unknown file:
   ?:  4* [dynamic-wind #<program b31f20 at ice-9/boot-9.scm:1774:18 ()> ...]
In language/scheme/compile-tree-il.scm:
  32:  5* [#<program b31fa0 at language/scheme/compile-tree-il.scm:29:3 ()>]
In ice-9/psyntax-pp.scm:
11057:  6  [#<program 9aad40 at ice-9/psyntax-pp.scm:11040:8 (#{\x\\\
1648}# . #{\rest\\\ 1649}#)> # ...]
In unknown file:
   ?:  7* [with-fluid* #<fluid 10> c ...]
In ice-9/psyntax-pp.scm:
6736:  8* [#{\chi-top-sequence\\\ 162}# (# *unspecified*) () (#) ...]
In ice-9/psyntax-pp.scm:
6720:  9  [#{\dobody\\\ 866}# ((process-use-modules (list #))
*unspecified*) () ...]
In ice-9/psyntax-pp.scm:
3311: 10  [#{\chi-top\\\ 166}# (process-use-modules (list (list #))) () ...]
In ice-9/psyntax-pp.scm:
7854: 11  [#{\top-level-eval-hook\\\ 90}# # #]
In unknown file:
   ?: 12* [primitive-eval ("noexpand" (process-use-modules (list #)))]
   ?: 13* [process-use-modules (((dbi dbi)))]
In ice-9/boot-9.scm:
2992: 14* [process-use-modules (((dbi dbi)))]
In unknown file:
   ?: 15* [map #<program 9d8b80 at ice-9/boot-9.scm:2991:25 (mif-args)> ((#))]
In ice-9/boot-9.scm:
2993: 16* [#<program 9d8b80 at ice-9/boot-9.scm:2991:25 (mif-args)> ((dbi dbi))]
In ice-9/boot-9.scm:
2144: 17  [resolve-interface (dbi dbi)]

ERROR: In procedure resolve-interface:
ERROR: no code for module (dbi dbi)
scheme@(guile-user)>


The basic dbi.scm is located in /usr/local/share/guile/site/dbi

Copying it to /usr/share/guile/site/dbi does not help.

The module is found, and works, with guile1.8.6
The total contents of dbi.scm is

(define-module (dbi dbi))

(load-extension "libguile-dbi" "init_dbi")

; exported primitives

(export dbi-open
        dbi-close
        dbi-query
        dbi-get_row
        dbi-get_status)



--linas