Re: set-current-module in .guile ?

[ludo@gnu.org (Ludovic Courtès)]

Hi,

"Scott N. Walck" <walck@lvc.edu> writes:

> [walck@entangle:~]$ guile
> guile> (load "/usr/local/src/guile-scmutils/src/load.scm")
> guile> (module-use! (current-module) generic-environment)
> #f
> guile> +
> #<procedure g:+ args>
> guile> (+ (vector 5 6) (vector 7 8))
> Segmentation fault (core dumped)

It starts looking like something worrying from the Guile side.  ;-)

I tried installing guile-scmutils to reproduce the problem but failed.
What version of Guile and SLIB are you using?

With SLIB 3b1 and Guile HEAD, I get:

  $ guile -L ~/soft/lib/ -l load.scm 
  Backtrace:
  In unknown file:
     ?: 0* [primitive-load "/home/ludo/soft/lib/slib/factor.scm"]
  In /home/ludo/soft/lib/slib/factor.scm:
    90: 1* (define prime:sieve (bytes 0 0 1 1 0 1 0 1 ...))
    90: 2  (define-public prime:sieve (bytes 0 0 1 1 0 1 0 1 ...))
    90: 3  (begin (define-private prime:sieve (bytes 0 0 1 ...)) (eval-case (# #)))
  In unknown file:
     ?: 4* (define-private prime:sieve (bytes 0 0 1 1 0 1 0 1 ...))
  In /home/ludo/soft/lib/slib/factor.scm:
    90: 5* [bytes 0 0 1 1 0 1 0 1 ...]
  In /home/ludo/soft/lib/slib/byte.scm:
    61: 6  [list->array 1 #u32(32) (0 0 1 1 0 1 0 1 0 ...)]

  /home/ludo/soft/lib/slib/byte.scm:61:3: In procedure list->array in expression (list->array 1 (A:fixN8b) ...):
  /home/ludo/soft/lib/slib/byte.scm:61:3: Wrong number of arguments to #<primitive-procedure list->array>

(Where `~/soft/lib' is that path to SLIB and `load.scm' is
guile-scmutils' load file.)

Actually, SLIB's `array' module isn't accessible from Guile for some
reason:

  guile> (use-modules (ice-9 slib))
  guile> (require 'array)
  #t
  guile> array?
  #<primitive-procedure array?>  ;; <--- This is Guile's built-in proc
  guile> A:bool 
  #<procedure at1 opt> ;; <--- but this one's from SLIB

Any idea?

Thanks,
Ludovic.