Forwarded e-mail/bug report from guile-devel

 

From: Tommi Höynälänmaa
Date: dinsdag 5 november 2024 8:25
To: guile-devel@gnu.org
Subject: Re: Exporting a nonexistent variable

 

Here is another example:

 

--- mod1.scm ---

(define-module (mod1))

 

(export myproc)

 

(define (myproc0)

  (display "Hello\n"))

 

--- end ---

 

--- mod2.scm ---

(define-module (mod2))

 

(export myproc2)

 

(use-modules (mod1))

 

(define (myproc2)

  (display "Hello again\n"))

 

--- end ---

 

--- program.scm ---

(use-modules (mod1)

             (mod2))

 

(define (main args)

  (myproc))

 

--- end ---

 

I compiled this example with the following commands:

 

--- cut here ---

 

export GUILE_LOAD_COMPILED_PATH=.

guild compile --warn=unbound-variable -o mod1.go mod1.scm

guild compile --warn=unbound-variable -o mod2.go mod2.scm

 

--- cut here ---

 

The compiler gives no warnings and running "guile -e main -s

program.scm" gives the following error:

 

--- cut here ---

 

;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0

;;;       or pass the --no-auto-compile argument to disable.

;;; compiling /home/tohoyn/tyo/omat/ohj/scheme/export-test3/program.scm

;;; compiled

/home/tohoyn/git/savannah/guile/cache/guile/ccache/3.0-LE-8-4.7/home/tohoyn/tyo/omat/ohj/scheme/export-test3/program.scm.go

Backtrace:

In ice-9/boot-9.scm:

  1762:12  4 (with-exception-handler _ _ #:unwind? _ # _)

In unknown file:

           3 (apply-smob/0 #<thunk 7f2fda699300>)

In ice-9/boot-9.scm:

    731:2  2 (call-with-prompt _ _ #<procedure default-prompt-handle…>)

In ice-9/eval.scm:

    619:8  1 (_ #(#(#<directory (guile-user) 7f2fda69cc80>)))

In /home/tohoyn/tyo/omat/ohj/scheme/export-test3/program.scm:

      6:3  0 (main _)

 

/home/tohoyn/tyo/omat/ohj/scheme/export-test3/program.scm:6:3: In

procedure main:

Unbound variable: myproc

 

--- cut here ---

 

     - Tommi Höynälänmaa

 

--

Kotisivu / Homepage: http://www.iki.fi/tohoyn/

Sähköposti / E-Mail: tommi.hoynalanmaa@iki.fi

GPG-sormenjälki / GPG fingerprint:

55F4 2477 7155 3528 5CB2 2B7A BB86 1FDE 4046 0F83

FT, Debian-ylläpitäjä / PhD, Debian Maintainer